Label
Eu sou um pouco inexperiente no Delphi , entao eu saber se alguem pode me diser um codigo que some o conteúdo(numérico) de dois Labes e mostre o resultado em um terceiro Label.
Espero q tenha cido claro e q alguem me ajude.
Espero q tenha cido claro e q alguem me ajude.
Carlos E.
Curtidas 0
Respostas
Afarias
29/11/2003
O ´dado´ de um Label (Caption) é um STRING, vc pode convertê-lo para inteiro com StrToInt ou StrToIntDef, e pode converter para ponto-flutuante com StrToFloat, --- então, vc deve converter de volta para STRING usando IntToStr ou FloatToStr ou FloatToStrF ou Format ou etc...
ex:
Label3.Caption := IntToStr(StrToInt(Label1.Caption) + StrToInt(Label2.Caption));
neste caso, se a string não puder ser convertida para um inteiro (por conter uma letra por ex.) então vc receberá uma exceção (erro)
T+
ex:
Label3.Caption := IntToStr(StrToInt(Label1.Caption) + StrToInt(Label2.Caption));
neste caso, se a string não puder ser convertida para um inteiro (por conter uma letra por ex.) então vc receberá uma exceção (erro)
T+
GOSTEI 0
Dead_thinker
29/11/2003
é Pra fazer isso quando clicar num botao? se for tu coloca o botão e dá dois cliques nele entao:
Label3.caption:= inttostr(strtoint(label1.caption)+ strtoint(label2.caption));
strtoint - função q converte string em inteiro
inttostr - o inverso da acima!
Espero ter explicado bem! :D
Label3.caption:= inttostr(strtoint(label1.caption)+ strtoint(label2.caption));
strtoint - função q converte string em inteiro
inttostr - o inverso da acima!
Espero ter explicado bem! :D
GOSTEI 0