Главная страница
    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.053 c
15-1171802179
C@N
2007-02-18 15:36
2007.03.18
господа! есть ли аналог дельфи, только фриваре????


2-1172216426
Belorus
2007-02-23 10:40
2007.03.18
Сохранение записи в файл.


15-1172143121
Rouse_
2007-02-22 14:18
2007.03.18
Директор, это ерунда. Депутаты - круче :)


15-1172334357
Stan
2007-02-24 19:25
2007.03.18
Выравнивание данных


15-1172315589
vasIZmax
2007-02-24 14:13
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский