Nevim jestli jsem přesně pochopil o co jde...
1. možnost jak jsem to pochopil
událost přidáš že si vybereš komponentu v object treeview, v object inspectoru dáš záložku events a tam dvakrát klikneš na požadovanou událost
2.možnost
uděláš si vlastní třídu, kterou rozšíříš o požadovanou událost winapi, takže třaba:
pak definuješ tu událost:Kód:type TXimage = class(TImage) protected procedure WMClick(var Msg: TMessage); message WM_LBUTTONDOWN ; end;
a vytvořit někde instanci toho objektu, třeba nějak takhle:Kód:procedure TXimage.WmClick(var Msg: TMessage); begin co se má stát, všechno je v proměnný Msg end;
Kód:with Tximage.Create(self) do begin autosize:=true; Top := 0; Left := 0; Parent := self; Picture.LoadFromFile('c:\\obrazek.bmp'); end;





Odpověď s citací