Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Programmausführung verzögern (Wait) (https://www.delphipraxis.net/139049-programmausfuehrung-verzoegern-wait.html)

Spargeltarzan 22. Aug 2009 02:35


Programmausführung verzögern (Wait)
 
Hallo zusammen

Kann mir jemand sagen, wie man die Programmausführung für 1 Sekunde verzögert, damit eine Prohrammzeile - die zur Abarbeitung - Zeit braucht, beendet ist ?
Kann mas das mit dem Befehl Wait lösen ?

Gruss
Spargeltarzan

Mackhack 22. Aug 2009 02:50

Re: Programmausführung verzögern (Wait)
 
Delay() waere vlt. noch was.

Spargeltarzan 22. Aug 2009 03:12

Re: Programmausführung verzögern (Wait)
 
Hallo

Danke für den Tip, aber in D2 ist Delay nicht bekannt.

Gruss
Spargeltarzan

P.S. oder eine Timerkomponente einfügen ?

Mackhack 22. Aug 2009 03:17

Re: Programmausführung verzögern (Wait)
 
Das koennte helfen!

Delphi-Quellcode:
procedure Delay(dwMilliseconds: Longint);
var
  iStart, iStop: DWORD;
begin
  iStart := GetTickCount;
  repeat
    iStop := GetTickCount;
    Application.ProcessMessages;
  until (iStop - iStart) >= dwMilliseconds;
end;

Dax 22. Aug 2009 03:25

Re: Programmausführung verzögern (Wait)
 
Ich verstehe nicht so ganz, was du eigentlich tun willst. Du willst, dass
Zitat:

Zitat von Spargeltarzan
die Programmausführung für 1 Sekunde verzögert [wird], damit eine Prohrammzeile [...] beendet ist

Aber wie soll das funktionieren? Programme sind inhärent sequentiell. Wenn diese Zeile unabhängig von den anderen läuft, ist sie in einem Thread und nicht weiter beachtenswert aus der Warten-Sicht (du könntest, um auf einen Thread zu warten, Semaphoren oder Mutexe einsetzen), läuft alles in einem Thread, verwendest du wahrscheinlich async I/O. Wenn du auf das Ergebnis solcher Operationen warten willst, solltest du die synchronen Varianten davon benutzen.

Spargeltarzan 22. Aug 2009 03:47

Re: Programmausführung verzögern (Wait)
 
Danke MackHack

Deine Procedure funktionierte ausgezeichnet. hab diese gleich eingebunden in mein Programm. Oder Sprechen Sie Englisch, wie ich Ihrem Profil entnehmen kann. Ich kann ein wenig sprechen und schreiben aber nicht perfekt. Nochmals besten Dank für Deine (Ihre) - ah ja man duzt sich hier ja - Hilfe.

Gruss
Spargeltarzan

Mackhack 22. Aug 2009 03:50

Re: Programmausführung verzögern (Wait)
 
Spreche/Schreibe/Verstehe beides :)

Und ja, wir duzen uns hier (voellig ungezwungen)!

Was soll denn das ganze fertige Programm mal koennen?

Spargeltarzan 22. Aug 2009 04:19

Re: Programmausführung verzögern (Wait)
 
Liste der Anhänge anzeigen (Anzahl: 1)
Ja die Amerikaner sind clever. Ich danke Dir für Deine wie sagt man Cooperation. Anbei hab ich dir ein Screenshot des Programms (Startbildschirm) angehängt. Das Programm besteht hauptsächlich aus einer Datenbank über Holzarten. Abgerundet duurch Zusatzinfos wie Vorkommen, Verwendung, etc. Zusätzlich hab ich noch zusätzliche Rubriken hinzugefügt zum üben für "Holzamfänger". Auch Bilder der Species dürfen dabei nicht fehlen (Holzoberfläche, Baumbild, Blatt-/Blütenbild, etc.)
Jetzt hast Du vielleicht einen kleinen Einblick bekommen. Ist nicht so ein Kracher, aber sehr alltagstauglich und hilfsreich.
Das Quiz (DragDrop_Bsp) ist dabei nur ein kleiner Teil. Also genau genommen das Beispiel, das ich angegeben habe steht für eine Frage. 30 Fragen ergeben dann mein Quiz. Aber das Programm ist so eine Art "open project", denn ich hab erst 867 Datensätze. Und diese sind noch nicht vollständig einegegeben. Zudem fehlen mir noch ein paar Bäume (mit dem zugehörigen Holz).
Ich erweitere das Programm laufend.

Gruss
Spargeltarzan

Mackhack 22. Aug 2009 04:23

Re: Programmausführung verzögern (Wait)
 
Zitat:

Zitat von Spargeltarzan
Ja die Amerikaner sind clever. [...]
Spargeltarzan

Ich bin aber sowas von Ur-Deutsch (Schwabe). Vor 10 Jahren ausgewandert!

Mackhack 22. Aug 2009 04:25

Re: Programmausführung verzögern (Wait)
 
Ziemlich Bunt aber scheint ziemlich viele verschiedene Infos ueber Holz anzuzeigen. Soll das was fuer Azubis werden?


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:53 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz