Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 01.10.2009, 21:36   #1
TwiX
Участник клуба
 
Аватар для TwiX
 
Регистрация: 28.07.2009
Сообщений: 1,510
По умолчанию Как скопировать из timage 100x100 определённыую чсть 10х10 например?

Конечно если делать это попиксельно, то это несложно.
интересно просто есть ли такая функция?
TwiX вне форума Ответить с цитированием
Старый 01.10.2009, 22:34   #2
DeKot
Участник клуба
 
Аватар для DeKot
 
Регистрация: 12.08.2008
Сообщений: 1,977
По умолчанию

Используй метод CopyRect для объектов с канвой.
Код:
var Buffer: TBitMap;
  procedure CopyFragment;
begin
  Buffer:= TBitMap.Create;
  Buffer.Width:= 100;
  Buffer.Height:= 100;
  Buffer.Canvas.CopyRect(Bounds(20,30,10,10),Image1.Picture.Canvas,Bounds(50,60,10,10));
end;
В созданный объект Buffer (размером 100 х 100) в область с координатами (20,30) и размером (10 х 10) копируем из Canvas рисунка Image1 (при условии, что этот рисунок существует в проекте) область изображения с координатами (50,60) и размером (10 х 10).
И не сомневайся даже ... отдых - кайф, работа - лажа!

Последний раз редактировалось DeKot; 01.10.2009 в 22:56.
DeKot вне форума Ответить с цитированием
Старый 01.10.2009, 22:38   #3
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,713
По умолчанию

var rect : trect;
ce : tCanvas;
begin
rect.Left:=0; rect.Top:=0; rect.Right:=10; rect.Bottom:=10;
image.picture.bitmap.canvas.copyRec t(rect,ce,rect);
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как сделать так чтобы моя программа при включении отображалась в панели задач, как например часы Window ? asked86 Win Api 1 15.12.2008 08:42
Есть масив а[i,j] (10х10), все елементы которого равны 0, т.е нулевая матрица, как воплотить в программе? alex2008ean Паскаль, Turbo Pascal, PascalABC.NET 2 10.12.2008 00:08
Как создать гиперссылку в событии onMouseMove на панели, например? SkAndrew Общие вопросы Delphi 16 15.11.2008 01:17
Как печатать в верхней подстроке в Delphi например 2 в квадрате Moel Общие вопросы Delphi 3 19.06.2008 15:30
Дано четырехзначное число, заданное в символьном виде, например, '1954'. Напечатать его текстом, например gred Помощь студентам 13 31.03.2008 22:24