Das hier (aus der delphi-help):
Delphi-Quellcode:
function GetRegistryValue(KeyName: integer): integer;
var
Reg: TRegistry;
begin
Reg := TRegistry.Create(KEY_READ);
try
Reg.RootKey := HKEY_LOCAL_MACHINE;
// false, weil kein Eintrag erzeugt werden soll, sofern er nicht vorhanden ist.
Reg.OpenKey('Software\Microsoft\Windows\...', True);
Result := Reg.ReadInteger('Name');
finally
Reg.Free;
end;
end;
macht keine compillerfehler (aber wie kan ich die einsetzen?)
Es gab da ja noch ne möglichkeit:
Delphi-Quellcode:
procedure TForm1.ButonClick(Sender: TObject);
var
Reg: TRegistry;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_CURRENT_USER;
Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Policies\System', True);
Reg.WriteString('Name', ParamStr(0));
Reg.CloseKey;
finally
Reg.Free;
end;
end;
Aber da is
Reg.WriteString('Name', ParamStr(0));
im weg, aber ich wollte:
Reg.WriteInteger('Name', ParamInteger(0));
Aber da funzt ParamInteger nich !
