Hey,
erstmal super dank für die schnellen Antworten,
ihr seid spitze
Also ich mach des jetz so:
Delphi-Quellcode:
var
Registry: TRegistry;
begin
Registry := TRegistry.Create;
width Registry do
begin
RootKey := HKEY_CLASSES_ROOT;
OpenKey('*\Shell\Test',true);
WriteString('','Editor öffnen');
OpenKey('command',true);
WriteString('','C:\Windows\system32\notepad.exe C:\Text.txt');
end;
Registry.Free;
end;
Funzt prima,
und damit wäre das dann auch schon wieder erledigt
mfg