Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Funktion regelmäßig ausführen lassen, aber wie? (https://www.delphipraxis.net/44518-funktion-regelmaessig-ausfuehren-lassen-aber-wie.html)

freak4fun 20. Apr 2005 11:54


Funktion regelmäßig ausführen lassen, aber wie?
 
Hallo,
ich möchte eine Funktion regelmäßig ausführen lassen. Der Benutzer soll selbst einstellen können, ob die Funktion in Zeitabständen(zB alle 2 Stunden), oder zu bestimmten Uhrzeiten ausgeführt werden soll.
Mein problem ist, das mein Projekt aus nur einer .dll besteht. Also kann ich den Timer nicht verwenden. :(

Wie fange ich das also an?

MfG
freak

alcaeus 20. Apr 2005 11:56

Re: Funktion regelmäßig ausführen lassen, aber wie?
 
Zitat:

Zitat von freak4fun
Mein problem ist, das mein Projekt aus nur einer .dll besteht. Also kann ich den Timer nicht verwenden. :(

Dann musst du eben in einer Schleife abfragen, wieviel Zeit seit der letzten Ausfuehrung vergangen ist. Ist die Zeit groesser als das Intervall, dann fuerhst du die Funktion aus.
Ebenso verhaelt es sich mit den fixen Zeiten.

Greetz
alcaeus

glkgereon 20. Apr 2005 11:57

Re: Funktion regelmäßig ausführen lassen, aber wie?
 
kann man nicht trotzdem den timer nehmen?

oder einen thread starten wo ein timer drin ist?

Sanchez 20. Apr 2005 11:57

Re: Funktion regelmäßig ausführen lassen, aber wie?
 
Hallo,
Du könntest einen Thread laufen lassen, der zeitabhängig irgendwelche Funktionen aufruft oder was auch immer. Ein Timer ist aber in einer DLL durchaus verwendbar, vorausgesetzt du hast ein Fenster.

grüße, daniel

SubData 20. Apr 2005 11:58

Re: Funktion regelmäßig ausführen lassen, aber wie?
 
Kann man ... Du musst nur n Datenmodul verwenden und die gehen auch in ner DLL :)

Waldteufel 20. Apr 2005 11:59

Re: Funktion regelmäßig ausführen lassen, aber wie?
 
Hi.

Du könntest es so versuchen:
Delphi-Quellcode:
procedure Ausführen;
var
  Timer : TTimer;
begin
  Timer := TTimer.Create(self);
  Timer.Interval := 10000; // 10 Sekunden
  Timer.Enabled := true;
  Timer.OnTimer := @MachWas;
end;
Mit Sleep bzw. Sleep + Uhrzeit prüfen geht es bestimmt.

Etwas Pseudo-Code:
Code:
while nichtabgebrochen do
begin
  Sleep(5000);
  MachWas();
end;
bzw.
Code:
while nichtabgebrochen do
begin
  Sleep(5000);
  If Now() = 15:00 then MachWas();
end;

Sanchez 20. Apr 2005 12:00

Re: Funktion regelmäßig ausführen lassen, aber wie?
 
Zitat:

Zitat von SubData
Du musst nur n Datenmodul verwenden und die gehen auch in ner DLL :)

Forms gehen auch in DLLs. Problematisch wirds erst bei MDI-Childs.

SubData 20. Apr 2005 12:00

Re: Funktion regelmäßig ausführen lassen, aber wie?
 
Sleep legt aber das ganze Programm lahm, solange es ausgeführt wird (In deinem Beispiel dann 5 Sekunden)

Waldteufel 20. Apr 2005 12:01

Re: Funktion regelmäßig ausführen lassen, aber wie?
 
Hi.

Zitat:

Zitat von SubData
Sleep legt aber das ganze Programm lahm, solange es ausgeführt wird (In deinem Beispiel dann 5 Sekunden)

Da das ganze Programm aber diese 5 Sekunden lang eh nichts tun soll, kann man das vernachlässigen. ;-)

[edit] Er schreibt im Pinzip eine Art Cron-Daemon. Der benutzt im Original auch Sleep, soweit ich weiß ;-) [/edit]

SubData 20. Apr 2005 12:01

Re: Funktion regelmäßig ausführen lassen, aber wie?
 
Zitat:

Zitat von Sanchez
Forms gehen ich in DLLs. Problematisch wirds erst bei MDI-Childs.

Hab ja auch nix anderes behauptet .. ?!
Ich gehe nur mal davon aus, dass er keine Form verwenden will, sonst würde er ja ohne weiteres nen Timer nehmen können :)
Deswegen ja n Datenmodul, da es im Prinzip "unsichtbare" Forms sind...


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:47 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