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 @ 2010-07-29 15:25 浔阳渔夫 阅读(1196) 评论(0) 推荐(0) 编辑