2013年4月27日
摘要: 关键技术是获取版本号功能和批处理删除自身的功能unit UnitUpG;interfaceuses Forms, Windows, SysUtils, Classes, Controls, URLMON, SHellAPi, iniFiles, Tlhelp32; procedure UpGrade; procedure KillExe;var SName:String; UpGradeB:Boolean;type TLANGANDCODEPAGE=record wLanguage,wCodePage:Word;end; PLANGANDCODEPAGE=^TLANGANDCODEPAGE;t 阅读全文
posted @ 2013-04-27 19:40 为人民服务 阅读(1627) 评论(0) 推荐(0) 编辑
摘要: 本人今天把自已以前的一些delphi编程经验进行个小总结,总结完后突有一个 这样的想法:如果我把这些总结发给网上的delphi朋友,而他们如果也有些自已 的delphi编程小结,也发给我(如果愿意的话),这样大家的进步肯定是很快的。 本人email:yesterday97@hotmail.com (1).按下ctrl和其它键之后发生一事件。 procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin... 阅读全文
posted @ 2013-04-27 19:38 为人民服务 阅读(319) 评论(0) 推荐(0) 编辑