Soma

Delphi

06/05/2004

O que está errado aqui!


procedure TForm1.Button1Click(Sender: TObject);
var
x: real;
y: real;
b: real;


begin
x := 1;
y := 1;
b := x+y;
ShowMessage(b);

end;


Pretendo obter o resultado 2 na variavel b


Redoctober

Redoctober

Curtidas 0

Respostas

Einstein

Einstein

06/05/2004

O que está errado aqui! 


procedure TForm1.Button1Click(Sender: TObject); 
var 
x: real; 
y: real; 
b: real; 


begin 
x := 1;
y := 1;
b := x+y; 
ShowMessage(b); 

end;


vc tem que converter de Ponto Flutuante para string;

ShowMessage(FlaotToStr(b));


GOSTEI 0
Redoctober

Redoctober

06/05/2004

O que está errado aqui! 


procedure TForm1.Button1Click(Sender: TObject); 
var 
x: real; 
y: real; 
b: real; 


begin 
x := 1;
y := 1;
b := x+y; 
ShowMessage(b); 

end;
vc tem que converter de Ponto Flutuante para string; ShowMessage(FlaotToStr(b));



ShowMessage(FloatToStr(b));

Valeu pelo toque!


GOSTEI 0
POSTAR