Use FormatFloat function for this. This function has many different types of number format. For example: procedure TForm1.Button1Click(Sender: TObject); var i: Integer; begin i:=1234567890; Caption:=FormatFloat('#,', i); end;