Performance VS Codestruktur/Codevereinfachung

[himitsu]

Ja, ich weiß ... CASE mit String und Pascal ... nja, was soll's.

Delphi-Quellcode:

case IndexText(TestArray[I], ['5', '50', '9']) of
  0: Found1 := 5;
  1: Found2 := 50;
  2: Found3 := 9;
  else Continue;
end;

Oder besser gleich ein TDictionary<>, statt dem Case.