Undo-Redo

[NeiL]

Народ, просьба поделитесь ссылками или подскажите как сделать межанизм undo - redo при работе с Bitmap'ом.

[Air]

Всё же мне кажется, придётся сохранять Ваш BMP во временный файл, лимит, - ну хотя бы 5, лучше 10.

Для отмены действий просто загружаешь предидуший временный файл, но т.к. это тоже является изменением, перед загрузкой нужно сохрагить в последующий файл, - для повтора действий. Если достигнуто (к примеру) TMPBMP10.bmp, то TMPBMP1.bmp удалить, а на его место записать как бы TMPBMP11.bmp.
В цикле "счётчике" организовать предел от 1 - 10.
Примерно так.

...
Var BMP: TBitmap; //это всё глобальные переменные
     ind:integer;
...
// для сохранения при любых изменениях (выполняется в первую очередь)
procedure SaveTMP(Index:integer);
begin
 index:=ind+1;
 if index = 11 then 
  begin
   ind:=1;
   DeleteFile('TMPBMP'+inttostr(ind)+'.bmp'); // можно не удалять, всёравно затрется.
  end;
 BMP.SaveToFile('TMPBMP'+inttostr(ind)+'.bmp');
end;
...
// для загрузки
procedure LoadTMP(Index:integer);
begin
 index:=ind-1;
 if index = 0 then ind:=10;
 BMP.LoadToFile('TMPBMP'+inttostr(ind)+'.bmp');
end;
...

(Код написан от руки, так что не ругайлесь, если гдето ошибся)

[mutabor]

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

Народ, просьба поделитесь ссылками или подскажите как сделать межанизм undo - redo при работе с Bitmap'ом.

Я думаю тут нужно делать по принципу стека (от англ. стопка), то есть первым вошел, последним вышел. Наглядный пример - магазин от автомата с патронами, чтобы достать первый патрон, нужно вытащить все остальные.
Вместо магазина - динамический массив битмапов (отличие массива - если надо, можно вытащить первый не вытаскивая все). Глубину как душе угодно, можно ограничить тремя а можно и всю историю изменений хранить, лишь бы памяти хватило.
Памяти на битмап 24bit(true color) нужно: кол-во пикселей * 3 байта. Например битмап 800х600 займет (800*600)*3/1024/1024 = 1.37 МБ. Соответственно массив из десяти таких битмапов займет 13.7 МБ, и так далее.

Сохранение нужно делать при отпускании кнопки мыши (если мышью какой нибудь инструмент применяешь) ну или по нажатию на кнопке/меню это у кого как, перед изменением.

[mihali4]

По идее-то, сохранять желательно только сами изменения, а при ундо применять их вторично по ХОR.
Тогда значительно меньше памяти понадобится.

[andrey4623]

А чтобы отловить изменения, надо каждый цвет сравнивать?
Типа две матрицы, одна boolean, другая color, если цвет[i,j] одной матрицы не равнен цвету[i,j] другой матрицы, то boolean[i,j]= true и в color[i,j] = измененный цвет (пиксель)

[mutabor]

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

По идее-то, сохранять желательно только сами изменения, а при ундо применять их вторично по ХОR.
Тогда значительно меньше памяти понадобится.

Оно то понятно, что так лучше, вот только как это сделать? Например я нарисовал от руки линию, как ее отменить не сохраняя битмап?

А чтобы отловить изменения, надо каждый цвет сравнивать?
Типа две матрицы, одна boolean, другая color, если цвет[i,j] одной матрицы не равнен цвету[i,j] другой матрицы, то boolean[i,j]= true и в color[i,j] = измененный цвет (пиксель)

Не думаю, по затратам памяти это равнозначно простому сохранению битмапов, только намного дольше из-за проверки. Матрица ведь все равно есть для измененных цветов, если в нее записывать лишь некоторые пиксели это ничего не меняет, память она все равно займет.

[mihali4]

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

Оно то понятно, что так лучше, вот только как это сделать? Например я нарисовал от руки линию, как ее отменить не сохраняя битмап?

Только что провел натурный эксперимент - взял Image1, вставил в него картинку. Сверху положил еще один Image2 - пустой и прозрачный, а на нем нарисовал линию.
Ундо - сделал Visible:=False для Image2, Редо - вернул видимость.
Нечто вроде слоев... И сравнивать ничего не надо.

[mutabor]

А Image2 канвы не имеет и память не занимает?

[mihali4]

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

А Image2 канвы не имеет и память не занимает?

Дык на прозрачной (Transparent:=True) канве и рисовал.
Занимает, только он же почти пустой и занимает немного.