Nedtælling...

Tags:    delphi

Hej!
Hvordan kan jeg lave en nedtælling i Delphi?
Altså hvor jeg skriver i en TEdit, hvad den skal tælle ned fra i minutter, og få den til at tælle ned i skunder.
Ikke nok med det skal den hver 5. minut skrive en besked.
(Kan sel ordne det med beskeden, men ikke at den skal komme hvert 5. minut :P)

Nå meen.
Spørg endelig, og..
Delphi 6 :D



9 svar postet i denne tråd vises herunder
3 indlæg har modtaget i alt 3 karma
Sorter efter stemmer Sorter efter dato
prøv med en interval kommando, sæt interval objectet på og sæt den til værd sekund at skrive TEdit.text =: TEdit.text-1
eller noget i den retning :P




I en timer med et intervald på 1000 skriver du:

edit1.text := inttostr(edit1.text)-1;

(Har ikke lige tjekket koden)
I edit1's text skriver du så 60!
Hvis du vil have den til at stoppe hved 0 så lav en if else sætning i timeren sammen med overstående kode! Let ;)



ved ikke om du kan bruge dette til noget: http://delphiforfun.org/Programs/Delphi_Techniques/Countdown%20Timer%20Demo.htm



Jeg er ikke specielt god til delphi ;)
Og desuden kan man ikke skrive tal i en edit, uden at have en IntToStr (eller noget) på.
Men ved ikke hvordan?
Er der ikke en der kan komme med lidt kode?



I en timer med et intervald på 1000 skriver du:

edit1.text := inttostr(edit1.text)-1;

(Har ikke lige tjekket koden)
I edit1's text skriver du så 60!
Hvis du vil have den til at stoppe hved 0 så lav en if else sætning i timeren sammen med overstående kode! Let ;)



Okay ;)
Men hvordan gør man sådan, at når tiden er gået kan man fx.
skrive CoolTrayIcon1.ShowBalloonHint();, når tiden er gået, og også skrive det hvert femte minut, når altså den er aktiveret?



Og hvad mener du med If og Else?

Hvordan skal jeg placere dem?



Er det virkelig helt umuligt?



Er altså ikke så god til engelk :D

Er trodsalt kun 11 :|



t