Fórum Label - duvidas #171837
28/07/2003
0
como faço p o delphi contar o numero de caracteres digitados no label,
e enviar um texto destinado por mim, ex: de 1 a 5 carc, exib ´1´ de 6 a 15 carc, exib ´2´e assim por diante..?
e enviar um texto destinado por mim, ex: de 1 a 5 carc, exib ´1´ de 6 a 15 carc, exib ´2´e assim por diante..?
Sidnei
Curtir tópico
+ 0
Responder
Posts
28/07/2003
::d::a::m::m::i::t::
var
d: integer;
begin
d:=length(string);
case d of
1..5:showmessage(´1´);
6..15:showmessage(´2´);
16..25:showmessage(´3´);
end;
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)