Dynamiczne tworzenie i eventy

0

Witam

Pytanka dla wiekszosci z was powinno byc proste.

Pytanie :
Tworze dynamicznie komponent,zalozmy SHAPE o jakiejs tam nazwie i wlasciwosciach (wysokosc ,szerokosc) , problem polega na tym ze nie wiem jak przypisac do tego komponentu wlasciwosci eventu (np.: OnMouseDown )

Np : chce zrobic kilka obiektow ktorymi bede poruszal.

0

tworzysz odp procedurke/metode - o takich samych parametrach jak OnMouseDown wpisujesz w nia kod i potem dajesz shape.onmousedown:=twoja_procedurka;

to co zostalo klikniete rozpoznasz po senderze.

0

I jeszcze taka wskazówka - często ludzie się mylą i mówią, że im nie działa. Ten event musi być metodą, czyli musisz zrobić np.

procedure TForm1.ShapeMouseDown(Sender: TObject);

i w TForm1 dodajesz procedure ShapeMouseDown(Sender: TObject);

. To powinno wystarczyć.

1 użytkowników online, w tym zalogowanych: 0, gości: 1