In einem ARRAY nach einem STRING suchen

[Robert_G]

oder wenn es nur um einen Teilstring geht:

Delphi-Quellcode:

  // In Großbuchstaben umwandeln
  GesuchterString := UpperCase(Edit1.Text);

  For i := 1 To 1000 Do 
  // Wenn Pos den String gefunden hat, gibt es die Position aus
  If Pos(GesuchterString, UpperCase(Basis[i])) > 0 Then ......

Edit1 enthält den Text, den du suchst.

Geht aber bestimmt auch eleganter...