Autor Beitrag
Fluffy19
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 19



BeitragVerfasst: Sa 28.03.09 22:44 
Ich möchte gerne das aktuelle systemdatum abfragen und dann ein OnDate Event machen.

bei www.gidf.de habe ich nichts gefunden, deshalb frage ich jetzt einfach mal hier.
JayEff
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 2971

Windows Vista Ultimate
D7 Enterprise
BeitragVerfasst: Sa 28.03.09 22:59 
user profile iconFluffy19 hat folgendes geschrieben Zum zitierten Posting springen:
Ich möchte gerne das aktuelle systemdatum abfragen
ausblenden Delphi-Quelltext
1:
2:
3:
4:
var
  x : TDateTime;
begin
  x := Now;
:mrgreen:

user profile iconFluffy19 hat folgendes geschrieben Zum zitierten Posting springen:
und dann ein OnDate Event machen.
Wie meinst du das? Du hast eine Komponente, die, sobald's "Morgen" wird, ein Event feuert? Nun, ich würde sagen, man kann mit dieser Delay-Funktion einen Thread solange warten lassen, bis es Morgen ist, also im Konstruktor der Komponente oder Klasse die du bauen willst wird gefragt, wieviel Uhr es ist (siehe "Now" ;) ), dann berechnest du, wie lange gewartet werden muss, und der Thread wird gestartet. Aber ich kenne mich absolut nicht mit Threads in Delphi aus, darum bitte vorerst mal alle meine Sätze in denen "Thread" vor kommt mit vorsicht genießen ;)

_________________
>+++[>+++[>++++++++<-]<-]<++++[>++++[>>>+++++++<<<-]<-]<<++
[>++[>++[>>++++<<-]<-]<-]>>>>>++++++++++++++++++.+++++++.>++.-.<<.>>--.<+++++..<+.
Fluffy19 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 19



BeitragVerfasst: Sa 28.03.09 23:07 
ich könnte es ja auch mit if machen, das Problem ist nur, ich weiß nicht in welcher Form Date vorliegt.

bzw: wie mache ich if Date=???
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 19346
Erhaltene Danke: 1754

W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
BeitragVerfasst: Sa 28.03.09 23:32 
Das Datum, mit dem du vergleichen willst, muss ja irgendwoher kommen. Zum Beispiel aus einem Editfeld:
ausblenden Delphi-Quelltext
1:
if Trunc(now) = Trunc(StrToDate(Edit1.Text)) then					
Und mit DaysBetween in der Unit DateUtils kannst du die Anzahl der Tage zwischen zwei Daten berechnen, etc., in der Unit gibt es noch viele nützliche Routinen, schau dir einfach die Namen an.
Fluffy19 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 19



BeitragVerfasst: So 29.03.09 00:01 
danke, jetzt klappt es