MyCity » Pascal » Kako napraviti brojac?

Kako napraviti brojac?

Napisano na dan: 16.1.2006

Kako napraviti brojac?
Sledeća strana Pagination

Idi na vrh

Poslao: 16 Jan 2006 16:23
Idi na vrh
offline
  • Pridružio: 19 Dec 2005
  • Poruke: 110
  • Gde živiš: S one strane Drine gde padaju mine!!!

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!



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Poslao: 16 Jan 2006 17:28
Idi na vrh
offline
  • Srđan Tot
  • Pridružio: 12 Jul 2005
  • Poruke: 2483
  • Gde živiš: Ljubljana

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.



Poslao: 16 Jan 2006 17:31
Idi na vrh
offline
  • Emil Beli
  • Pridružio: 03 Jan 2005
  • Poruke: 2990
  • Gde živiš: Beograd

@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]

MyCity » Pascal » Kako napraviti brojac?

Ko je trenutno na forumu
 

Ukupno su 3945 korisnika na forumu :: 77 registrovanih, 7 sakrivenih i 3861 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 20624 - dana 04 Apr 2026 04:18

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 357magnum, 4. Ozrenska, A.R.Chafee.Jr., alke12, Apok, aramis s, Balvan, bobor, Bobrock1, Bombona, Bumbo, Buzdovan, C-Gun, Cigi, CrveniSolaris, debeli, Dekanovic, Denaya, Despot Đurađ, Doc, draganl, dunavzed, Electron, EVIDENTICAR, famoso, goxin, Helket, hrkaz, Insan, ironcorporal, Joja, Jomini, K a s p e r, K-1A, Kalem, korin911, Kruger, Lepi Jova, ljubsz, marko79, metallac777, Miki 24pbr, milenko crazy north, milos.cbr, milutin134, mkukoleca, narandzasti, nazgul75, Nikolajevic, obsc, OKT, operniki, Oscar, pablojepao, Paklenica, pceklic, Polemarchoi, Prečanin30, procesor, Rebel Frank, sale_bih, samipag822, shaja1, Sharpshooter, Singidunumac, Sićko, Stevan Visoki, stibium51, Tester, Tumansky, uruk, Vanderx, vathra, VonDrobac, zillbg, zlaya011, Zorge