Forum: Win32/Win64 API (native code)
Delphi
by eragon123,
21. Dez 2010
Bei mir steht mit gleichem Code was anderes: Das System kann die angegebene Datei nicht finden. Keine Wunder... laut Beschreibung soll sie ja auch nicht existieren...was sie bei mir auch nicht tut.
Forum: Win32/Win64 API (native code)
Delphi
by eragon123,
21. Dez 2010
Naja danke... aber das hilft uns auch nicht weiter oder? Die Frage ist ja eigentlich, wie ich die Datei jetzt speichern kann ;).
Forum: Win32/Win64 API (native code)
Delphi
by eragon123,
21. Dez 2010
Openkey geht. if regist.OpenKey(lbledtpath.Text, False) then ShowMessage('Öffnen geht'); zeigt die Nachricht.
Forum: Win32/Win64 API (native code)
Delphi
by eragon123,
21. Dez 2010
procedure TForm1.saveRegistryKey();
var regist: TRegistry;
begin
regist := TRegistry.Create(KEY_ALL_ACCESS);
try
regist.RootKey:=HKEY_CURRENT_USER;
if regist.KeyExists(lbledtpath.Text) then ShowMessage('Schlüssel existiert');
regist.OpenKey(lbledtpath.Text, False);
if regist.SaveKey(lbledtpath.Text,lbledtsavepath.Text+'\reg') then
ShowMessage('Key "' +...
Forum: Win32/Win64 API (native code)
Delphi
by eragon123,
21. Dez 2010
Ok habs in das hier geändert:
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);
Forum: Win32/Win64 API (native code)
Delphi
by eragon123,
21. Dez 2010
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?
procedure...
Forum: Win32/Win64 API (native code)
Delphi
by eragon123,
21. Dez 2010
Muss ja auch nicht umbedingt in Java sein. Delphi ist ja auch nicht schlecht. Wie heißt denn das Programm? Finde da in der List auf den ersten Blick nichts passendes. PS Habs gefunden ;)
Das hier scheint ja das zu sein, was die Icons findet:
function GetDesktopIconInfo: TDesktopIconInfoArray;
var
ListView : HWND;
ProcessId : DWORD;
Process : THandle;
Size...
Forum: Win32/Win64 API (native code)
Delphi
by eragon123,
21. Dez 2010
Mein Problem ist das Windows immer mal wieder gerne Icons auf meinem Desktop nach einem Neustart verschiebt. Das nervt! (um es mal kurz und knackig auszudrücken ;) ).
Daher wollte ich mir ein Programm schreiben, welches sich die Positionen merkt und dann wiederherstellt. Dabei sollte er sich Icons und die Windows 7 "Apps" aus der Seitenleiste merken können.
Was natürlich auch ganz cool wäre wär...