Total de caractere digitado no EDIT
Olá...
:arrow: Qual código usar pra fazer a contagem do total de caracteres digitado em um EDIT?
Vlw!
:arrow: Qual código usar pra fazer a contagem do total de caracteres digitado em um EDIT?
Vlw!
Educdc
Curtidas 0
Respostas
Lucas Silva
02/03/2004
tenta esse código ai....
var tamanho: integer; . . tamanho := Length(edit1.text);
GOSTEI 0
Educdc
02/03/2004
preciso disso:
Se total de caracteres digitado no edit for = 5 então está correto, senão está errado!
Se total de caracteres digitado no edit for = 5 então está correto, senão está errado!
GOSTEI 0
Vieira_alex
02/03/2004
Amigo está ai o seu exemplo:
procedure TForm1.Button1Click(Sender: TObject);
var
verifica :integer;
begin
verifica := length(Edit1.Text);
if verifica = 5 then
Showmessage(´Está Correto´)
else
Showmessage(´Não está correto´);
end;
blz....
procedure TForm1.Button1Click(Sender: TObject);
var
verifica :integer;
begin
verifica := length(Edit1.Text);
if verifica = 5 then
Showmessage(´Está Correto´)
else
Showmessage(´Não está correto´);
end;
blz....
GOSTEI 0
Educdc
02/03/2004
:arrow: Valeu [b:dc7d31d8cf]vieira_alex[/b:dc7d31d8cf]
GOSTEI 0
Schneider
02/03/2004
boa a tua pergunta precisei desse codigo hoje em um sistema q eu estou fazendo
brigadam beijos
brigadam beijos
GOSTEI 0