case und Variable

[ibp]

Delphi-Quellcode:

case int1 of
  11:
  begin
    //
  end;
  12:
  begin
    //
  end;
  13:
  begin
    //
  end;
end; // case