2009年8月13日
delphi和INNO SETUP 文件关联操作
摘要： procedure TForm1.Button1Click(Sender: TObject);var reg: TRegistry;begin reg := TRegistry.Create; reg.RootKey := HKEY_CLASSES_ROOT; {在注册表中添加我们虚拟的 .tst 格式, 并指定默认项的值是 TestFile} reg.OpenKey('.tst', True);... 阅读全文
posted @ 2009-08-13 13:42 苔苔以苔苔以苔 阅读(1783) 评论(0) 推荐(0) 编辑
猪先飞