Вниз
Скачать: CL | DM;

Рисование на Image с использованием GDI+   Найти похожие ветки 

← →
Tab   (2006-10-05 20:49) [0]

рисую на 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 линия получается не сглаженная, а если рисовать на форме то все ок.
Как быть?


← →
SamBrook ©   (2006-10-05 21:22) [1]


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

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


← →
Tab   (2006-10-05 21:36) [2]

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


← →
SamBrook ©   (2006-10-05 22:01) [3]


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

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


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

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


← →
Pent   (2006-10-05 22:48) [5]

Да


← →
SamBrook ©   (2006-10-05 22:48) [6]


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

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


← →
Tab   (2006-10-06 06:12) [7]

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



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.016 c
2-1180793081
Anna_Roza
2007-06-02 18:04
2007.06.24
TTable путешествия по строкам


11-1163643952
КВАНТ
2006-11-16 05:25
2007.06.24
Циклом читать и писать настройки из/в файл


8-1160561120
zorgens
2006-10-11 14:05
2007.06.24
DSPack


15-1180041493
sat
2007-05-25 01:18
2007.06.24
bat file


11-1162989060
heilong
2006-11-08 15:31
2007.06.24
layouts like QT в KOL




   Наверх