刘继才 - 博客园

Delphi 中记录类型给记录指针赋值。

摘要： 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 刘继才阅读(1416) 评论(0) 推荐(0) 编辑

Setup Factory 关闭正在运行的程序

摘要： --在全局函数中增加适用用Setup Factory 9 function FindAndCloseProcessByName(strName) local tblProcesses = Window.EnumerateProcesses(false); local bProcessFound = 阅读全文

posted @ 2016-01-05 08:25 刘继才阅读(1240) 评论(0) 推荐(0) 编辑

TSkinData 皮肤控件后最大最小提示英文Close的解决方法

摘要： 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 刘继才阅读(181) 评论(0) 推荐(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 刘继才阅读(213) 评论(0) 推荐(0) 编辑

动态库的调试方法

摘要： 1、右键动态库工程名，出现options，选择Directories/Conditionals,Output Directior 制定一个动态库输入目录2、选择Debugger，Host application选择使用动态库的程序，为Output Directior目前下的程序3、启动动态库。就可以... 阅读全文

posted @ 2015-07-29 09:24 刘继才阅读(1335) 评论(0) 推荐(0) 编辑

XdbxAnalysis

摘要： Tree: TXdbxAnalysis;FDataStream: TMemoryStream;{FDataStream:= TMemoryStream.Create; FDataStream.LoadFromFile('D:\4.txt'); Tree:=TXdbxAnalysis.Create; ... 阅读全文

posted @ 2015-06-29 10:03 刘继才阅读(238) 评论(0) 推荐(0) 编辑

delphi SPCOMM串口控件

摘要：在Delphi7.0中安装Spcomm串口通信控件的方法为：选择Delphi7.0的“Component”菜单，点击“Install Component...”菜单项，然后在弹出的Into existing package属性页中Unit file name输人框中选择SPCOMM.pas文件，单击... 阅读全文

posted @ 2015-05-18 14:32 刘继才阅读(1095) 评论(0) 推荐(0) 编辑

delphi安装 Tclientsocket, Tserversocket控件

摘要：菜单component->Install Packets按Add按钮，选择delphi目录里的bin目录下的dclsockets70.bpl(delphi2010是dclsockets140.bpl)，然后TClientSocket和TServerSocket控件就会出现在Internet页上了阅读全文

posted @ 2015-05-15 14:12 刘继才阅读(1508) 评论(0) 推荐(0) 编辑

把 TBytes 转换为十六进制字符串

摘要： 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 刘继才阅读(1427) 评论(0) 推荐(0) 编辑

Delphi 字符数组存入文件

摘要： 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 刘继才阅读(1065) 评论(0) 推荐(0) 编辑

导航

2016年4月13日

2016年1月5日

2015年9月23日

2015年7月29日

2015年6月29日

2015年5月18日

2015年5月15日

2015年4月25日

2015年4月13日