关于一个写注册表的问题
我有一段程序要把Edit2中的值写到注册表中去
procedure TForm1.Button1Click(Sender: TObject);
var
Reg: TRegistry;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey('\Control Panel\International', False)
then Edit1.Text:=Reg.WriteString('sShortDate',Edit2.Text);
finally
Reg.CloseKey;
Reg.Free;
inherited;
end;
end;
编译时老报错: Incompatible type: 'String' and 'procedure,uptyped pointer or untyped parameter'
我查了TRegistry的WriteString方法,后面的参数是String类型的为什么编译通不过呢?
BTW: inherited在这里有什么用,是必须的吗?