Re: Converting Type Characters to type string

[Georg Bauhaus <rm.plus-bug.tsoh@maps.futureapps.de>]

On Sun, 2008-03-30 at 14:08 -0700, jedivaughn wrote:
> number 1 thank you so much for the fast response. But when I try your
> suggestion and use say "1234" for the input I get the number 1, a few
> spaces, and then some smiley faces. not exactly what I was hoping
> for :) .  Here's my code if that's any help.

Do I understand correctly that you want "1234" to be 4 integers?
In that case there is a loop missing.

> with ada.text_IO, ada.integer_text_IO;
> 
> procedure integers is
> 
> index : natural :=0;
> char : character;
> str : string (1..10);

str : string (1..10) := (1..10 => '*');  -- to see the effect

> begin
> 
>     ada.text_IO.put("Please enter a few Integers ");
>     ada.text_IO.get(char);
> 
>     Index := Index + 1;
>     Str(Index) := Char;
>     ada.text_IO.put(str);
> 
> end integers;
> 
> 
> 
> Once again thanks so much for your help
> - John