Delphi-PRAXiS

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 Status eines Buttons ändern (https://www.delphipraxis.net/102691-status-eines-buttons-aendern.html)

HTML04 2. Nov 2007 13:42


Status eines Buttons ändern
 
Ich möchte einen Button nach dem anklicken im gedrückten Zustand bleibt.:?:
Dafür habe ich folgenden code geschrieben:

Delphi-Quellcode:
procedure TForm2.ToolButton12Click(Sender: TObject);
begin
if not Toolbutton12.Down then toolbutton12.down := true
else Toolbutton12.Down := false;
[edit=sakura] [delphi]-Tags. Mfg, sakura[/edit]

sakura 2. Nov 2007 13:44

Re: Status eines Buttons ändern
 
Und... was funktioniert jetzt nicht?

...:cat:...

DeddyH 2. Nov 2007 13:45

Re: Status eines Buttons ändern
 
BTW: Das geht auch kürzer.
Delphi-Quellcode:
Toolbutton12.Down := not Toolbutton12.Down;

fLaSh11 2. Nov 2007 13:46

Re: Status eines Buttons ändern
 
Zitat:

Zitat von HTML04
Delphi-Quellcode:
procedure TForm2.ToolButton12Click(Sender: TObject);
begin
if not Toolbutton12.Down then toolbutton12.down := true
else Toolbutton12.Down := false;

das geht viel einfacher :wink:

Delphi-Quellcode:
procedure TForm2.ToolButton12Click(Sender: TObject);
begin
Toolbutton12.Down := not Toolbutton12.down;

Hawkeye219 2. Nov 2007 14:57

Re: Status eines Buttons ändern
 
Hallo,

wenn im Objektinspektor die Eigenschaft Delphi-Referenz durchsuchenTToolButton.Style auf den Wert tbsCheck gesetzt wird, dann benötigt man keinen eigenen Code um den Button umzuschalten.

Gruß Hawkeye

HTML04 2. Nov 2007 15:52

Re: Status eines Buttons ändern
 
Vielen Dank für die vielen Antworten, haben mir sehr geholfen :-D


Alle Zeitangaben in WEZ +1. Es ist jetzt 05:50 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz