[Resolvido] Contar linhas de Memo

[Xumil 0]

Olá, procurei aqui no forum mais não achei nada referente ao o que estou precisando.

Tentei fazer de varias formas e não funcionou, queria fazer ele exebir as linhas do memo por exemplo:

• 1. primeira linha
• 2. segunda linha
• 3. terceira linha
• 4. <<----- preciso que apareca o numero da linha do lado
• 5. eassim por diante

Igual no notepage++ PHPEditor etc...

 

assim se não deu pra entender pode fala que explico de novo ^^

 

Grato, Paulo!

[Yoshi 1]

Você já tentou usa o Memo do TMS? Ele já faz isso automático.

[Jhony ZaM 1]

Olá, procurei aqui no forum mais não achei nada referente ao o que estou precisando.

Tentei fazer de varias formas e não funcionou, queria fazer ele exebir as linhas do memo por exemplo:

• 1. primeira linha
• 2. segunda linha
• 3. terceira linha
• 4. <<----- preciso que apareca o numero da linha do lado
• 5. eassim por diante

Igual no notepage++ PHPEditor etc...

 

assim se não deu pra entender pode fala que explico de novo ^^

 

Grato, Paulo!

 

Cara o que voce que nao eh nada facil hehe mais vou dar o caminho pra voce!!

coloque doi memo no form um grande onde sera digitado o texto sera o memo1 e o outro sera com uma barra lateral fina ke recebera as linhas sera o memo2 beleza??

 

 

No on create do form coloke

begin
  linha := 0;// variavel global que recebera a contagem de linhas
end;

No onshow do form coloque

begin
 linha:= linha + 1;
  memo2.Lines.Add(IntToStr(linha)+ ' -'); // vai add a primeira linha
end;

No onkeypress do memo1 adicione

begin
  if key =  #13 then Begin
  linha:= linha + 1;
  memo1.Lines.Add(IntToStr(linha)+ ' -');

O que esta acontecendo ai??? SImples sempre ke o usuario clicar na tecla enter ele aumentara um linha no memo2 ke eh o memo que recebe a numeração d linhas, lembrando eh apenas uma ideia nao tenho tempo de montar um editor perfeito, mais aconcelho pensar em modos agora de remover as linhas e contar o quantidade de caracteres para kando pular de linha tbm incrementar kalker coisa posta ai tentaria ajudar na medida do possivel.

[Xumil 0]

Obrigado,Jhony ZaM consegui fazer!