Hab johny's Sache folgendermaßen umgeschrieben:
Delphi-Quellcode:
var
sl: TStringList;
z : integer;
......
procedure TForm6.Button1Click(Sender: TObject);
begin
sl:=TStringList.Create;
try
sl.LoadFromFile('Datei.ini');
for z := 0 to sl.Count -1 do
begin
if sl[z]='test' then
ShowMessage('test gefunden in Zeile ' + IntToStr(z+1));
end;
finally
sl.free;
end;
end;
Er sucht aber nur genau 'test' und nicht etwa 'test=shfghdjs'. Sondern eben nur, wenn test alleine in einer eigenen Zeile steht.
