Entwickler-Ecke

Sonstiges (Delphi) - prüfen ob die uhrzeit richtig ist


sintec - Di 08.05.07 13:57
Titel: prüfen ob die uhrzeit richtig ist
Hallo leutz,

wie kann man prüfen ob in einem Editfeld eine reale Uhrzeit eingegeben wurde und wie ob das Format auch stummt (hh:mm)?


FiceGoesDelphi - Di 08.05.07 14:14

Ich weiß das es einen Typ: TDate und TDateTime gibt. Es wird wohl auch ein TTime geben.
Beim TDateTime kann man das Format so bestimmen:


Delphi-Quelltext
1:
2:
3:
4:
ShortDateFormat := 'MM-DD-YYYY'//oder
ShortDateFormat := 'YYYY-DD-MM'//oder
ShortDateFormat := 'MM.DD.YYYY'//oder
ShortDateFormat := 'YYYY.DD.MM';


Dazu muss man ggbnfalls den DateSeperator ändern.


Delphi-Quelltext
1:
2:
DateSeparator := '-'//oder
DateSeparator := '.';


Ähnliches sollte somit auch mit der Uhrzeit gehen!
Ohne Gewähr natürlich :lol:


Narses - Di 08.05.07 14:19

Moin!

TryStrToTime eingeben und F1 drücken. ;)

cu
Narses


FiceGoesDelphi - Di 08.05.07 14:22


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
var
  Zeit: Time;
begin
  ShortTimeFormat := 'hh:mm';
  TimeSeparator := ':';
  Zeit := TryStrToTime(Edit1.Text);
end;


So in der Art hätte ich es gemacht! Vllt hilft es dir ja!


ZeitGeist87 - Di 08.05.07 14:30

gibts nich sowas wie isValidDate() oder war das ne Funktion von mir :gruebel:


FiceGoesDelphi - Di 08.05.07 14:33

user profile iconZeitGeist87 hat folgendes geschrieben:
gibts nich sowas wie isValidDate() oder war das ne Funktion von mir :gruebel:


Ich finde bei mir in Delphi nichts ... :roll:
War wohl eine deiner Funktionen!
Aber würde meins funktionieren? @ Stefan *gg*


ZeitGeist87 - Di 08.05.07 14:37

user profile iconFiceGoesDelphi hat folgendes geschrieben:
user profile iconZeitGeist87 hat folgendes geschrieben:
gibts nich sowas wie isValidDate() oder war das ne Funktion von mir :gruebel:


Ich finde bei mir in Delphi nichts ... :roll:
War wohl eine deiner Funktionen!
Aber würde meins funktionieren? @ Stefan *gg*


hmm weiß nich björn..ich denke mal der rückgabewert is n Boolean :)

LG
Stefan


FiceGoesDelphi - Di 08.05.07 14:39

Wär doch auch zu schön gewesen, wenn ich mal was direkt auf anhieb richtig gemacht hätte ;)
Und langweilig für dich obendrein :lol:


sintec - Do 10.05.07 10:03

user profile iconFiceGoesDelphi hat folgendes geschrieben:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
var
  Zeit: Time;
begin
  ShortTimeFormat := 'hh:mm';
  TimeSeparator := ':';
  Zeit := TryStrToTime(Edit1.Text);
end;


So in der Art hätte ich es gemacht! Vllt hilft es dir ja!



Wo soll das eigentlich hin?


FiceGoesDelphi - Do 10.05.07 10:42

da wo du das prüfen willst!
In ne Button Procedure oder so!


sintec - Do 10.05.07 10:49

Danke es funktioniert super!

Mal ne andere frage: Wie mach ich dass um eine bestimmte Uhrzeit eine Funktion ausgeführt wird?


Narses - Do 10.05.07 11:09

Moin!

user profile iconsintec hat folgendes geschrieben:
Danke es funktioniert super!

Fein, markierst du den Thread dann noch entsprechend, wenn dein Problem gelöst ist? Danke. ;)

user profile iconsintec hat folgendes geschrieben:
Mal ne andere frage:

Andere Frage - anderer Thread! :mahn: Ist Forumsregel. ;)

cu
Narses


Heiko - Do 10.05.07 11:19

user profile iconZeitGeist87 hat folgendes geschrieben:
gibts nich sowas wie isValidDate() oder war das ne Funktion von mir :gruebel:


Müsste eine Funktion von dir sein. Es gibt standardmäßig bei Delphi die Funktion ScanDate, welches wahr oder falsch zurückgibt, aber diese Funktrion ist nicht öffentlich, sondern wird nur in SysUtils u.a. für TryStrToDate genutzt.