Registriert seit: 16. Jun 2008
33 Beiträge
|
Frage geklärt, danke für eure Hilfe
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
|
|
Zitat
|