Re: Leading zeros with Int_IO.Put()? Or another package?

["Pascal Obry" <pascal.obry@der.edfgdf.fr>]

Norman H. Cohen <ncohen@watson.ibm.com> a =E9crit dans l'article =
<3281088B.24F@watson.ibm.com>...
>=20
>    declare
>       Image  : constant String :=3D Minute'Image;
                                                 ^^^^^^^^^^^^^^^^
It should be :  Image : constant String :=3D Integer'Image (Minute);

Well I don't know the type of Minute, so I have assumed that it is an =
Integer.

>       Buffer : String (1 .. Field_Length);  -- 2 in the case of =
minutes
>    begin
>       Ada.Strings.Fixed.Move
>          (Source  =3D> Image (2 .. Image'Length),
>           Target  =3D> Buffer,=20
>           Justify =3D> Right,=20
>           Pad     =3D> '0');
>       Ada.Text_IO.Put (Buffer);
>    end;
>=20
> --=20
> Norman H. Cohen
> mailto:ncohen@watson.ibm.com
> http://www.research.ibm.com/people/n/ncohen
>=20

--=20

--|------------------------------------------------------------
--| Pascal Obry                               Team-Ada Member |
--|                                                           |
--| EDF-DER-IPN-SID- Ing=E9nierie des Syst=E8mes d'Informations   |
--|                                                           |
--| Bureau G1-010           e-mail: pascal.obry@der.edfgdf.fr |
--| 1 Av G=E9n=E9ral de Gaulle  voice : +33-1-47.65.50.91         |
--| 92141 Clamart CEDEX     fax   : +33-1-47.65.50.07         |
--| FRANCE                                                    |
--|------------------------------------------------------------
--|
--|   http://ourworld.compuserve.com/homepages/pascal_obry
--|
--|   "The best way to travel is by means of imagination"