String in StringList suchen

[oki]

hab's jetzt so gelöst:

Delphi-Quellcode:

function GetMsgStartLine(Identifier: String): Integer;
var Counter : Integer;
begin
  Result := -1;
  For counter := 0 to MyStringList.Count -1 do begin
    IF Pos(Identifier, MyStringList.Strings[Counter]) > 0 then begin
      Result := Index;
      Exit;
    end;
  end;
end;

Gruß