Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.12;
Скачать: 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 вся ветка

Текущий архив: 2006.03.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.045 c
2-1140548935
Express
2006-02-21 22:08
2006.03.12
Canvas


2-1140324620
VitalikS
2006-02-19 07:50
2006.03.12
Автоинкримент


11-1118770848
Владимир Кладов
2005-06-14 21:40
2006.03.12
Новая версия


3-1137372262
DimonS
2006-01-16 03:44
2006.03.12
Access +SQL


2-1140448453
Spieler
2006-02-20 18:14
2006.03.12
Сообщения Windows