Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   definir linea y columna en un statusbar (https://www.clubdelphi.com/foros/showthread.php?t=36133)

antonio peña 03-10-2006 06:23:19

definir linea y columna en un statusbar
 
a quien corresponda:

mi duda es la siguiente, tengo un richedit, y al tiempo en ke muevo el cursor dentro del mismo me gustaria poner en mi statusbar la linea y la columna en la que esta posicionado mi cursor.:confused:

de antemano gracias a todos lo que resuelvan o agranden mi duda :p

p.d. antes de publicar este hilo he buscado y buscado y no e encontrado algo parecido a lo ke kiero.

hasta la prox :cool:

roman 03-10-2006 06:51:38

Prueba con esto:

Código Delphi [-]
var
  Col, Line: Integer;

begin
  Col := RichEdit1.SelStart - RichEdit1.Perform(EM_LINEINDEX, -1, 0);
  Line := RichEdit1.Perform(EM_LINEFROMCHAR, RichEdit1.SelStart, 0);

  StatusBar1.Panels[0].Text := Format('Col: %d', [Col]);
  StatusBar1.Panels[1].Text := Format('Ln: %d', [Line]);
end;

// Saludos


La franja horaria es GMT +2. Ahora son las 13:18:24.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi