Последние записи
- Как сделать картинку адаптивной, само растягивающейся к размеру монитора, чтобы размер баннера изменялся сам — подстраивался под дизайн сайта
- Прозрачность тайлсета в TPNGImage
- Как сделать VBA макрос в excel
- Поиск по столбцу 1-ого не нулевого значения (формулой в Microsoft Office Excel)
- Простановка единиц в ячейки под объектами (Microsoft Office Excel)
- Расчет затраченного времени между определенным рабочим временем (формулой в Microsoft Office Excel)
- Мигающий экран на Assembler
- VBA-макрос по копированию 10 строчек в выбранном диапазоне в Microsoft Office Excel
- Копирование только нужного диапазона в Microsoft Office Excel
- Перенос диапазона стоки в Microsoft Office Excel на другой лист по условию
3rd
Апр
Выделить память под динамический массив
Posted by Chas under Delphi
Пытаюсь выделить память под массив, но выдает ошибку. Порой на «GetMem», порой на «Foo^[0].Bar1:=1».
Подскажите, может, я не правильно пытаюсь выделить память под массив записей?
Stilet
Хотя это костыльный вариант и он морально устарел. Сейчас модно так:
procedure Something;
type
TBar = record
Bar1: Word; Bar2: Cardinal;
end;
TFoo = array of TBar;
var
Foo: TFoo;
Temp: Byte;
begin
SetLength(Foo, 3);
Foo[0].Bar1:=1;
Foo[1].Bar1:=10;
Foo[2].Bar1:=100;
Temp:=Foo[0].Bar1 + Foo[1].Bar1 + Foo[2].Bar1;
SetLength(Foo,0);
end;
