Boolean ändert nicht seinen Wert (?)

[Klaus01]

Delphi-Quellcode:

if FadeOutOnClose then
  begin
    xiFadeOutOnClose.Caption := 'Deactivate fade out on close'
    FadeOutOnClose:=false;
  end;
else
  begin
    xiFadeOutOnClose.Caption := 'Activate fade out on close';
    FadeOutOnClose:=true;
  end:

So finde ich es etwas logischer und übersichtlicher.

Grüße
Klaus