Como limitar n�mero de caracteres em um VISOR ?

Question

Uso o StaticText e queria limitar o n�mero de caracteres..  ex: 10 caracteres!Vlw...

Adilsond · Answer

[code:1:10de2efe22]  StaticText1.Caption := Copy(StringOrigem,1,10);[/code:1:10de2efe22]...

Annubiss · Answer

Vlw cara... Mas onde eu coloco esse evento?Da form?Do Visor?  (oO)Vlww!...

Adilsond · Answer

Voce esta utilizando um StaticText e o mesmo esta sendo preenchido com + de 10 caracteres ? n�o � isto ? ent�o coloque o c�digo onde voce esta preenchendo o mesmo. O c�digo pega o valor que voce quer passar pra ele e limita-o em 10 caracteres.

Annubiss · Answer

Sim, eu tinha colocado o evento dentro do Visor...Mas ao executar ocorre um erro!To fazendo algo errado?� no evento do Visor (StaticText) msm?Agrade�o!...

Adilsond · Answer

Poderias descrever o evento e seu c�digo ?...

Annubiss · Answer

Sim..Mas qual evento? O do Visor?Pq o Visor eu n�o criei evento... Tentei colocar oq vc me falou, mas deu erro!Tinha ficado assim: N�o sei se fiz besteiraEVENTO VISOR[code:1:d40497617c]   Visor.Caption := Copy(StringOrigem,1,10);[/code:1:d40497617c]Gostaria de saber se tem que colocar dentro de um evento do Visor, se sim, qual evento?Ja tentei at� colocar no evento OnKeyPress do Form (oO), rsrsrsrs...

Adilsond · Answer

Agora entendi o voce quer ..... Voce esta fazendo a calculadora....... Imaginei que o visor n�o tinha nada a ver com a mesma, pois este � um novo post.... :(
Em sua calculadora voce colocou em StaticText e quem for utiliza-la n�o vai digitar o n�mero e sim clicar nos bot�es ???? Ent�o voce pode fazer no evento dos bot�es.......

  if Length(Visor.Caption) = 10 then
     ShowMessage(�Tamanho m�ximo alcan�ado.�)
  else
     Visor.Caption := seu c�digo;

Outra coisa....Veja o link [url]http://imasters.uol.com.br/artigo/12340/delphi/montando_uma_calculadora_no_delphi_-_parte_1/[/url] e link [url]http://imasters.uol.com.br/artigo/12432[/url]

Annubiss · Answer

A minha calculadora funciona pelo teclado..

Ja criei o evento no OnKeyPress..
Eu quero continuar digitando pelo teclado..

Mas queria limitar apenas n�meros de caracters a serem digitados!
EX: No m�ximo 10 caracteres!

Vlw

Adilsond · Answer

ent�o no evento onKeyPress coloque o c�digo.

  if Length(Visor.Caption) = 10 then
     begin
       ShowMessage(�Tamanho m�ximo alcan�ado.�);
       Key := #0;
     end;

Annubiss · Answer

Show cara... Valeu msm..Me ajudou muito!Agrade�o    ^^Uma coisa estranha � que, por exemplo:Eu digito os 10 n�meros, ai quando eu tento usar minha tecla BACKSPACE para deletar um caracter n�o funciona. Sendo que funciona se eu digitar 8 caracteres (ex)...Quando chega no tamanho limite a tecla backspace para de funcionar!Mas a CE e C funciona normal!-.-�Mas isso � o de menos, o importante msm vc ja me ajudou!Grato!...

Annubiss · Answer

Fica ruim pq se eu digitar 10 n�meros n�o posso fazer mais nenhuma a��o!
Por exemplo, eu digito 10 caracteres e quero apagar 1 n�o posso, diz sempre que atingiu o numero maximo!

Pois diz que ja atigi o limite de caracteres!

Annubiss · Answer

RESOLVI...OBRIGADO!...

F�rum Como limitar n�mero de caracteres em um VISOR ? #375859