Hey, danke für die reichlichen Lösungen, aber kann da leider keine Lösung für mein Problem finden. ^^
PS: Habe mich jetzt für Panels entschieden, da Button ja keine DblClick Event besitzt.
Jedes Panel soll mit der Eigenschaft onClick und DblClick die selbe procedure aufrufen, die einfachste Lösung ist bestimmt diese:
Ich suche allerdings nach etwas besserem
Delphi-Quellcode:
procedure TForm1.Panel1Click(Sender: TObject);
begin
end;
procedure TForm1.Panel1DblClick(Sender: TObject);
begin
end;
procedure TForm1.Panel2Click(Sender: TObject);
begin
end;
procedure TForm1.Panel2DblClick(Sender: TObject);
begin
end;
procedure TForm1.Panel3Click(Sender: TObject);
begin
end;
procedure TForm1.Panel3DblClick(Sender: TObject);
begin
end;
// ..und noch weitere Panels
end.