obtener numero de linea de un Tmemo
 

Hola q tal, tengo la siguiente consulta
tengo una aplicacion en la q uso un tmemo, lo que necesito es poder mostrar a medida q escribo en el tmemo el numero de linea (del tmemo) en el q se encuentra poscionado el cursor.
Agradecere su ayuda...Hasta luego
Si es posible el numero de col...

Hola gaz-g7, Bienvenido al ClubDelphi.

Primera recomendación es que leas la Guía de estilo.

En cuanto a tu consulta vamos si esto te sirve.....

Código Delphi [-]
procedure TForm1.Memo1Click(Sender: TObject);
var
  Coordenada: TPoint;
begin
    Coordenada := Memo1.Caretpos;
    Caption := 'Coordenada X=' + IntToStr(Coordenada.x) + ' Coordenada Y=' + IntToStr(Coordenada.Y + 1);
end;

procedure TForm1.Memo1KeyUp(Sender: TObject; var Key: Word;  Shift: TShiftState);
begin
Memo1Click(Sender)
end;

De este modo controlas la posición tanto cuando se pulsa una tecla o cuando se posiciona con el ratón.

Si ademas quieres ofrecer otra información adicional, te recomiendo que eches un vistazo a este hilo que hace tiempo tratamos....

Saludos.

Muchas Gracias por tu ayuda. En estos dias voy a probar lo que explicas en el mensaje y luego comento los resultados obtenidos y si poseo nuevas dudas se las comunicare en el foro.

Reitero mi agradecimiento y mis saludos.
Hasta Luego...