Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.01.08;
Скачать: CL | DM;

Вниз

Ошибка в коде   Найти похожие ветки 

 
De1uxe ©   (2005-12-07 20:23) [0]

Уважаемые мастера помогите пожалуйста.
Имеется следующий код:

  myrect:=rect(10,10,100,100);
  bitmap:=tbitmap.Create;
  bitmap1:=tbitmap.Create;
  bitmap1.LoadFromFile("c:\2.bmp");
  Bitmap.Canvas.CopyRect(myrect,bitmap1.Canvas,myrect);
  bitmap.SaveToFile("c:\1.bmp");

Вот что я хочу от этого кода:
1. Открыл изображение 2.bmp
2. Отрезал прямоугольник с координатами (10,10,100,100)
3. Сохранил отрезаный кусок в 1.bmp
     Но вместо этого я получаю исжодную картинку в файле 1.bmp
В чем дело?


 
de1uxe ©   (2005-12-07 20:32) [1]

Ой не исходную картинку я получаю, а пустую картинку


 
Virgo_Style ©   (2005-12-07 20:39) [2]

...
bitmap1.LoadFromFile("c:\test.bmp");
with MyRect do begin
 bitmap.Width:=Right-Left+1;
 bitmap.Height:=Bottom-Top+1;
end;
Bitmap.Canvas.CopyRect(myrect,bitmap1.Canvas,myrect);
...


 
Lamer@fools.ua ©   (2005-12-07 20:42) [3]

Перед CopyRect:
 bitmap.Width := myrect.Right - myrect.Left;
 bitmap.Height := myrect.Bottom - myrect.Top;


 
De1uxe ©   (2005-12-07 22:32) [4]

Большое спасибо помогло!


 
Джо ©   (2005-12-07 22:33) [5]

Спамим потихоньку? ;)



Страницы: 1 вся ветка

Текущий архив: 2006.01.08;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.013 c
2-1135069152
medved_68
2005-12-20 11:59
2006.01.08
Список оборудования


14-1134553613
Piter
2005-12-14 12:46
2006.01.08
3gp кодек


2-1134991447
Владимир
2005-12-19 14:24
2006.01.08
Маленький трафик


3-1131922025
mfender
2005-11-14 01:47
2006.01.08
Empty Dataset, новая запись и Stack Overflow...


14-1134623082
begin...end
2005-12-15 08:04
2006.01.08
С Днём рождения! 15 декабря