Ich muss diesen Effekt aber bei 15 weiteren Panels machen, muss ich diese Procdure bei allen anderen Panels übenehmen? :O
procedure TForm5.Panel11Click(Sender: TObject);
begin
Panel11.Color :=
RGB(195,195,195);
delay(280);
Panel11.Color := clWhite;
end;