Timeout realisieren

**Dawn87**

Hallo,

wie kann ich in Delphi einen Timeout realisieren?

So hab ich es immer in Visual Basic 6 gemacht:

Delphi-Quellcode:

			Dim nTimeOut As Long

nTimeOut = Timer + 5 '5 Sekunden TimeOut

Do

' tue irgendwas...

Loop Until Timer >= nTimeOut

Gibt es in Delphi vergleichbare Funktionen? Blicke da leider nicht so ganz durch!

Grüße
Stefan

**mkinzler**

Versuchs mit einem TTimer

**Dawn87**

Hallo,

erst einmal vielen Dank für Deine Antwort.

Am liebsten hätte ich eine Lösung ohne das Timer-Control. Hast Du villeicht noch einen Vorschlag.

Grüße
Stefan

**SirThornberry**

Anstelle der "Timer" funktion kannst du "GetTickCount" nutzen. Diese Funktion gibt dir die Millisekunden seit Windowsstart zurück. Anstelle wie bisher "+5" müsstest du dann natürlich "+5000" schreiben da es eben keine sekunden sondern Millisekunden sind.

**Dawn87**

Hallo,

klappt wunderbar. Dankeschön.

Grüße
Stefan

Timeout realisieren

Timeout realisieren

Re: Timeout realisieren

Re: Timeout realisieren

Re: Timeout realisieren

Re: Timeout realisieren

Forumregeln

Dawn87 Registriert seit: 15. Feb 2007 Ort: Lüdenscheid 189 Beiträge Delphi XE5 Professional	#1 Timeout realisieren 16. Feb 2007, 07:52 Hallo, wie kann ich in Delphi einen Timeout realisieren? So hab ich es immer in Visual Basic 6 gemacht: markieren Delphi-Quellcode: Dim nTimeOut As Long nTimeOut = Timer + 5 '5 Sekunden TimeOut Do ' tue irgendwas... Loop Until Timer >= nTimeOut Gibt es in Delphi vergleichbare Funktionen? Blicke da leider nicht so ganz durch! Grüße Stefan
	Zitat

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.851 Beiträge Delphi 11 Alexandria	#2 Re: Timeout realisieren 16. Feb 2007, 07:56 Versuchs mit einem TTimer Markus Kinzler
	Zitat

Dawn87 Registriert seit: 15. Feb 2007 Ort: Lüdenscheid 189 Beiträge Delphi XE5 Professional	#3 Re: Timeout realisieren 16. Feb 2007, 08:05 Hallo, erst einmal vielen Dank für Deine Antwort. Am liebsten hätte ich eine Lösung ohne das Timer-Control. Hast Du villeicht noch einen Vorschlag. Grüße Stefan
	Zitat

SirThornberry (Moderator) Registriert seit: 23. Sep 2003 Ort: Bockwen 12.235 Beiträge Delphi 2006 Professional	#4 Re: Timeout realisieren 16. Feb 2007, 08:14 Anstelle der "Timer" funktion kannst du "GetTickCount" nutzen. Diese Funktion gibt dir die Millisekunden seit Windowsstart zurück. Anstelle wie bisher "+5" müsstest du dann natürlich "+5000" schreiben da es eben keine sekunden sondern Millisekunden sind. Jens Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
	Zitat

Dawn87 Registriert seit: 15. Feb 2007 Ort: Lüdenscheid 189 Beiträge Delphi XE5 Professional	#5 Re: Timeout realisieren 16. Feb 2007, 08:20 Hallo, klappt wunderbar. Dankeschön. Grüße Stefan
	Zitat