![]() |
Schleifenfunktion?
Hallo,
ich brauche eine Art Schleifenfunktion. Dies soll bewirken, dass alle X Stunden (Edit2.text) etwas ausgeführt wird (Button1.Click) Die soll allerdings nur geschehen, wenn ich eine Checkbox angeklickt wurde (checkbox1.ckecked := true). Welche Schleife kann ich da am besten wie nehmen? |
Re: Schleifenfunktion?
TTImer, oder besser als geplanter Task unter Windows
|
Re: Schleifenfunktion?
Zitat:
Ich kann dann des ja einfach als geplanten Task unter Windows eintragen und dann im On Form Create den Buttonclick festlegen. |
Re: Schleifenfunktion?
warum bestehst du unbedingt auf eine schleife?
|
Re: Schleifenfunktion?
Guten Abend,
wenn Du mit Deinem Programm bestimment willst wie oft, oder wann etwas gestartet werden soll, so ist dieser ![]() Grüße Klaus |
Re: Schleifenfunktion?
Wenn ich das nicht mit einer Schleife mache, muss ich ja jedes Mal das Programm neu starten.!?
|
Re: Schleifenfunktion?
Das wird ja von Windows erledigt
|
Re: Schleifenfunktion?
Erzähl doch einmal was Dein Programm machen soll.
Vielleicht können wir Dir da besser helfen? Eine Schleife ist ein denkbar schlechte Wahl um etwas wiederkehrendes, das so weit auseinanderliegt (x Stunden), auszuführen. Da ist ein Timer schon die bessere Alternative. Der Timer hat ein Interval (in ms) das Du entsprechend setzen kannst. Auch kann der Timer ein und ausgeschaltet werden (enabled = true oder false). Da würde dann Deine Checkbox ganz gut passen. Grüße Klaus |
Re: Schleifenfunktion?
Liste der Anhänge anzeigen (Anzahl: 1)
Zitat:
Ich hab es nun mal so gemacht aber iwie stimmt das was nicht.
Delphi-Quellcode:
Ich hab ein Prog (siehe Bild im Anhang) und da soll das so geschehen, das sich alle 3 Stunden Button1 geclickt wird
procedure TfrmMain.CheckBox1Click(Sender: TObject);
VAR stunden, i : longint; begin IF (CheckBox1.Checked = true) THEN BEGIN stunden := StrToInt(Edit2.text); stunden := stunden * 3600000; END; FOR i := 1 TO 2 DO BEGIN Button1.Click; sleep(1000); END; i := i-1; end; |
Re: Schleifenfunktion?
Oh je. Mach einen Windows-Task, der das Programm alle drei Stunden aufruft. Im Programm schließt Du nach dem Klicken das Programm wieder. Somit keine x geöffneten Fenster.
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:04 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz