Flat Checkbox

[JnZn558]

hallo,

Ich moechte gern so ne checkbox ohne viereck rechts neben caption und mit dem hovereffekt von toolbarbutton, gibt es schon ein passende komponente, und wenn schon wie muss ich dann denn eigentschaften einstellen, oder muss ich alles selber machen???

[DarkItachi]

Wenn ich dich recht verstehe?

Könntest du nicht einfach einen SpeedButton mit dem Attribut Flat auf True gesetzt benutzen und darauf ein Häkchen als Glyph laden wenn gescheckt.

Als function könnte man dann nehmen:

Delphi-Quellcode:

function BtnChecked(aSpeedButton: tspeedbutton): Boolean;
begin
 With aSpeedButton do
  if Glyph= nil then Result:= False else Result:= True;
end;

procedure Tform.SpeedButtonKlick(sender: Tobject);
begin
 If SpeedButton.Glyph= nil then SpeedButton.Glyph.LoadFromFile('a.bmp') else SpeedButton.Glyph:= nil;
end;

//Anwendung
if BtnChecked(SpeedButton) then...

Sry, wenn ich falsch verstanden habe, oder wenn es nicht funktioniert. Habe den gerade einfach mal geschrieben! ^^ (!nicht getestet!)

[JnZn558]

danke sehr, sieht ganz gut aus

[DarkItachi]

kein Problem..
Ich weiß das ein Toolbar Btn einen anderen Hover Effekt hat, aber die sind eigentlich fast ähnlich..

Mit Photoshop habe ich hier eine gute CheckBox Grafik gemacht: (gerippt) --> Siehe Anhang
Vielleicht hilft sie dir? :wink: