Kako napraviti brojac?

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Kako da napravim program koji ce u label da vrti brojeve (sekunde na primer) i kada dodje na odredjen broj da se zaustavi?
Ako moze neki primer vezan za ovo.

Hvala unapred!

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Za to koristis TTimer komponentu.
Ona ima Interval property koji odredjuje koliko cesto ce se pozivati OnTimer event. Ako postavis Interval na 1000 (vrednost se daje u milisekundama) OnTimer ce se pozivati svake sekunde i tu mozes napisati nesto ovako:
Label1.Caption := IntToStr(StrToIntDef(Label1.Caption, 0) + 1);
Ovo ce povecavati vrednost u Label1.Caption za 1 svake sekunde. Posle samo napravis jedan uslov (npr. if Label1.Caption = '10' then...) kada zelis da prestanes sa brojanjem.

TTimer komponenta ima property Enabled koji oznacava da li ce se OnTimer event uopste pozivati. Kada zelis da se poziva onda Enabled postavis na True, a kada ne zelis (kad zelis da prestanes sa brojanjem) onda ga postavis na False.

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

@Licanin

Nisi poslushao savet i kupio knjigu za delfi. Ovo sto ti pitas su problemi koji se resavaju posle 2 lekcije.
Pazi, nije da ne zelimo da ti pomognemo - naprotiv, ali upadas u onu staru pricu:

"Daj ribu siromahu, nahranices ga danas - nauci ga da peca, nahranio si ga za ceo zivot".

Ako ti i dalje budemo reshavali banalne problemcice, nikad neces nauciti. Kupi kjigu, ili je nadji na net-u, i takodje, prelistaj Google, ima gomila primera.

Pomocicemo ti, ali ako se zaglavis oko nekog problema, kog si pokusao da resis, i posle 2 h razbijanja glave i probavanja, nisi uspeo.
Ovo je previse banalno.

Evo ti par linkova:
[Link mogu videti samo ulogovani korisnici]
[Link mogu videti samo ulogovani korisnici]
[Link mogu videti samo ulogovani korisnici]