[[AzidRain]]

haz esto pa' pronto:

Código Delphi [-]
 Edit1.Text:=Format('%d',[Memo1.Lines.count]);

E inclusive puedes hacer esto también si te quieres ver muy elegante:

Código Delphi [-]
 Edit1.Text:=Format('%d Líneas',[Memo1.Lines.count]);