Achso, naja ich habs gerade noch in der Registry gefunden unter: \Software\Microsoft\Windows\Shell\Bags\1\Desktop. Da gibts einen Schlüssel, der das binär speichert. Ich wollte jetzt eigentlich nur kurz ein Programm schreiben, welches den Schlüssel sichert, und später wiederherstellt. Das läuft auch, erstellt ein Datei... aber die ist leer. Kann mir jemand sagen warum?
Code:
procedure TForm1.saveRegistryKey();
var regist: TRegistry;
begin
regist := TRegistry.Create;
try
regist.RootKey:=HKEY_CURRENT_USER;
if regist.KeyExists(lbledtpath.Text) then ShowMessage('Schlüssel existiert');
regist.OpenKey(lbledtpath.Text, False);
regist.SaveKey(lbledtpath.Text,lbledtsavepath.Text+'\reg');
ShowMessage('Key "' + lbledtpath.Text + '" wurde erfolgreich in "'+lbledtsavepath.Text+'" gespeichert!');
finally
regist.free;
end;
end;
In dem ersten label steht \Software\Microsoft\Windows\Shell\Bags\1\Desktop drin und im Zweiten einfach ein Speicherpfad.