|
Poslao: 22 Apr 2007 16:33
|
offline
- N1k0l4
- Prijatelj foruma
- 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
|
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
|
offline
- N1k0l4
- Prijatelj foruma
- 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
|
offline
- loshmi_sr
- Građanin
- 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
|
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
|
offline
- LittleHacker
- Ugledni građanin
- 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
|
offline
- N1k0l4
- Prijatelj foruma
- 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
|
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
|
offline
- srdjos
- 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
|
offline
- Srki_82
- Moderator foruma
- 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.
|
|
|
|
|
|
