Völlig richtig. Ich schrieb auch, das das soweit korrkt ist, man sich aber eben noch ein paar Gedanken mehr drüber machen sollte, so von wegen Trennung von Darstellung und Ausführung.
Leider liefert AnsiIndexStr nur eine Zahl, und da steckt keine Semantik hinter. Ich will doch lesbaren Code, der auch später noch verstanden wird. Da hilft mir ein
Delphi-Quellcode:
Case AnsiIndexStr(Edit1.Text, Animals) Of
0 : ...
1 : ...
End;
Nix..
Aber verwenden(!) würde ich die Funktion auf alle Fälle...