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


Smeagol

Smeagol

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

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar