Форум: "Основная";
Текущий архив: 2005.06.29;
Скачать: [xml.tar.bz2];
ВнизДинамические массивы Найти похожие ветки
← →
terra0 © (2005-06-08 20:44) [0]Возможно ли в паскале, в теле программы присвоить динамическому массиву (целочисленного типа) сразу набор значений, что-то типа
var
a:array of Integer;
begin
SetLength(a,5);
a:=(1,2,3,4,5);
end;
или что-то подобное, может я не знаю синтаксиса, или это невозможно в принципе?
С уважением, terra0
← →
Alx2 © (2005-06-08 20:56) [1]Не в курсе, есть ли стандартные функции, но собственное можно написать примерно так:
type TIntegerArray = array of integer;
function SetArray(Data: array of integer): TIntegerArray;
var k: integer;
begin
SetLength(Result, Length(Data));
for k := Low(Data) to High(Data) do
Result[k - Low(Data)] := Data[k]; // K-Low(Data) - параноическое "на всякий случай" :)
end;
var A: TIntegerArray;
begin
A := SetArray([1, 2, 3, 4, 5]);
end;
← →
terra0 © (2005-06-08 20:59) [2]Большое спасибо, хотя конечно по сравнению с Си это та еще проблемка :)
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2005.06.29;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.044 c