Zitat von
Snoop007:
ich will nicht die funktion ins ereignis onclick packen, da die komponenten zur laufzeit erzeugt werden
Und was hindert dich daran ein OnClick-Ereignis der zur laufzeit erzeugten Komponente zuzuweisen?
Delphi-Quellcode:
procedure TForm1.MyCompClick(Sender: TObject);
begin
if Sender = ...
end;
...
begin
MyComp := TMyComp.Create(Owner);
MyComp.OnClick := MyCompClick;
end;
Code-Tags gefixt- Luckie