If-Anweisung mit "in"

[Helmi]

Also ich weiss zwar nicht was es bringen soll aber bitte hier hast du die zeilen die drüber liegen:

Code:

      //Datei aus der Ordnerliste auslesen
      Datei := Ordnerliste.Strings[neuesBild];

      DateiEndung := StringReplace(ExtractFileExt(Datei), '.', '', [rfReplaceAll]);

      showmessage(Dateiendung);

      If DateiEndung in ['jpg', 'jpeg', 'bmp', 'ico', 'emf', 'wmf'] then
        begin
          //ausgewähltes Image laden
          Image.Picture.LoadFromFile(Ordner + Datei);
        end;

Trotzdem hängt der an der If-Anweisung mit dem Integer und String - Fehler

genauer gesagt am ersten Komma nach 'jpg'.