onClick + onDoubleClick

[DeddyH]

Das wolltest Du doch, oder nicht?

Delphi-Quellcode:

procedure TForm1.Panel2Click(Sender: TObject);
begin
  ShowMessage((Sender as TPanel).Name);
end;

Weis das mal allen Panels zu und probier es aus.

[yasR]

nein..soll nicht für alle Panels sein.
Panel2 soll durch onClick und DblClick die selbe Procedure aufrufen und das selbe auch mit Panel3, Panel4 etc. .
Also nur die Procedure von onClick u. DlbClick eines bestimmten Panels sind gleich ;-)

[DeddyH]

OK, aber die kannst Du doch auch auf eine Routine je Panel beschränken und diese dann doppelt zuweisen.

[yasR]

Okay ;-) werd ich dann so machen ^^