Basta usar a função Length.

Exemplo

Function RetornaQtdUsado(Campo: String) : Integer;
var
  Qtd : Integer;
Begin
  Result := 0;
  Result := Length(Campo);
end;

Como usar a função.

ShowMessage(IntToStr(RetornaQtdUsado(Trim(Edit1.Text))));
  
Espero ter ajudado amigo.


Em 04/07/05, Info Desenvolvimento<[EMAIL PROTECTED]> escreveu:
> Alguém sabe como faço para contar quantos caracteres foi usado em um campo.
> Exemplo: Tenho um campo chamado  NOME que tem 40 caracteres só que quando o
> usuários preencheu usou somente 32 caracteres.
> Como faço para saber ?
> 
> PAULO FERNANDES
> 
> 
> 
> [As partes desta mensagem que não continham texto foram removidas]
> 
> 
> 
> -- 
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> 
> Para ver as mensagens antigas, acesse:
> http://br.groups.yahoo.com/group/delphi-br/messages
> 
> Para falar com o moderador, envie um e-mail para:
> [EMAIL PROTECTED] ou
> [EMAIL PROTECTED]
> 
> 
> 
> ________________________________
> Links do Yahoo! Grupos
> 
> Para visitar o site do seu grupo na web, acesse:
> http://br.groups.yahoo.com/group/delphi-br/
>   
> Para sair deste grupo, envie um e-mail para:
> [EMAIL PROTECTED]
>   
> O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do
> Yahoo!. 


-- 
[]'s

Emerson Moreno
O grande sábio aprende por ensinar!


-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a