若用编程的方法
用API函数更改注册表就行了
用API函数更改注册表就行了
解决方案 »
- 关于消息的问题
- 谁能告诉我这句话什么意思?TstringGrid(DBGrid1).fixedcols:=3;
- delphi中text控件中字符型转换成整型函数用什么方法啊!?我急,我在线!
- 请开发过DELPHI软件的回答
- 想买学Delphi的书,大家给点意见
- 关于透明窗体的问题,请帮帮忙.
- 一个小问题如何把DBGRID的每个字段长度固定住,不随实际表中的长度变化而变化
- 送分问题——listview使用了imagelist设置了图标,如何使得item被选中时相应的图标颜色不变呢?
- 在Table中用filter过滤,如何使两个过滤条件结合起来???
- 谁能给我一个好的答复?(http://www.csdn.net/expert/topic/169/169121.shtm)
- 怎样将windows的登录网络对话框去掉,换成我的定制对话框?60分求助!
- 在Delphi的数据库编程中如何对Graphic数据类型赋值
uses
Registry;
//...
var
vRegistry: TRegistry;
vExtDescription: string;
begin
vRegistry := TRegistry.Create;
vRegistry.RootKey := HKEY_CLASSES_ROOT;
if vRegistry.OpenKey('.Zip', False) then begin
vExtDescription := vRegistry.ReadString('');
vRegistry.OpenKey('\' + vExtDescription, False);
vRegistry.OpenKey('DefaultIcon', False);
vRegistry.WriteString('', '<WinZip的程序地址,图标索引>');
end;
vRegistry.Free;
end;
//...//注销Windows
就可以了