Código Delphi [-] procedure TForm1.BitBtn1Click(Sender: TObject); begin Resultado := 1.7; Label1.Caption := Format('%7d',[round(Resultado)]); Resultado := 2; Label1.Caption := Format('%7d',[round(Resultado)]); end;
procedure TForm1.BitBtn1Click(Sender: TObject); begin Resultado := 1.7; Label1.Caption := Format('%7d',[round(Resultado)]); Resultado := 2; Label1.Caption := Format('%7d',[round(Resultado)]); end;