В пятницу хотел сделать подобное и понял, что не знаю как. Почитал хелп, что-то по нолям. Собственно задача, если вдруг кто не понял:
var a:array[1..3] of integer;
begin
 //наверное что-то такое
 a:=(1,2,3);
end;

Знаю, что можно сделать константно, но теперь уже просто хочется узнать "собственно как?". Заранее благодарен за помощь.

Для твоего примера код будет выглядеть так:


Это сообщение отредактировал(а) LesnoyChelovek - 17.2.2008, 17:24

Если записывать константы в секции interface, то можно так:

Вы не очень поняли о чем я, всё это я знаю.

var
  a: array[1..3] of integer = (1, 2, 3);

Насколько мне не изменяет память этот код работать не будет, вот если "var" заменить на "const" то всё будет впорядке.
2LesnoyChelovek: 1,2,3 были для примера. А если у тебя массив состоит из 15ти значений и все разные(связи между ними нте), а ну и при этом нельзя использовать константы. Каждому a[i]-му свой элемент присваивать? Помойму это не очень красивый код, да и к тому же громоздкий.

Ещё раз попробую пояснить чего хочу.
var a:array[1..x] of integer;
x известен заранее и не меняется. Все значения массива известны заранее, но через константы его задать нельзя. Вариант задать каждый элемент в отдельности недопустим. Хочется написать один оператор присваивания и засунуть через него сразу все элементы массива.

Вот такой вариант кода тоже неверен:


Много конечно хочу, но не верю что такой возможности нет 

если мпассив глобальный, то можно и с var

Ы?

Угу извиняюсь, про интерфэйс чет недочитал. Массив в процедуре, задан локально. Единственная идея была как-то преобразовать (1,2,3,...) в массив и присвоить уже нужному массиву. Но только функций преобразования в такие типы я не знаю :(

тогда этот вариант

но вместо array[1..x] of integer идентификатор типа, равного array[1..x] of integer

bems если честно не очень понял. Если ты хочешь в конст просто задать всё явно и потом присвоить, то так нельзя. Считай, что Const просто не существует.

P.S> Возможно туплю, но пока не понимаю какой такой тип равен array[1..x] of integer

Добавлено через 3 минуты и 13 секунд
а это чем не нравится?

или усовершенствованный вариант немного....



Вообще не проверял, но если компилятор не будет ругаться, должно по идее работать

не будет. не будет работать даже такой вариант

ибо для компилятора это разные типы

ну тогда вот так...




Добавлено через 3 минуты и 43 секунды
хм... почему то в процедуре SetLength компилятор ругается.... 

Это сообщение отредактировал(а) lukas - 18.2.2008, 17:40

lukas, я думаю, что тут задача не перегнать значения из одного массива в другой. 
А для обычного копирования либо Move, либо массивы одного типа.

это потому что 

в параматрах подпрограммы это любой массив строк, а не динамический массив