Tidspunkt

Tags:    delphi

Er det muligt at lave en editbox der hvis hvad klokken er fx 12:31:06 som opdateres hvert sekund så den passer



3 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 3 karma
Sorter efter stemmer Sorter efter dato
Er det muligt at lave en editbox der hvis hvad klokken er fx 12:31:06 som opdateres hvert sekund så den passer


Du kaster en TEdit og en TTimer ind på din form.
I OnTimer eventen for din TTimer skriver du så f.eks:

Edit1.Text := FormatDateTime('HH:NN:SS', now); // Du kan også bruge TimeToStr.

Intervallet på din TTimer skal så være 1000.

Din TEdit vil nu vise klokken og opdaterer den en gang (ca.) i sekundet.

---
Thomas Due
tdue@mail.dk



Kan det måske lade sig gøre med sådan noget her

var uret : String;

begin
Uret := Copy(TimeToStr(now),1,Length(TimeToStr(now))-3);
edit2.Text := uret;
edit3.Text := uret;
if edit3.text = edit2.text
then edit2.Text := uret;

sat et sted der bliver kørt hele tiden eller en gang i minuttet eller noget...



på forhånd tak



Prøv lige at forklare hvad det er du mener ???

- SpeC - #SpeC.DK @ Q-NET



t