CaseOf Anweisung---mehrere Befehle pro Auswahlkriterium?

[flomei]

Delphi-Quellcode:

case Visible of
  True: begin
   Image1.Visible := False;
   Image2.Visible := True;
  end;
  False: begin
   Image1.Visible := True;
   Image2.Visible := False;
  end;
end;

Hatten wir aber auch schonmal glaub ich...

MfG Florian