String
15/12/2003
0
Como multiplicar 2 strings ?
Vtotal := (edt1.Text) * (edt2.Text);
Ou por 2 var... exemplo Vtotal := v1*v2
Mas não funciona precisa converter como eu faço ?
valeu
Vtotal := (edt1.Text) * (edt2.Text);
Ou por 2 var... exemplo Vtotal := v1*v2
Mas não funciona precisa converter como eu faço ?
valeu
Smeagol
Curtir tópico
+ 0
Responder
Posts
15/12/2003
Rodrigo_rcp
var
v1,v2,vTotal:real;
begin
v1:=StrToFloat(Edit1.Text);
v2:=StrToFloat(Edit2.Text);
VTotal:=v1*v2;
Edit3.Text:=FloatToStr(VTotal);
v1,v2,vTotal:real;
begin
v1:=StrToFloat(Edit1.Text);
v2:=StrToFloat(Edit2.Text);
VTotal:=v1*v2;
Edit3.Text:=FloatToStr(VTotal);
Responder
Clique aqui para fazer login e interagir na Comunidade :)