String in StringList suchen

[Klaus01]

Wolltest Du nich die Zeilennumer haben.

Delphi-Quellcode:

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

Hier bekommst Du die Position in der Zeile geliefert aber nicht die Zeile.

Result:=counter

sollte Dir die Zeilennummer geben.

Grüße
Klaus