entsprechender Delphi Code zu VB6?

[ibp]

ja

Delphi-Quellcode:

Die case-Anweisung

case I of
  1..5: Caption := 'Low';
  6..9: Caption := 'High';
  0, 10..99: Caption := 'Out of range';
else
  Caption := '';
end;