- 博客(5)
- 资源 (1)
- 收藏
- 关注
RSS订阅原创 Delphi中Interface接口的使用方法
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type //定义接口如果接口独立成一个文件，则在应用程序中和实现程序中都要引用该接口文件； ICar = interfa
2008-02-20 18:41:00
12948
1
原创 delphi中临界操作方法
var FLock:TRTLCriticalSection; //定义临界区域begin InitializeCriticalSection(FLock); //初始化临界区域 EnterCriticalSection(FLock); //进入临界区域 LeaveCriticalSection(FLock); //退出临界区域 DeleteCr
2008-02-20 18:40:00
2297
原创 delphi中Thread线程的使用方法
TClientDataThread = class(TThread) private public ListBuffer :TStringList; TargetList :TStrings; procedure synchAddDataToControl; procedure showme; constructor Create(Cr
2008-02-20 18:38:00
7230
原创 delphi中Time消息的使用方法
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls;const TIMER_ID = 200;type TForm1 = class(TForm) Label1: TLa
2008-02-20 18:32:00
2228
原创 delphi中Message消息的使用方法
实例1 unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; constWM_ME=WM_USER+100; //自定义消息； type TForm1 = class(TFo
2008-02-20 18:28:00
16194
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人