String mit ReadMemoryProcess auslesen

[Fridolin Walther]

Dann übergeb den Default String der ausgegeben werden soll doch einfach als optionalen Parameter. Alles andere wäre aufwändiger, fehleranfälliger und meiner Meinung nach kein sonderlich tolles Code Design. Über den optionalen dritten Parameter kannst Du beim Aufruf also einfach 'Offline' mit übergeben und statt nem leeren String wird 'Offline' zurückgegeben.

Delphi-Quellcode:

function ReadWideStringFromProcessMemory(PID : Cardinal; AddressOfString : Cardinal; DefaultString : WideString = '') : WideString; 
var 
  ProcessHandle : THandle; 
  WideCharRead : WideChar; 
  BytesRead : Cardinal; 
begin 
  Result := ''; 
  ProcessHandle := OpenProcess(PROCESS_VM_READ, FALSE, PID); 
  if ProcessHandle <> INVALID_HANDLE_VALUE then 
    begin 
      repeat 
        ReadProcessMemory(ProcessHandle, Pointer(AddressOfString), @WideCharRead, SizeOf(WideCharRead), BytesRead); 
        Inc(AddressOfString, SizeOf(WideCharRead)); 
        Result := Result + WideCharRead; 
      until (Word(WideCharRead) = 0) or (BytesRead <> SizeOf(WideCharRead)); 
      CloseHandle(ProcessHandle); 
    end;
  if Result = '' then Result := DefaultString; 
end;