MyCity » Pascal -> Delphi » Timer komponenta

Timer komponenta

Napisano na dan: 22.4.2007
1

Timer komponenta
Sledeća strana Pagination

Idi na vrh

Poslao: 22 Apr 2007 16:33
Idi na vrh
offline
  • Software developer
  • Pridružio: 06 Sep 2005
  • Poruke: 3800
  • Gde živiš: Beograd

Pozdrav
Potreban mi je jedan primer, recimo da se klikom na dugme “menjaj” na svaki sekund promeni boja nekoj figuri, odnosno da trepce, recimo plava i crvena, nebitno skroz….
figura je iz shape komponente. recimo krug.
Potrebno je da se uradi preko timer komponente. Da li se taj kod kuca klikom na action u timer komponenti ili na button action? I kako bi izgledao taj kod?

Hvala.



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Poslao: 22 Apr 2007 16:52
Idi na vrh
offline
  • Pridružio: 24 Feb 2007
  • Poruke: 167
  • Gde živiš: Babusnica

Kuca se u action u timeru. Ali on treba da bude neaktivan (Enabled=False)
Pa klikom na dugme promenis ga u true kako bi se aktivirao preko klika na button.



Poslao: 22 Apr 2007 17:07
Idi na vrh
offline
  • Software developer
  • Pridružio: 06 Sep 2005
  • Poruke: 3800
  • Gde živiš: Beograd

znaci u action u timeru kucam
timer1.enabled=false;
A kako da obezbedim menjanje boja klikom na dugme?
Znaci kad kliknem na dugme idem ovo opet samo stavim na true, pa sta dalje da radim?
i da li u action-u u timeru treba da kucam i nesto poput ovog
btmenjajclick(sender); ta sam video negde u primeru

Poslao: 22 Apr 2007 17:17
Idi na vrh
offline
  • Pridružio: 08 Jan 2007
  • Poruke: 279
  • Gde živiš: Srbija

... procedure TForm1.Timer1Timer(Sender: TObject); begin  if Shape1.Brush.Color = clRed then   Shape1.Brush.Color:= clWhite  else   Shape1.Brush.Color:= clRed; end; ...
Sad iskombinauj sa Enabled.

Poslao: 22 Apr 2007 17:31
Idi na vrh
offline
  • Pridružio: 24 Feb 2007
  • Poruke: 167
  • Gde živiš: Babusnica

Loshim-sr ti je dao kod sada samo obezbedi da se klikom na dugme startuje to jest u onclick da timer dobije vrednost true.

Poslao: 22 Apr 2007 17:53
Idi na vrh
offline
  • Pridružio: 13 Apr 2007
  • Poruke: 452
  • Gde živiš: Beograd

To uradi na ovaj nacin

Timer1.interval := 1000;  // ovo ce ti se menjati na 1 sekund tj.1000 us OnTimer1.Timer do begin {neki kod} end;

Timer1 interval je brzina osvezavanja slike(dogadjaja) , a OnTimer1.Timer
je sta se desava kada se podaci osveze...........

Dopuna: 22 Apr 2007 17:53

Neslusaj Licanina jer nije nista reko kako treba...........(nisam nikog hteo da uvredim)

Poslao: 22 Apr 2007 17:57
Idi na vrh
offline
  • Software developer
  • Pridružio: 06 Sep 2005
  • Poruke: 3800
  • Gde živiš: Beograd

Hvala.
Pravio sam simulaciju semafora, i sve sam kucao na dugme simuliraj , tu sam kucao akciju, a u stvari treba u timer-u, a ovamo samo da stavim na enabled.
Hvala vam, sad radi.

Dopuna: 22 Apr 2007 17:57

Naprotiv, ovo sto je Licanin1990 napisao, radi.

Poslao: 22 Apr 2007 18:25
Idi na vrh
offline
  • Pridružio: 24 Feb 2007
  • Poruke: 167
  • Gde živiš: Babusnica

@LittleHacker
Cilj ovog foruma je da pomogne u resavanju odredjenih problema ali ne i da resis potpuno problem. Onaj ko postavi neki problem, treba da shvati kako i sta radi neki deo koda. A kako bi lakse to uspeo nego da sam pokusava uz neku malu pomoc.

Poslao: 22 Apr 2007 21:52
Idi na vrh
offline
  • srdjos  Male
  • Zaslužni građanin
  • Pridružio: 27 Sep 2005
  • Poruke: 678

cuvaj se malo timera kod tih stvari
timer radi u posebnom thread-u

Poslao: 22 Apr 2007 22:11
Idi na vrh
offline
  • Srđan Tot
  • Am I evil? I am man, yes I am.
  • Pridružio: 12 Jul 2005
  • Poruke: 2483
  • Gde živiš: Ljubljana

Timer NE RADI u posebnom threadu. Timer koristi WM_TIMER poruku i ona se obradjuje u istom threadu u kojem je TTimer komponenta kreirana.

TTimer ne kreira nikakav nov thread.

MyCity » Pascal -> Delphi » Timer komponenta

Ko je trenutno na forumu
 

Ukupno su 1049 korisnika na forumu :: 37 registrovanih, 6 sakrivenih i 1006 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: amaterSRB, Arahne, bigfoot, Brana01, brundo65, cenejac111, crnitrn, damirZR, Darko8, darkojbn, draganl, dzoni19, flash12, Goran 0000, goxin, Joja, Kriglord, Kubovac, kunktator, kybonacci, Lucije Kvint, Mercury, Mi lao shu, Mihajlo, milenko crazy north, nebidrag, nikoladim, operniki, Romibrat, saputnik plavetnila, sombrero, Srle993, tubular, vladas87, voja64, vukovi, zixmix