Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.03.18;
Скачать: [xml.tar.bz2];

Вниз

Image   Найти похожие ветки 

 
kail   (2007-02-23 18:52) [0]

Доскажите, возможно ли средствами Delphi  вырезать из изрображения размером x на y начиная с определенных координат?


 
RASkov   (2007-02-23 18:58) [1]

CopyRect


 
RASkov   (2007-02-23 19:02) [2]

А куда вырезать. Если просто убрать кусок из картинки можно и
Brush.Color:=<цвет фона>;
FillRect(Rect(x1, y1, x1+x, y1+y))
???


 
kail   (2007-02-23 19:02) [3]

А можно подробнее как это работает


 
kail   (2007-02-23 19:04) [4]

Нет... есть рисунок Bmp вгруженный в компонент image. надо создавать маленькую картинку, вырезанную из большого рисунка


 
trubin ©   (2007-02-23 19:21) [5]

Как и указано в [1] TCanvas.CopyRect


 
kail   (2007-02-23 19:26) [6]

А можно накидать небольшой листинг, где из image1 получается image2, вырезанная из 1 по опр ширины, высоты и начинаю с опредл. точки


 
RASkov   (2007-02-23 20:17) [7]

> [6] kail   (23.02.07 19:26)

Ну чтонить типа так:

procedure CutPicture(Im1, Im2: TCanvas; const ARect: TRect);
begin
 im2.CopyRect(Rect(0,0,Arect.Right-ARect.Left, Arect.Bottom-Arect.Top), Im1, ARect);
end;
......
CutPicture(Image1.Canvas, Image2.Canvas, Rect(10,10,100,100));



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

Форум: "Начинающим";
Текущий архив: 2007.03.18;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.13 c
2-1172510246
FIL-23
2007-02-26 20:17
2007.03.18
Курсор в мемо


2-1172229078
vitv
2007-02-23 14:11
2007.03.18
Построение запроса


2-1172154352
Lonix
2007-02-22 17:25
2007.03.18
Button


15-1171983453
Gin2
2007-02-20 17:57
2007.03.18
Виндовая писалка


1-1169200915
Delphi-Chainik
2007-01-19 13:01
2007.03.18
Тип запуска у службы





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский