String

15/12/2003

1

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


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);


Responder
×
+1 DevUP
Acesso diário, +1 DevUP
Parabéns, você está investindo na sua carreira