Contando caracters ?

Delphi

25/04/2003

Olá como faz pra ir contando e diminuindo o numero de carateres tipo do site de mensagens da telefonica agora vivo ele apresenta 145 o caracter maximo mas cada caracter digitado ele diminui.

Vou digitar em um MEmo e o contador vai estar em uma edit.


Fsjr

Fsjr

Curtidas 0

Respostas

Sam

Sam

25/04/2003

:D no eveno OnKeyUp coloque o seguinte código:

** numerocaracter := totalcaracter-memo1.lines.count;
** edit1.text := inttostr(numerocaracter);

Onde TOTALCARACTER é uma variável do tipo INTERGER que guardará os 145 e NUMEROCARACTER é uma variável do tipo INTERGER que guardará o total de caracteres permitidos menos os caracteres digitados.

Espero ter ajudado !!! Bye !!!


GOSTEI 0
POSTAR