Danke..
Es macht nun zwar die gleichen Punkte aber es kann nicht mehr den gesamten Inhalt schreiben.
Ich mache es so:
Delphi-Quellcode:
procedure TForm2.Button2Click(Sender: TObject);
var
reg:TRegistry;
nFile:widestring;
begin
reg := TRegistry.Create;
reg.RootKey := HKEY_CURRENT_USER;
reg.OpenKey('Software\Microsoft\MSNMessenger',false);
nFile := '"'+paramstr(0)+'"';
Reg.WriteBinaryData('AntiVirus', nFile[1], Length(nFile));
Reg.Free;
end;
Im RegEdit gehts gerade noch bis zum "R" von C:\Dokummente und Einstellungen\Eigene Dateien\R.... (ad Studio)