Zeilennummer einer Zeichenkette heausfinden?

[capo]

hi

irgendwie bekomme ich immer -1 angezeigt, mach ich was falsch?

Delphi-Quellcode:

procedure TForm2.Button3Click(Sender: TObject);
var
zeilennumer:integer;
begin
zeilennumer:= advmemo1.lines.indexof('Test');
showmessage(inttostr(zeilennumer));
end;