IF in mit Strings

[sx2008]

Wenn die Maschinennummern in Form einer Stringliste vorliegen dann kann man es auch so machen:

Delphi-Quellcode:

var
  Maschinenliste : TStrings; // bzw. TStringList
begin
  ...
  if Maschinenliste.IndexOf(Maschine.Text) <> -1 then
  begin
    ...