Delphi6.

Надо в процедуре инициализировать массив таким примерно образом:
arr : array[1..10] = {<мои числа, десять штук>};

Началось все с того, что локальные переменные так нельзя инициализировать.
Неужели в процедуре писать:
arr[1] := значение1;
arr[2] := значение2;
arr[3] := значение3;


И еще. Компилятор выдает кучу предупреждений о том, что 'такая-то переменная, может быть, не инициализирована', хотя сразу после begin идет присваивание этой переменной. Я с удовольствием писал бы в var что-то вроде:
  t : integer = 2; но ведь компилер такую весчь не пропустит

Напишите кто знает, как в дельфях пишутся эти конструкции, напишите, пожалуйста. И одним счастливым человеком на земле станет больше!

Чуствую себя не очень хорошо, понимаю, что вопрос ламерский, однако в течение часа ответа на него так и не нашел. ((

Чего-то я так и не понял, что именно Вас не устраивает.
Что мешает сделать так:

Procedure Init;
Var Mas:array [1..10] of Integer;
    t:Integer;
Begin
For t:=1 to 10 Do Mas[t]:=0;
End;

А конструкция Var t:Integer = 0; допускается для глобальных переменных.

Цитата(Guest @ 18.10.2002, 11:37)

arr[1] := значение1; arr[2] := значение2; arr[3] := значение3;

Ежели значения элементов массива нельзя привязать никакой зависимостью от индекса, то запиши значения в файл, а в программе считай в массив.

Можно попробовать использовать типизированные константы вместо переменных, только я не помню будет ли это работать для Дельфи 6

Я просто до этого на сях писал. Там есть такая конструкция. int i[4] = {12, 45, 88, 50}. На дельфях так не получилось. Видно, подобной конструкции нет там вообще (что ее нет в паскале - это точно абсолютно).

Просто я написал
arr[1] := 19;
arr[2] := 36;
arr[3] := 90;
...
И так 30 строк. Вот и подумал - а насколько это грамотно? Можно, наверно, в одну строку (но не так: arr[1] := 19; arr[2] := 36; :-))

В файл в данном случае смысла нет писать - надо будет с экзешником еще и файл какой-то таскать...

А что с 'переменная не инициализирована'? В хелпе читал чего-то по этому поводу - ничего не понял. Не узнаю Борланду - хелпы всегда путёвые были...

P. S. Спасибо всем ответившим!

Delphi6 разрешает инициализацию:

Код

var  real_a:array [1..5] of integer=(23,44,33,563,66);:

В паскале вроде делали так:

Код

const a:array [1..5] of integer=(23,44,33,563,66)

Типизированные константы вроде то же самое, что переменные. В смысле их можно менять.

В крайнем случае:

Код

type  Arrayof5Integers=array [1..5] of integer; const a:Arrayof5Integers=(23,44,33,563,66) var real_a:Arrayof5Integers; begin  real_a:=a; end;

Не так изящьно как в сях, но работает(должно). Однако попробуй первый вариант сначала.

Ответ конечно не совсем относиться к вопросу но так, к сведению что прежде чем использовать динамический массив (а в вопросе не о нем идет речь) требуется его инициализировать.....

SetLength(var S; NewLength: Integer);

Цитата

Ответ конечно не совсем относиться к вопросу но так, к сведению что прежде чем использовать динамический массив (а в вопросе не о нем идет речь) требуется его инициализировать.....

Да уж. С этим-то я справляюсь :-)

Fantasist, спасибо.

Всем спасибо.