Sorry: True ist gleich 1
Der Rest bleibt aber weiter wie beschrieben. Hier mal ein Beispiel:
Delphi-Quellcode:
// der Wert der Konstante True
ShowMessage('TRUE: ' + IntToStr(Integer(True)));
// der Wert der Konstante True
ShowMessage('FALSE: ' + IntToStr(Integer(False)));
// ein Vergleich zweier gleicher Konstanten
ShowMessage('2=2: ' + IntToStr(Integer(Boolean(2 = 2))));
// ein Vergleich zweier verschiedener Konstanten
ShowMessage('1=2: ' + IntToStr(Integer(Boolean(1 = 2))));
// testen einer Konstante ungleich 0
if Boolean(5) then ShowMessage('Boolean(5) GILT ALS True') else ShowMessage('Boolean(5) GILT ALS False');
// testen einer Konstante gleich 0
if Boolean(0) then ShowMessage('Boolean(0) GILT ALS True') else ShowMessage('Boolean(0) GILT ALS False');
// testen ob eine Konstante (5), welche True is, auch gleich True ist
if Boolean(5) = True then ShowMessage('Boolean(5) = True IST WAHR') else ShowMessage('Boolean(5) = True IST NICHT WAHR');
// testen ob eine Konstante (5), welche True is, gleich False ist
if Boolean(5) = False then ShowMessage('Boolean(5) = False IST WAHR') else ShowMessage('Boolean(5) = False IST NICHT WAHR');
// testen ob eine Konstante (0), welche False is, gleich True ist
if Boolean(0) = True then ShowMessage('Boolean(0) = True IST WAHR') else ShowMessage('Boolean(0) = True IST NICHT WAHR');
// testen ob eine Konstante (0), welche False is, auch gleich False ist
if Boolean(0) = False then ShowMessage('Boolean(0) = False IST WAHR') else ShowMessage('Boolean(0) = False IST NICHT WAHR');
Das sollte alles erklären.