当前位置:首页 » 软件开发
开发技术指南» 文章正文
    引言: {*单元说明 : 用 ModelMaker 生成 单例程窗体模式。
 

 

    摘要:现在网络的流行,使得服务器程序得到了广泛的应用,那么我们使用delphi如何设计出强壮的服务器呢?有人说,如果要设计服务器的话,一定要使用vc来设计,其实这个人说的有一定道理,因为如果你要使用delphi来设计服务器的话,要想设计高效的服务器就不要使用delphi带来的大部分的控件(最好不要使用delphi控件),为什么呢?下面我会告诉大家。这样的话你全部使用api来设计服务器,就同vc没有太大的......
    摘要:[界面]程序启动欢迎窗体(splash) 制作方法(附原码) 发表时间:2004-8-10作者:未知[获得此文档时候没有作者记录,深感抱歉,本文档全为转载] 举个例子,你自己看吧,挺简单的   在许多应用软件中,启动程序后,在主导界面出现之前,有一个一般以图象为主,文字为辅的画面,通常用来显示软件或公司的主题标志、软件名称、作者、版权和版本信息等,停留数秒或按了任意键后软件进入主导界面,这个画面......


用 ModelMaker 生成 单例程窗体模式
上一页   ...    edit1: tedit;

  private 【程序编程相关:如何在托盘图标实现漂亮的菜单

【推荐阅读:Ojbect Pascal动态数组浅说

    faowner:tcomponent; 【扩展信息:论程序设计课程与Delphi教材的编写

    procedure setaower(avalue:tcomponent);

  protected

    class function accessinstance(request: integer): tformsingleton;

  public

    constructor create;

    constructor createinstance;

    destructor destroy; override;

    class function instance: tformsingleton;

    class procedure releaseinstance;

    property aowner:tcomponent read faowner write setaower;

  end;

 

var

  formsingleton: tformsingleton;

implementation

{

******************************** tformsingleton ********************************

}

procedure tformsingleton.setaower(avalue:tcomponent);

begin

  if faowner<>avalue then

  begin

    faowner:=avalue;

  end;

end;

constructor tformsingleton.create;

begin

  inherited create(faowner);

  raise exception.createfmt(access class %s through instance only, [classname]);

end;

constructor tformsingleton.createinstance;

begin


...   下一页
 ·用timer实现定时运行     »显示摘要«
    摘要:定时运行这个问题其实老早就接触到了,不过在上次的程序中似乎没有很好的解决这个问题,并且没有深入下去。这次再次碰到同样的问题,在查找了网上的资料以后,对这一问题有了比较深的理解。在程序中实现定时运行的思路:由timer控件实现两个timer控件,其中timer1负责每一分钟检查一次系统时间和设定时间的差值,如果两者相差5分钟,则继续检查,直到当相差时间小于5分钟,触发timer2,timer2的定时......
» 本期热门文章:

©2000-2007 All Rights Reserved. 最佳浏览:1024X768 MSIE