Delphi-PRAXiS
Seite 1 von 2  1 2      

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 Welche CheckBox-Komponente?!? (https://www.delphipraxis.net/1459-welche-checkbox-komponente.html)

Daniel B 29. Nov 2002 12:41


Welche CheckBox-Komponente?!?
 
Hallöchen,

kennt vielleicht jemand eine CB-Kompo, die ein Ereigniss für "un"checken hat? Die normale hat ja sowas nicht oder ich bin einfach nur Blind, wobei ich ungern mit Fremdkomponenten arbeite.

Grüsse, Daniel :hi:

Christian Seehase 29. Nov 2002 12:43

Moin Daniel B,

wie wär's denn mit OnClick?

Daniel B 29. Nov 2002 12:45

Hallo Christian,

?? wird das auch beim unchecken ausgeführt?
Hmm, dann müsste ich ja in der OnCheck noch extra prüfen oder sie jetzt Ein oder Ausgeschaltet wird.

Grüsse, Daniel :hi:

Daniel B 29. Nov 2002 12:49

Tatsächlich, hmm kommt davon wenn man nie damit arbeitet... :roll:
So geht es immerhin.
Delphi-Quellcode:
procedure TAboutBox.CheckBox1Click(Sender: TObject);
begin
  if CheckBox1.Checked = True then
  begin
    ShowMessage('Ein');
  end
  else if CheckBox1.Checked = False then
  begin
    ShowMessage('Aus');
  end;
end;
Wobei es schöner wäre, wenn die IFs nicht bräuchte, aber na gut.
Trotzdem Danke, hat mir sehr geholfen.

Grüsse, Daniel :hi:

sakura 29. Nov 2002 12:58

Es ist sauberer, wie folgt zu schreiben, da man Booleanwerte generell nicht mit True/False vergleichen sollte:
Delphi-Quellcode:
procedure TAboutBox.CheckBox1Click(Sender: TObject);
begin
  if CheckBox1.Checked then
  begin
    ShowMessage('Ein');
  end
  else if not CheckBox1.Checked then
  begin
    ShowMessage('Aus');
  end;
end;
...:cat:...

Chewie 29. Nov 2002 13:02

Zitat:

Zitat von sakura
Es ist sauberer, wie folgt zu schreiben, da man Booleanwerte generell nicht mit True/False vergleichen sollte:

Wieso denn das :?: :shock:

sakura 29. Nov 2002 13:13

Die Definition von Boolean erlaubt theoretisch nur zwei Werte: True und False.

Der Vergleich mit False klappt immer, da False als Null (0) definiert ist. Ein Vergleich mit True kann fehlschlage. Die Konstante True ist als -1 ($FFFFFF) definiert. In der Logik ist True jedoch als (not False) definiert und kann jeden Wert ungleich Null (0) annehmen. Da Boolean seit der 32bit Variante von Delphi, intern eine 32bit Variable ist, kann es also theoretisch 2^32-1 verschieden True Werte geben - die Konstante True ist jedoch definiert als (-1). Daraus ergeben sich 2^32-2 mögliche True-Werte die im Vergleich mit der Konstante True verloren gehen.

Bestes Beispiel ist :kotz: VB - die Checkbox dort, kann im Wert Checked weder True noch False sein, wenn man diese genauso vergleicht - und deren State cbGrayed ist. Gleiches kann theoretisch (selten praktisch) auch in Delphi geschehen.

...:cat:...

Chewie 29. Nov 2002 13:46

Das würde also heißen, dass eine boolsche Variable, die auf TRUE steht, ein 32bit-Integer ist mit dem Dezimalwert 1. Wenn man die Variable auf TRUE setzt, wird sie 1, bei FALSE 0.
Wenn man jetzt aber irgendwie einen Integer mit dem Wert 15 als einen Boolean-Wert behandelt, ist dieser weder TRUE noch FALSE. Ist das so richtig?
Ich dachte immer, TRUE wäre keine Konstante in dem Sinne, sondern einfach der Bereich kleiner 0 und größer 0.

sakura 29. Nov 2002 13:54

:!: minus 1 (-1), nicht 1 (alle Bits sind an).

In Pascal und den meisten Programmiersprachen ist das logische True als ungleich Null (0) definiert. Die Konstante ist, in Pascal/Delphi zumindest als -1 ($FFFFFFFF) definiert.


Ausnahme: UNIX Shell Scripting: False ist ungleich Null (0) und True ist als Null (0) definiert. :shock:

Chewie 29. Nov 2002 15:02

Was ist eigentlich der Unterschied zwischen dem logischen TRUE und der TRUE-Konstante?


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:41 Uhr.
Seite 1 von 2  1 2      

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