Delphi-PRAXiS - Delphi TButton "einrasten" lassen

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi TButton "einrasten" lassen (https://www.delphipraxis.net/135766-tbutton-einrasten-lassen.html)

Viktorii

17. Jun 2009 15:24

TButton "einrasten" lassen

Hallo zusammen.

Gibt es eine Möglichkeit einen TButton "einrasten" zu lassen? Soll heißen, wenn ich einmal draufklicke, soll er so aussehen aus wenn er eingerastet ist (So wie wenn man die Maustaste gedrückt lässt)

Beim wiederholten Klicken soll der Button dann wieder normal aussehen.

Vielen Dank.

iKilledKenny

17. Jun 2009 15:25

Re: TButton "einrasten" lassen

Versuch mal TSpeedButton und seine Property Down.

Viktorii

17. Jun 2009 15:46

Re: TButton "einrasten" lassen

Habe mal im OnClick OnMouseDown und im OnMouseUp-Event folgendes eingefügt:

Delphi-Quellcode:

SpeedButton4711.Down := TRUE;

Bringt aber leider nix :(

Bernhard Geyer

17. Jun 2009 15:48

Re: TButton "einrasten" lassen

Du mußt den GroupIndex auf einen Wert > 0 setzen (und evtl. auch AllowAllUp auf True).

markus5766h

17. Jun 2009 17:03

Re: TButton "einrasten" lassen

Hallo,
hier

P.I.C.S
gibt's solche Buttons

Alle Zeitangaben in WEZ +1. Es ist jetzt 07:30 Uhr.