Button Fkus verstecken nach klick?

[Pseudemys Nelsoni]

hoi,

wie krieg ich nach nem buttonclick die gestrichelte linie weg? also so das er nicht markiert ist

[MrKnogge]

gib doch einfach irgend nem anderen Objekt den Fokus !?

[Pseudemys Nelsoni]

welchem denn? ich hab nur buttons auf der form

btw: während des klicks soll die linie ja auch nicht da sein

[MrKnogge]

Hau ein Panel auf die Form, "BevelOuter" auf bvNone stellenund folgenden Code benutzen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Panel1.SetFocus;
end;

Aber Borland bzw. MS hat sich schon was dabei gedacht, das man sieht wo der Fokus ist...

[Pseudemys Nelsoni]

danke

[Mario]

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ActiveControl := NIL;
end;

Könnte auch tun, aber nicht getestet.

[Robert_G]

Die simpelste Lösung wäre doch ein TSpeedButton, oder?