TClientsocket soll warten in Thread

**shmia**

Versuch' mal statt einem Sleep:

Delphi-Quellcode:

			WaitForSingleObject(self.Handle {handle of object to wait for},

    30000  {time-out interval in milliseconds }  );

Gegebenfalls musst du noch das Result von WaitForSingleObject auswerten und mit WAIT_TIMEOUT vergleichen.

**Schwedenbitter**

Zitat von shmia:

Versuch' mal statt einem Sleep: ...

oder auch so (edit: OHNE THREAD):

markieren

Delphi-Quellcode:

			Procedure Delay(Zeit: DWord);

Var

   Start         : DWord;

Begin

   Start:=GetTickCount;

   While (GetTickCount - Start) <= Zeit Do

      Application.ProcessMessages;

End;

So mache ich das.

Gruß, Alex

**sirius**

Hast du tatsächlich die Client-Komponente in einem Thread? Wenn ja, dann wird es etwas aufwendiger als bisher beschrieben, ansonsten mache das, was uoeb7gp gesagt hat.

**shmia**

Application.ProcessMessages aus einem Thread heraus - das geht ja mal gar nicht.
Dann werden nämlich Windows-Botschaften aus dem Hautpthread und dem Nebenthread bearbeitet => das verträgt die VCL nicht!

**Schwedenbitter**

Ich hatte bei meiner Antwort den Titel des Themas nicht beachtet.
Ich ging bei der Antwort deshalb davon aus, dass es einfach nur um ein "Warten" ging. Ich habe daher meine Antwort etwas modifiziert!

Gruß, Alex

TClientsocket soll warten in Thread

Re: TClientsocket soll warten in Thread

Re: TClientsocket soll warten in Thread

Re: TClientsocket soll warten in Thread

Re: TClientsocket soll warten in Thread

Re: TClientsocket soll warten in Thread

Forumregeln

shmia Registriert seit: 2. Mär 2004 5.508 Beiträge Delphi 5 Professional	#11 Re: TClientsocket soll warten in Thread 20. Nov 2009, 16:04 Versuch' mal statt einem Sleep: markieren Delphi-Quellcode: WaitForSingleObject(self.Handle {handle of object to wait for}, 30000 {time-out interval in milliseconds } ); Gegebenfalls musst du noch das Result von WaitForSingleObject auswerten und mit WAIT_TIMEOUT vergleichen. Andreas
	Zitat

Schwedenbitter Registriert seit: 22. Mär 2003 Ort: Finsterwalde 622 Beiträge Turbo Delphi für Win32	#12 Re: TClientsocket soll warten in Thread 25. Nov 2009, 08:59 Zitat von shmia: Versuch' mal statt einem Sleep: ... oder auch so (edit: OHNE THREAD): markieren Delphi-Quellcode: Procedure Delay(Zeit: DWord); Var Start : DWord; Begin Start:=GetTickCount; While (GetTickCount - Start) <= Zeit Do Application.ProcessMessages; End; So mache ich das. Gruß, Alex Alex Winzer
	Zitat

sirius Registriert seit: 3. Jan 2007 Ort: Dresden 3.443 Beiträge Delphi 7 Enterprise	#13 Re: TClientsocket soll warten in Thread 25. Nov 2009, 09:24 Hast du tatsächlich die Client-Komponente in einem Thread? Wenn ja, dann wird es etwas aufwendiger als bisher beschrieben, ansonsten mache das, was uoeb7gp gesagt hat. Dieser Beitrag ist für Jugendliche unter 18 Jahren nicht geeignet.
	Zitat

shmia Registriert seit: 2. Mär 2004 5.508 Beiträge Delphi 5 Professional	#14 Re: TClientsocket soll warten in Thread 25. Nov 2009, 13:20 Application.ProcessMessages aus einem Thread heraus - das geht ja mal gar nicht. Dann werden nämlich Windows-Botschaften aus dem Hautpthread und dem Nebenthread bearbeitet => das verträgt die VCL nicht! Andreas
	Zitat

Schwedenbitter Registriert seit: 22. Mär 2003 Ort: Finsterwalde 622 Beiträge Turbo Delphi für Win32	#15 Re: TClientsocket soll warten in Thread 25. Nov 2009, 13:49 Ich hatte bei meiner Antwort den Titel des Themas nicht beachtet. Ich ging bei der Antwort deshalb davon aus, dass es einfach nur um ein "Warten" ging. Ich habe daher meine Antwort etwas modifiziert! Gruß, Alex Alex Winzer
	Zitat