Отмена предыдущего действия (Undo, redo)

[Matew]

У меня есть массив(arr1) в котором хранится все, что есть на экране. Я сделал так: при выделении какого-нить объекта arr1 копируется в arr2 и если потом с этим объектом ченить делают (перетаскивают или вертят), то arr2 копирую в arr3. И при нажатии на кнопку «отмена» (Undo, как в ворде со стрелочкой назад) все из массива arr3 копируется в arr1 и все заново прорисовывается. Все это работает, но: это как-то коряво и мне надо запоминать как минимум 3 предыдущих действия, а заводить еще пару массивов типа arr3 мне не хочется (они большие очень). Есть алгоритм попроще? Подскажите, плизз.

[Ruslan Demidow]

Навскидку: Создай один массив элементами которого будут твои типы записей. Полями записи будут состояния твоих контролов.
При изменении состояния контрола, добавляй в массив новую запись с новым состояние контролов через Redim Preserve arrControls (1 to Ubound(arrControls)+1).
При отмене - восстанавливай состояние контролов из предыдущего элемента массива.
А при Redo - из следующего.
Минусы - отъедается память за счет постоянного увеличения размера массива. Возможные варианты решения - контролировать размер массива при изменении. Или при отмене - удалять последний элемент массива.

[Matew]

Ruslan Demidow, я так понял, что ты предлагаешь мне создать массив массиов arr3?:-)

[Sedge]

Сделай двумерный массив. Одно измерение - параметры, другое измерение - варианты состояний.

[Matew]

К сожалению этот массив итак уже 3-х мерный(( и очень большой, я хотел это как то обойти.

[Ruslan Demidow]

К сожалению этот массив итак уже 3-х мерный(( и очень большой, я хотел это как то обойти.

В твоём первом варианте, с каждым новым изменением, на каждую отмену придётся заводить новый массив.
Тебе же нужн завести только один массив и в одном элементе этого массива хранить одно изменённое состоение всех контролов на форме.
Вот что я предлагаю.
А уж что будет у тебя храниться в одном элементе массива - решать тебе (будут ли это записи пользовательского типа или коллекции или классы).