Panel Klick in aufgerufenem Formular abfragen

[Helmi]

Zitat von Sir Rufo:

Delphi-Quellcode:

procedure TCallingForm.FormCreate( Sender: TObject );
begin
  FSubForm := TSubForm.Create( Self );
  FSubForm.Panel1.OnClick := SubFormPanel1Click;
end;

procedure TCallingForm.SubFormPanel1Click( Sender: TObject );
begin
  // Do whatever
end;

ist aber ned schön - dafür selten...