Einzelnen Beitrag anzeigen

Sfaizst

Registriert seit: 16. Jun 2008
33 Beiträge
 
#9

Frage geklärt, danke für eure Hilfe

  Alt 11. Feb 2009, 22:04
Hallo,

Danke für dei Infos und eurer Hilfe, nach 3 Stunden dauerdenken hab ichs doch endlich kapiert, was ihr mir genau erzählt habt, so einige msdn und google zeilen hatts auch noch gekosted, aber dankeschön

Falls interesse an der Source besteht:

Delphi-Quellcode:

begin
[...]
  ChatPointer := VirtualAllocEx(pidHandle,0,62,(MEM_RESERVE or MEM_COMMIT), PAGE_READWRITE);
  WriteProcessMemory(Pidhandle,ChatPointer,@WriteStr,Length(ChatStr)+1,Write);
  hThread := CreateRemoteThread(Pidhandle,nil,0,VPointer,ChatPointer,0,TID);
   if hThread <> 0 then
    begin
     WaitForSingleObject(hThread, INFINITE);
     VirtualFreeEx(pidHandle, ChatPointer, 0, MEM_RELEASE);
    end Else
     VirtualFreeEx(pidHandle, ChatPointer, 0, MEM_RELEASE);
end;
Schönen Abend

Mit freundlichen Grüßen

Sfaizst
  Mit Zitat antworten Zitat