![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Инициализация массива. [D7, XP]
Б © (2010-05-01 23:23:00)Здрасти!
Имеется массив, нужно его при инициализцаии заполнить специфическими константами, не хочется прописывать
типа:
Arr[1]:= 1; // Для наглядности взяты числа.
Arr[2]:= 2;
Arr[3]:= 3;
...........
Вопрос в том, что массив получается глобальным, а надо его запихнуть в XProc, но там проинициализировать в ручную массив нельзя.
Var
Arr: array [0..2] of LongWord = (1, 2, 3); // На самом деле, массив гораздо
// больше.
Procedure XProc;
begin
Arr[1]:= 72;
End;
Германн (2010-05-02 02:34:00) [61]
>
> Вопрос в том, что массив получается глобальным, а надо его
> запихнуть в XProc, но там проинициализировать в ручную массив
> нельзя.
Так в чём проблема? Или я чего-то не понимаю?
Демо (2010-05-01 23:39:00) [62]
> Б (01.05.10 23:23)
Программно сформировать файл с кодом для заполнения массива, хатем воспользоваться{$INCLUDE <FileName>}