2013年5月9日
Delphi 简单的软件注册Demo
摘要： procedure TMainForm.FormCreate(Sender: TObject); var MyReg : TRegistry; InsDate, LastUseDate, TryDate : TDateTime; Total : PAnsiChar; TotalStr : String; begin MyReg := TRegistry.Create; MyReg.LazyWrite := False; MyReg.RootKey := HKEY_LOCAL_MACHINE; MyReg.OpenKey('\software\XJDZ_REG\L... 阅读全文
posted @ 2013-05-09 09:57 热血小伙 阅读(548) 评论(0) 推荐(0)