[Velz]

Сообщение от icWasya

Ну так вернёмся к моему первому ответу - если SetLength заработал, тогда
вот это PCommandStackElmt = ^TCommandStackElmt; - не нужно.
используй прямо

Код:

PCommandStack : TCommandStackElmt;

Ага, как раз проверял - все работает... и даже напрямую (объявление массива в самом классе

Код:

  TCommandStack = class (TObject)
  private
    Created: Boolean;
    FSize: Cardinal;
    FCount: Cardinal;
    function GetLength : Cardinal;
    function FSetSize (NewSize: Cardinal) : Boolean;
    procedure FSetCount (NewCount: Cardinal);
  public
    CommandStack: array of TCommandStackElement;

Все отлично, вся проблема только из за "указательной" природы классов, вот и была туча различных ошибок.

P.S. Деструктор все-равно делать, вот только в какой момент и к кому его прикручивать... но это уже другая тема =)