Variable in for to do Schleife über I ansprechend

[Uwe Raabe]

Man kann es auch ganz pragmatisch machen und eine Funktion deklarieren, wobei der restliche Code unverändert bleibt:

Delphi-Quellcode:

function vk_name(Index: Integer): string;
begin
  case Index of
    1: result := vk_name1;
    2: result := vk_name2;
  else
    raise ERangeError.Create('invalid Index');
  end;
end;

Das wäre z.B. auch die bevorzugte Herangehensweise, wenn die Variablendeklaration nicht verändert werden kann.