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

Работа с canvas в D7   Найти похожие ветки 

← →
Sergei Nevazhnyi   (2003-06-25 18:03) [0]

Кто-нибудь знает, почему из D7 выкинули TWinControl.Canvas? В D5 оно было. Мне надо нарисовать мышью рамку на объекте класса TCustomPanel, чтобы потом, например, выделить эту область (как в Paint). Раньше это делалось так примерно:

1. Переводим canvas в режим pmXOr:

with Panel1.Canvas.pen do
begin
Color := Panel1.Color;
Mode := pmXOr;
Style := psDot;
Width := 1;
Refresh;
end;
Screen.Cursor := crCross;

2. А теперь вслед за мышью рисуем рамку

Panel1.Canvas.Polyline([Point1,Point2,Point3,Point4,Point1]);

Как это сделать в Д7?

---

← →
MBo ©   (2003-06-26 06:52) [1]

ни в D5, ни в других версиях TWinControl.Canvas не было напрямую доступно. Так что
>Раньше это делалось так примерно
неправда

---

← →
Sergei Nevazhnyi   (2003-06-26 16:52) [2]

Верно, напрямую не доступно. Но через функцию GetDC(Handle) получить доступ к TWinControl.Canvas можно было.
А вообще я разобрался. Класс TCanvas определяется еще и в CLX unit QGraphics и для него многое не так (беда с этими cross-platform applications)

---

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

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



Память: 0.45 MB
Время: 0.015 c