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 Box einer Checkbox ausblenden/deaktivieren (https://www.delphipraxis.net/165893-box-einer-checkbox-ausblenden-deaktivieren.html)

Keks 19. Jan 2012 23:39

Box einer Checkbox ausblenden/deaktivieren
 
Auf einer Form befinden sich (neben vielen anderen Elementen) ein paar normale Checkboxen, die im Normalfall auch als solche verwendet werden.
In einem Sonderfall soll exakt die gleiche Form jedoch nicht konfigurierbar sein, sondern nur Informationen wiedergeben. Dabei sind alle Elemente immer noch gleich im Vergleich zum ersten Fall, mit der einzigen Ausnahme, dass die Checkboxen nicht als solche fungieren sollen. Stattdessen sollen diese eher als Labels dargestellt werden, ohne dass der Benutzer hier in Versuchung gerät, sie anzuklicken.

Der erste Gedanke ist natürlich, diese einfach auf Enabled:=false zu setzen. Das deaktiviert die Box, graut aber auch den Text aus, was es nicht soll.
Ich könnte mir zwei Lösungen vorstellen:
1. Die Box der Checkbox (links neben dem Text) komplett ausblenden.
2. Diese Box deaktivieren (ausgrauen), während der Text weiterhin normal dargestellt wird.

Ist dies irgendwie realisierbar? Am liebsten erste Variante, zur Not auch die zweite.

Medium 19. Jan 2012 23:54

AW: Box einer Checkbox ausblenden/deaktivieren
 
Wirf doch einfach eine Hand voll Panels ohne Rand über die Boxen, und mach die im reinen Anzeigefall sichtbar :) (Die sind zwar über den Text dann immer noch clickbar, aber das muss man dann ja nicht speichern.) So als völlig spontan geschossene Dreckiglösung.

himitsu 20. Jan 2012 00:14

AW: Box einer Checkbox ausblenden/deaktivieren
 
Checkbox ohne Text (eventuell aber mit 1-2 Leerzeichen) und daneben ein normales Label.


Dann eventuell noch Label.FocusControl auf die jeweiligen CheckBoxen setzen und Folgendes allen diesen Labels zuweisen.
Delphi-Quellcode:
procedure TForm1.LabelClick(Sender: TObject);
begin
  if (Sender as TLabel).FocusControl is TCheckBox then
    with (Sender as TLabel).FocusControl as TCheckBox do
      Checked := not Checked;
end;

David Martens 20. Jan 2012 09:46

AW: Box einer Checkbox ausblenden/deaktivieren
 
Vor dem gleichen Problem stand ich, allerdings sind bei mir die Labels links von der Checkbox.

Du kannst die Checkboxen ohne Funktion auf das Formular legen und das Label genau (oder auch etwas mehr) über die Checkbox. An den Text fürs Label kommen dann immer die gleiche Anzahl von Leerzeichen. Dann noch die Idee von himitsu und du hast was du willst.

Allerdings würde ich das Ganze in eine eigene Komponente gießen, dann kannst du sie wie ein normales Label benutzen.

Gruß David

DeddyH 20. Jan 2012 10:10

AW: Box einer Checkbox ausblenden/deaktivieren
 
Oder man legt die Checkboxen auf ein Panel, setzt sie auf cbGrayed und disabled das Panel. IIRC sind sie dann nicht mehr anklickbar, behalten aber die Schriftfarbe.

Keks 20. Jan 2012 22:52

AW: Box einer Checkbox ausblenden/deaktivieren
 
Vielen Dank Euch allen für die Lösungsvorschläge. Ist zwar schade, dass es keine "direkte" Lösung gibt, aber im Prinzip sind die Alternativen auch brauchbar. Ich werde mir noch ein paar Gedanken machen, welche Lösung für meinen Fall am besten ist. Danke. :)


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:21 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