Hallo!
Meine Delphi-Hilfe sagt:
Boolean: False = 0, True = 1
ByteBool, WordBool, Longbool: False = 0, True <> 0
Boolean ist Pascal, 1 Byte. Der Rest (1/2/4 Byte) ist aus Kompatibilität zu anderen Sprachen bzw. der Windows-
API vorhanden. Die liefert bei einer bool-Prozedur 0 oder <> 0!
Allerdings programmieren die auch mit der Beißzange:
Delphi-Quellcode:
var OK : Boolean;
...
if x <> 0 then OK := True;
if OK then ...
1. ist OK nicht initialisiert und
2. geht das ganz einfach:
OK := x <> 0;
Was soll übrigens
Zitat von
sakura:
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;
bedeuten?
das if nach dem else ist doch überflüssig! Es reicht doch
Delphi-Quellcode:
procedure TAboutBox.CheckBox1Click(Sender: TObject);
begin
if CheckBox1.Checked then
ShowMessage('Ein') else
ShowMessage('Aus');
end;
Gruß
Dietmar Brüggendiek