随笔分类 - Delphi
delphi学习资料很少,纯靠自学每个东西都要琢磨半天,这里讲我的学习过程记录一下,方便以后查阅。
摘要:procedure AutoRunOnSystemStart(Title, FileName: String);const _Software_Microsoft_Windows_CurrentVersion_Run_ : string = '\Software\Microsoft\Windows\...
阅读全文
摘要:创建一个自己的服务程序:File -> New -> Other -> New(选项) -> ServiceApplication 这样delphi会自动生成服务程序的框架。保存合适的项目名称。(这里单元名为UnitServer.pas, 工程名为ProjectServer.dpr)在新建的服务里,...
阅读全文
摘要:我之前是想在ListBox的每个Item上添加一个图片,Item上所有的内容都是放在Object里赋值,结果发现加载一百条记录耗时四五秒:procedure TMainForm.AddItem;var o : TListBoxItem; o1 : TFrm;begin o := TListB...
阅读全文
摘要:uses DateUtils;varS1, S2: string;T1, T2: TDateTime;D, H, M, S: Integer;Value: Int64;beginS1 := '2015/09/23 15:44:50';S2 := '2013/09/22 16:47:51';T1 :=...
阅读全文
摘要:用法:uses Superobject, Sperjsondelphi里有json单元。procedure TForm2.SuperObjectClick(Sender: TObject);var str: string; jo1: ISuperObject;begin jo1 := SO('...
阅读全文