Fórum Soma #230530
06/05/2004
0
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
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
Curtir tópico
+ 0
Responder
Posts
06/05/2004
Einstein
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));
Responder
Gostei + 0
06/05/2004
Redoctober
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;
ShowMessage(FloatToStr(b));
Valeu pelo toque!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)