String mit einer Datei abgleichen

[lucy]

Hallo,

würde gernen einen String mit einer Datei (Inhalt) vergleichen.

Delphi-Quellcode:

 List:= TStringList.Create;
      List.LoadFromFile(ExtractFilePath(ParamStr( 0 )) + '\List.dat');
       for i := 0 to List.Count - 1 do begin
       if sl.Strings[0] = List[i] then begin

ich habe eine Datei mit Zahlen zum Beispiel:

758,
326,
569

kommt einer diese drei Zahlen im String (sl.String[0]) vor dann ....