Показать сообщение отдельно
  #1  
Старый 20.12.2010, 04:12
Templar Templar вне форума
Прохожий
 
Регистрация: 20.12.2010
Сообщения: 2
Репутация: 10
По умолчанию Отмена действий на рисунке через DrawGrid

В общем, суть такова, что любое изменение рисунка заносится в DrawGrid. При нажатии кнопки - должно вырисовывать значение ячейки DrawGrid'a -1. Вот участок кода, отвечающий за отмену, но почему-то выбивающий ошибку. Помогите разобраться плз
Код:
if i>0 then begin
i:=i-1; //счетчик ячеек
bitmap.Height:=DrawGrid1.DefaultRowHeight;  //Высота битмапа по высоте ячейки
bitmap.Width:=DrawGrid1.DefaultColWidth; //Ширина битмапа по ширинее ячейки
bitmap.Canvas.CopyRect(DrawGrid1.CellRect(0,i),bitmap.Canvas,bounds(0,0,bitmap.Width,bitmap.Height)); //Копируем содержание ячейки в битмап
Image1.Picture.Bitmap:=bitmap; //Присваиваем Image содержние битмапа
img.Width:=Image1.ClientWidth; //Ширина условного изображения по ширине Image
buffer.Height:=Image1.ClientHeight; //Тоже самое
img.Height:=Image1.ClientHeight; //Высота условного изображения по высоте Image
buffer.Height:=Image1.ClientHeight; //Тоже самое
PaintBox1.ClientHeight:=Image1.ClientHeight; //Высота и ширина пейнтбокса по имеджу
PaintBox1.ClientWidth:=Image1.ClientWidth; //
img.Canvas.CopyRect(bounds (0,0,Image1.Width,Image1.Height),Image1.Canvas,bounds(0,0,Image1.Width,Image1.Height)); // Копируем содержание Имеджа в условное изображение
buffer.Assign(img); // Тоже самое
PaintBox1.Canvas.CopyRect(bounds(0,0,img.Width,img.Height), 
img.Canvas,bounds(0,0,img.Width,img.Height)); // рисуем в пейнтбокс
end;

Зы, просьба руки не ломать, только учусь)
Ответить с цитированием