type PtImg = ^TtImg; TtImg = array [0..0] of TImage; var tImg: PtImg; GetMem(tImg, 4 * numberofentries);
Преимущество в том, что вы должны использовать столько памяти, сколько вам нужно. Недостаток в том, что вы должны кодировать все с tImg^[n]....