Архив форумов ЦИТФорума

[HD]

Как задавать массивы переменной длинны?

[ЗасЛанец]

Как то можно, используя переменную типа Variant, но я не помню как, посмотрю старые исходники, если найду, сообщу.
А ещё, можно создать указатель на массив, и выделять под него необходимое количество памяти, потребовалось изменить размер, переопределил размер выделенного блока.
Между прочим, в Делфях на этом принципе работают классы-массивы, например, TStrings.
Кстати, можешь это дело собственным классом оформить

[Василий]

>>Как задавать массивы переменной длинны?

var MayArray : array of single;
realvalue:single;
NewLength:longint;
begin
NewLength:=10;
setlength(MayArray,NewLength);
realvalue:=0.003;
MayArray[3]:=realvalue;
setlength(MayArray,4); //индексация с нуля
end;