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 979 korisnika na forumu :: 78 registrovanih, 8 sakrivenih i 893 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: 100jan, aleksmajstor, babaroga, bavar357, bojanstros9, Boxy, cavatina, deLacy, Denaya, djboj, djuradj, draganl, dukajov, Flashburn, FOX, GandorCC, Hardenberg, Haris, Igritelj, jodzula, Jose, kendzo-andzo-boni-fju, kori, Koča, Lieutenant, ljubsz, loon123, lucko1, luka1978, Major91, Malahit, Marko Marković, Marko1238, marko308, marsovac 2, mercedesamg, Mercury, metallac777, Metanoja, Milan A. Nikolic, mile33, mist-mist, moldway, nebidrag, nebkv, nekdo, nenad81, pceklic, Petarvu, pisac12, Podljub, Povratak1912, probisic, Prometeus, przemo, R_038, raptorsi, RILE-NS, Romibrat, Rothmans, Shajlok, Srky Boy, sspp, Str2022, Strasni JA, SympathyForTheDevil, synergia, tecataki, timok019, Timočka Divizija, Tribal, Tvrtko I, vathra, vensla, vukan0799, W123, YugoSlav, Zorge