String

15/12/2003

2

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

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários. Para saber mais sobre o uso de cookies,
consulte nossa política de privacidade. Ao continuar navegando em nosso site, você concorda com a nossa política.

Aceitar