[Delphi] Problem ze zdarzeniem...

Witam!
Mam pewien problem. Czy wie ktos jak zrobic, aby po np. setnym kliknieciu w button pojawial sie ShowMessage?

---

daj zmienną x: byte;
w onclick dawaj

Inc(x);
if x = 100 then
begin
ShowMessage('kliknąłeś 100 razy');
x := 0; //naliczanie od nowa
end;


Witam!
Mam pewien problem. Czy wie ktos jak zrobic, aby po np. setnym kliknieciu w button pojawial sie ShowMessage?

http://forum.ks-eksp...showtopic=24811

zanotowane.pl

doc.pisz.pl

pdf.pisz.pl

zsf.htw.pl