Ver Mensaje Individual
  #5  
Antiguo 10-02-2008
[egostar] egostar is offline
Registrado
 
Registrado: feb 2006
Posts: 6.561
Reputación: 25
egostar Va camino a la fama
Algo rápido,

Código Delphi [-]
procedure TForm1.BitBtn1Click(Sender: TObject);
var
  Contador: integer;
begin
  Contador := 1000000;
  ShowMessage(Format('Contador = : %15.0n',[Contador*1.0]));
end;

Aunque podrías darle una leída a la funcion FormatMaskText() tal vez encuentres algo que te ayude.

Salud OS

Edito: Bueno el amigo keyboy ya te ha dado un explicación sin desperdicio.
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney

Última edición por egostar fecha: 10-02-2008 a las 19:49:03.
Responder Con Cita