Re: how to create an array of N elements?

[Richard Riehle <richard@adaworks.com>]

drmed wrote:

> thank you.
>
> then an other question:
>
> list : unbounded_string;
> type page is array(Positive range <>) of list;
> text : page(1 .. 300);
>
> but how can I change the number of elements in runtime? for example I
> delete a element of the array text or add one so that the array text
> now has only 200 elements and really only 200 elements and not contain
> a null string.

Consider using a declare block.  For example,

    with ada.integer_text_io;
    procedure Dynamic_Array is
        Size : Positive := 300;
    begin
        ada.integer_text_io.get(size);
       Variable_Size_Array_Block:
       declare
           S : String(1..Size);
       begin
          for I in S'Range
             loop
               null;
             end loop;
      end Variable_Size_Array_Block;
end Dynamic_Array;

Many Ada developers will recommend a better
approach such as nesting a subprogram in the
declarations of the enclosing unit and passing the
new size as a parameter.   Either way, you can
accomodate variable size array declarations in
your program if you need them.

Richard Riehle