Einzelnen Beitrag anzeigen

MCQ

Registriert seit: 14. Jan 2004
Ort: Dessau
80 Beiträge
 
#1

erster Versuch mit CreateRemoteThread schlägt fehl :(

  Alt 8. Feb 2006, 13:02
Hi, Ich wollte mich mal näher mit der API CreateRemoteThread auseinandersetzen, allersings stürzt die zielanwendung immer ab sobald icch diese funktion aufrufe. Woran kann das liegen?

Hier mal der aktuelle Code:

Delphi-Quellcode:
procedure Thread;
var s:string;
begin
//MessageBox(0,'test','',0);
s:='test';
end;

procedure TForm1.Button1Click(Sender: TObject);
var hProcess,hRemote:THandle;
    ThreadID:DWORD;
    Flags:Pointer;
begin
hProcess:=OpenProcess(PROCESS_ALL_ACCESS,false,4072);
hRemote:=CreateRemoteThread(hProcess,nil,0,@Thread,nil,0,ThreadID);
if hRemote=0 then showmessage('Error');
end;

Gruß MCQ
  Mit Zitat antworten Zitat