компонент, позволяющий работать с произвольной растровой картинкой

Zingaro

Member
Joined
Aug 24, 2009
Messages
10
Reaction score
75
ПОдскажите, плз, есть ли компонент, позволяющий работать с произвольной растровой картинкой (PNG, GIF)?
Типа вставлять форматированный текст или другую картинку в нужное место.
 
Last edited by a moderator:

AntiUser

Member
Joined
Dec 13, 2008
Messages
20
Reaction score
101
ПОдскажите, плз, есть ли компонент, позволяющий работать с произвольной растровой картинкой (PNG, GIF)?
Типа вставлять форматированный текст или другую картинку в нужное место.

GDI+ (чтобы было больше 10)
 

Zingaro

Member
Joined
Aug 24, 2009
Messages
10
Reaction score
75
Last edited by a moderator:

Alexsob

Member
Joined
Sep 21, 2007
Messages
12
Reaction score
3
Zingaro
Для работы с изображениями можешь попробовать Envision Image Library или ImageEn. Сам не использую, но jemiko весьма рекомендовал первую библиотеку.
 

AntiUser

Member
Joined
Dec 13, 2008
Messages
20
Reaction score
101

А в чем проблема?
Вывести изображение:
Code:
  graphics := TGPGraphics.Create(DC);
  Image:= TGPImage.Create('..\..\Media\FRUIT.JPG');

  graphics.DrawImage(Image,60,10);

  bitmap.Free;
  Image.Free;
  graphics.Free;

Вывести текст:
Code:
  graphics := TGPGraphics.Create(DC);
  fontFamily:= TGPFontFamily.Create('Times New Roman');
  font := TGPFont.Create(fontFamily, 24, FontStyleRegular, UnitPixel);
  pointF := MakePoint(30.0, 10.0);
  solidBrush:= TGPSolidBrush.Create(MakeColor(255, 0, 0, 255));

  graphics.DrawString('Hello', -1, font, pointF, solidBrush);

  fontFamily.Free;
  font.Free;
  solidBrush.Free;
  graphics.Free;

Что может быть проще?
 

Zingaro

Member
Joined
Aug 24, 2009
Messages
10
Reaction score
75
Zingaro
Для работы с изображениями можешь попробовать Envision Image Library или ImageEn. Сам не использую, но jemiko весьма рекомендовал первую библиотеку.
Сенкс, для моих целей такой навороченности и не нужно.

Добавлено через 2 минуты
А в чем проблема?
Вывести изображение:
Code:
  graphics := TGPGraphics.Create(DC);
  Image:= TGPImage.Create('..\..\Media\FRUIT.JPG');

  graphics.DrawImage(Image,60,10);

  bitmap.Free;
  Image.Free;
  graphics.Free;

Вывести текст:
Code:
  graphics := TGPGraphics.Create(DC);
  fontFamily:= TGPFontFamily.Create('Times New Roman');
  font := TGPFont.Create(fontFamily, 24, FontStyleRegular, UnitPixel);
  pointF := MakePoint(30.0, 10.0);
  solidBrush:= TGPSolidBrush.Create(MakeColor(255, 0, 0, 255));

  graphics.DrawString('Hello', -1, font, pointF, solidBrush);

  fontFamily.Free;
  font.Free;
  solidBrush.Free;
  graphics.Free;

Что может быть проще?

Это сработает с внешней картинкой неизвестного (пока) размера и прозрачностью?

Добавлено через 4 минуты
Zingaro
http://www.mitov.com/html/download_igdi_.html
Работа с GDI+ . Думаю самая лучшая вещь для Дельфи
Что-то сцылка не открывается у меня..

В любом случае Всем спасибо за участие! :)

Добавлено через 11 минут
Чтобы прояснить задачу: Есть внешняя картинка, заранее ее параметры не известны.
Нужно писать текст в ее координатах любым фонтом и цветом, а так же вставлять маленькие картинки по принципу текста, т.е. в координатах большой внешней.
 
Last edited by a moderator:

AntiUser

Member
Joined
Dec 13, 2008
Messages
20
Reaction score
101
Чтобы прояснить задачу: Есть внешняя картинка, заранее ее параметры не известны.
Нужно писать текст в ее координатах любым фонтом и цветом, а так же вставлять маленькие картинки по принципу текста, т.е. в координатах большой внешней.

Для решения этой задачи нужен GDI+ и программист. Больше ничего не надо.
 
Top