Идёт загрузка страницы...

htp://aptem.net.ru





Delphi 1

Массив компонентов III


   
type
PtImg = ^TtImg;
TtImg = array [0..0] of TImage;
var
tImg: PtImg;

GetMem(tImg, 4 * numberofentries);

Преимущество в том, что вы должны использовать столько памяти, сколько вам нужно. Недостаток в том, что вы должны кодировать все с tImg^[n].... [000428]