[Resolvido] Contador de linhas

[MrZer0 0]

galerosa, como eu poderia fazer essa barrinha com o numero das linhas?

 

exemplo:

 

valeu :)

[marcio.theis 3]

Uma vez fiz algo deste tipo para aprender como poderia fazer, fiz algo, mas não funciona 100%, você pode melhorar o fonte...

No caso adicionei dois TRichEdit, no caso um para a listagem dos números e outro para o texto, ficando algo como:

O fonte pode colocar no OnChange do RichEdit onde digita o fonte...

procedure TForm1.RichEditTextoChange(Sender: TObject);var	x, total: integer;begintotal:=SendMessage(RichEditTexto.Handle, EM_GETLINECOUNT, 0, 0);RichEditContagem.Clear;for x:=1 to total do	RichEditContagem.Lines.Add(IntToStr(x));end;

Ele não fica muito legal depois que chega nas ultimas linhas, mas tente alterar e fazer ficar certinho e depois se quiser volte a postar mostrando como ficou...

[MrZer0 0]

opa! valeu pela resposta, fiz aqui e funcionou como você disse, nas últimas linhas ele adiciona o número, mas não faz o scroll automático, vou tentar fazer ele funcionar certinho, mais uma vez valeu :)(se alguém souber de algum componente que faça isso, também será bem vindo :))valeu :)

[marcio.theis 3]

Ótimo, caso consiga resolver, conte para nós :P

[MrZer0 0]

opa! não consegui ainda arrumar ele... alguém teria uma outra idéia?? ou componente?? (é p/ um trabalho de faculdade, precisava de um pouco de urgência =/)

 

valeu :)

[MrZer0 0]

alguém?? =/

[bdexterholland 0]

você pode tentar o synedit que já tem o lineCount embutido...