Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Рисование на Image с использованием GDI+ [D7, WinXP]


Tab ©   (2006-10-05 20:49:00) 

рисую на Image через GDI+
код:

procedure TForm1.FormPaint(Sender: TObject);
var
 graphics : TGPGraphics;
 pen: TGPPen;
begin
 graphics := TGPGraphics.Create(Image1.Canvas.Handle);
 pen:= TGPPen.Create(MakeColor(255, 0, 0, 255));
 graphics.SetSmoothingMode(SmoothingModeAntiAlias);
 graphics.DrawLine(pen, 0, 0, 200, 100);

 graphics.Free;
 pen.Free;
end;

Если рисую на Image линия получается не сглаженная, а если рисовать на форме то все ок.
Как быть?


Tab   (2006-10-06 06:12:00) [1]

Еще раз спасибо !


Pent   (2006-10-05 22:48:00) [2]

Да


SamBrook   (2006-10-05 22:48:00) [3]


> Т.е. Image это контейнер для рисунков. а PaintBox именно
> область для рисования?

Да, но не в этом суть проблемы, а в том, что tImage использует канву битмапа, к которой привязано растровое изображение.


Tab   (2006-10-05 22:13:00) [4]

Т.е. Image это контейнер для рисунков. а PaintBox именно область для рисования?


SamBrook   (2006-10-05 22:01:00) [5]


> хм, помогло, спасибо. А с чем это связано? :)

с тем, что у tImage нет собственной канвы.


Tab   (2006-10-05 21:36:00) [6]

хм, помогло, спасибо. А с чем это связано? :)


SamBrook   (2006-10-05 21:22:00) [7]


> Если рисую на Image линия получается не сглаженная, а если
> рисовать на форме то все ок.
> Как быть?

Не пользоваться tImage (можно заменить на tPaintBox)


Наверх

Титульная страница Поиск, карта сайта Написать письмо