[Loviedo]

Ojo al redondeo.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  mvar: currency;
begin
  mvar := 10.2526;
  Edit1.Text := format('%*.*f',[6,3,mvar]);
end;

saludos.