Das Handle ist ungültig

[TiGü]

Zitat von EWeiss:

EDIT:
Schlage mich jetzt mit der Änderung rum.
Durch die Änderung auf GetProcessImageFileNameW habe ich nun Probleme den korrekten Pfad zu Anwendung zu finden um das Icon zu setzen.
Muss diesen Pfad

Zitat:

\Device\HarddiskVolume1\Program Files\Windows Sidebar\sidebar.exe

in einem gültigen umwandeln.

Delphi-Quellcode:

                      SessionControl2.GetProcessId(ProcessId);
                      Writeln('Process ID:                ', ProcessId);

                      ProcessHandle := OpenProcess(PROCESS_QUERY_INFORMATION or PROCESS_VM_READ, False, ProcessId);
                      if ProcessHandle <> 0 then
                      begin
                        if GetModuleFileNameEx(ProcessHandle, 0, ProcessName, MAX_PATH) <> 0 then
                        begin
                          Writeln('ProcessName:               ', ProcessName);
                        end;
                        CloseHandle(ProcessHandle);
                      end;