Mostrar el numero de renglon de un Memo

[Pedron]

Hola buenas tardes mi duda es como hacer para mostrar el numero del renglon donde esta una palabra por ejemplo

Memo1

HOLA

que imprima esto en un .txt
Palara: HOLA renglon: 2

Lei que es algo mas o menos asi

Código Delphi [-]
var
 LineaActual : Integer;
begin
 LineaActual := Memo1.Perform(EM_LINEFROMCHAR, Memo1.SelStart, 0);

pero no se como mandarlo a un .txt

Código Delphi [-]
SaveToFile('archivo.txt');

es algo asi pero pues no se exactamente como acomodarlo de ante mano muchas gracias