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

TPen   Найти похожие ветки 

← →
TAK   (2006-02-25 11:30) [0]

Здравствуйте, Мастера!
У меня проблема. Надо получть кисть с прямыми краями. Типа PS_ENDCAP_SQUARE в ExtCreatePen. А стандартный TPen  использует CreatePenIndirect. Не ужели полностью переписывать TPen :(

---

← →
Гаврила ©   (2006-02-25 11:35) [1]

А зачем тебе именно TPen такой? Нельзя использовать HPen?
Или, опять же, присвоить ему handle руками
Pen.Handle:=ExtCreatePen(..)
?

---

← →
TAK   (2006-02-25 11:58) [2]

Просто уже существует в программе наследник от TPen. Но линиии рисуются с закруглёнными концами. Необходимо концы выпрямить с наименьшими изменениями кода.
" присвоить ему handle руками"... Можно поподробней? Я в графике не силён.

---

← →
Гаврила ©   (2006-02-25 12:08) [3]

> " присвоить ему handle руками"... Можно поподробней? Я
> в графике не силён.


Вот непосредственно и выполнить этот код:
var
 Pen: TPen; (или Pen: TSomePenDescendant)
..
Pen.Handle:=ExtCreatePen (тут указываешь нужные параметры, например PS_ENDCAP_SQUARE)
я это не проверял, попробуй - получится или нет

---

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

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



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