Label mostrando quanto espaco....

Question

Ola tenho um edit em um site delphi8 onde o usuario digita algumas informacoes no edit com multlinhas com no maximo 200 caracter tem como mostrar em label quantos faltam para terminir igual mensagem da oi

Elcilei

Christian_adriano · Answer

Ol� Colega,A ideia � essa: [code:1:0b53ea45ad]Label.Caption := �Faltam � + IntToStr(Edit.MaxLength - Length(Edit.Text));[/code:1:0b53ea45ad]t+Christian....

Elcilei · Answer

em qual evento no edit coloco e so clicar duas vezes no edit...

Christian_adriano · Answer

Ol� Colega,Se vc quizer q mostre na hora q o usuario for digitando vc pode colocar no evento �OnChange� do EDIT.t+Christian....

Elcilei · Answer

ola fiz essa rotina e funcionou mas porem so mostra quantos caracter que faltam quando clico em algum outro componete, queria que na medida que digitase alguma informacao no edit ele iria mostrando em tempo real. Outra coisa espesifiquei no edit o maximo mas conseque digitar mais. Fiz essa rotina no delphi6 e funcinou beleza mas delphi8 para asp.net nao. alguem sabe me dizer como faco

Grato
Elcilei Lopes

Mmoreira · Answer

como nosso amigo christian_adriano disse vc tem que colocar no evento onchange do edit ......

Elcilei · Answer

coloquei e nao funcionou, mas se clicar por exemplo buton ele mostra faltam 150...

Christian_adriano · Answer

Ol� colega �elcilei�, nunca trabalhei com o d8 mais n�o tah funcionando mesmo quando o EDIT esta em foco ?t+Christian....

Arc@njo · Answer

O Evento OnChange � startado somente quando o Edit sofre alguma mudan�a �change�, ent�o antes que voc� digite alguma coisa nele n�o ira acontecer nada, sugiro que al�m de colocar a rotina no evento OnChange coloque uma liga��o para a mesma no evento OnEnter do Edit. Talvez funcione do modo como queira.

Flw

F�rum Label mostrando quanto espaco.... #282354