摘要：
VC声明 DWORD WaitForSingleObject( HANDLE hHandle, DWORD dwMilliseconds ); VB声明 Declare Function WaitForSingleObject Lib "kernel32" (ByVal hHandle As Long, ByVal dwMilliseconds As Long) As Lon... 阅读全文
摘要：
var s:string; pc:pchar; pb:pbyte; ac:array[1..100] of char; ab:array[1..100] of byte; i:integer; begin s:='this is a test'; pc:=pchar(s); //string->pchar pb:=pbyte(pc); //pchar->pbyte for i:=1 t... 阅读全文
摘要：
要把一个Form编译进DLL，这个Form必须要自己创建和释放。由于源代码分为几个部分，这里写下dll的关键代码：function showform(handle1:THandle):Boolean;stdcall;var form3:TForm1;begin Result:=True; form3:=TForm1.Create(nil); Application.Handle:=handle1;... 阅读全文
摘要：
TFrame的一个功能可以进行功能的封装，就像一个组件一样，它能够把一组功能包装在一起，实现这组功能的复用，甚至可以把一个应用程序封装到一个TFrame，然后在其它地方引用它；TFrame的另一个功能是，它提供了一种拆分和组合应用程序的途径，可以把一个比较大，而且有较独立模块的应用程序拆分为多个Fframe，然后分发给不同的人做，最后把所有的Frame组合在一起，作为一个整体的应用程序。源程序代码... 阅读全文
摘要：
把一个窗体或者控件变成可以停靠只需要两步：（1）把DragKind特性设置为dkDock。（2）把DragMode特性设置为dmAutomatic。另外，TPanel控件有一个UseDockManager特性，如果为Ture，它的作用是将停靠在上面的控件的尺寸扩充为Panel的大小，即充满全部Panel空间。演示代码：新建一个VCL form工程，加入界面代码：object Form1: TFor... 阅读全文
摘要：
小东西，初学delphi练习下手。 源代码如下： unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ImgList, ComCt 阅读全文