摘要:
PPersion=^TPersion; TPersion=packed record Name:string; Sex:string; Clasee:string; end; var persion:TPersion; PP:PPersion; begin FillChar(persion,Size
阅读全文
posted @ 2016-04-13 17:43
刘继才
阅读(1423)
推荐(0)
摘要:
--在全局函数中增加 适用用Setup Factory 9 function FindAndCloseProcessByName(strName) local tblProcesses = Window.EnumerateProcesses(false); local bProcessFound =
阅读全文
posted @ 2016-01-05 08:25
刘继才
阅读(1278)
推荐(0)
摘要:
1、D:\soft\控件\VclSkin5.40-D7-D2010 New\source 控件安装位置2、WinSkinForm.pas 查找Close3、function TWinSkinForm.GetSysBtnHint(i: integer): string;begin result := ...
阅读全文
posted @ 2015-09-23 21:18
刘继才
阅读(186)
推荐(0)
摘要:
1、声明 type PtrInt=Integer;2、function CreateAlarmObject(AppHandle:THandle;WinW,WinH:Integer):PtrInt;begin if Application.Handle=0 then begin Application...
阅读全文
posted @ 2015-07-29 09:35
刘继才
阅读(215)
推荐(0)
摘要:
1、右键动态库工程名,出现options,选择Directories/Conditionals,Output Directior 制定一个动态库输入目录2、选择Debugger,Host application选择使用动态库的程序,为Output Directior目前下的程序3、启动动态库。就可以...
阅读全文
posted @ 2015-07-29 09:24
刘继才
阅读(1346)
推荐(0)
摘要:
Tree: TXdbxAnalysis;FDataStream: TMemoryStream;{FDataStream:= TMemoryStream.Create; FDataStream.LoadFromFile('D:\4.txt'); Tree:=TXdbxAnalysis.Create; ...
阅读全文
posted @ 2015-06-29 10:03
刘继才
阅读(253)
推荐(0)
摘要:
在Delphi7.0中安装Spcomm串口通信控件的方法为:选择Delphi7.0的“Component”菜单,点击“Install Component...”菜单项,然后在弹出的Into existing package属性页中Unit file name输人框中选择SPCOMM.pas文件,单击...
阅读全文
posted @ 2015-05-18 14:32
刘继才
阅读(1160)
推荐(0)
摘要:
菜单component->Install Packets按Add按钮,选择delphi目录里的bin目录下的dclsockets70.bpl(delphi2010是dclsockets140.bpl),然后TClientSocket和TServerSocket控件就会出现在Internet页上了
阅读全文
posted @ 2015-05-15 14:12
刘继才
阅读(1585)
推荐(0)
摘要:
function BytestoHexString(ABytes: TBytes; len: Integer): AnsiString;begin SetLength(Result, len*2); BinToHex(@ABytes[0], PAnsiChar(Result), len);end;例...
阅读全文
posted @ 2015-04-25 10:33
刘继才
阅读(1439)
推荐(0)
摘要:
TDMSRequestBuffer=object Head:TDMSHead; Data:array[0..2047] of char; DataSize:Integer; procedure Init(Sys:TDMSSysType;Svr:TDMSSvrType); procedure Enc...
阅读全文
posted @ 2015-04-13 10:41
刘继才
阅读(1085)
推荐(0)