Thema: Delphi NetSend + Multithread

Einzelnen Beitrag anzeigen

Benutzerbild von Piro
Piro

Registriert seit: 14. Jul 2003
Ort: Flintbek
810 Beiträge
 
Delphi XE2 Professional
 
#3

Re: NetSend + Multithread

  Alt 18. Okt 2007, 15:44
Man braucht das für einen Domänenrundruf. Früher haben wir das mit dem Dos Befehl gemacht. Jetzt sind wir Teil einer großen Domäne und in einer bestimmten OU und so können wir den Dos Befehl nicht mehr verwenden, da es sonst an alle geht.

TFNThreadStartRoutine habe ich mal gegooglet aber da ich mich überhaupt nicht damit auskenne, weiß ich gar nicht, wonach ich schauen soll, warum es nicht geht.

Habe meine Code einwenig verändert:
Delphi-Quellcode:
ThreadHandle := CreateThread(nil, 0, TFNThreadStartRoutine(NetMessageBufferSendSubstA(Memo1.Lines[i], Memo1.Lines[i], 'User', 'Hallo')), nil, 0, ThreadID);
//wenn der Thread erfolgreich gestartet wurde (ThreadHandle<>0), können wir ThreadHandle wieder freigeben:
if ThreadHandle<>0 then
  CloseHandle(ThreadHandle);
Brauche doch etwas mehr Hilfe bei dem Thema.
  Mit Zitat antworten Zitat