duvidas label ainda
quero saber como faco, pra apenas contar o numero de caracter de um label, e exibir uma mensagem, ex vc digitou 13 digitos no label...
Sidnei
Curtidas 0
Respostas
Fred
30/07/2003
procedure TForm1.Button1Click(Sender: TObject);
var s : string;
begin
s := label1.Caption;
showmessage(´o label tem ´+inttostr(length(label1.Caption)) + ´letras´)
end; 8)
var s : string;
begin
s := label1.Caption;
showmessage(´o label tem ´+inttostr(length(label1.Caption)) + ´letras´)
end; 8)
GOSTEI 0