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

Как рисовать цветом кнопки   Найти похожие ветки 

← →
AD_infiniTUM   (2004-07-22 20:57) [0]

Рисую стрелку таким образом
DC := GetDC(Wnd);
Pen := CreatePen(PS_SOLID, 1, COLOR_BTNFACE + 1);
Brush := CreateSolidBrush(COLOR_BTNFACE + 1);
OldP := SelectObject(DC, Pen);
OldB := SelectObject(DC, Brush);
Sign[0].X := X1;
Sign[0].Y := Y1;
Sign[1].X := X1 + SignWidth;
Sign[1].Y := Y1;
Sign[2].X := X1 + (SignWidth div 2);
Sign[2].Y := Y1 + SignHeight - 1;
Polygon(DC, Sign, 3);
SelectObject(DC, OldP);
SelectObject(DC, OldB);
DeleteObject(Pen);
DeleteObject(Brush);
ReleaseDC(Wnd, DC);

По идее она должна быть цветом стандартной кнопки, но она - черная. Что я делаю не правильно?

Зарнее спасибо.


← →
DVM ©   (2004-07-22 23:42) [1]

GetSysColor(COLOR_BTNFACE) вместо COLOR_BTNFACE + 1


← →
Kind ©   (2004-07-22 23:45) [2]

CreatePen, CreateBrush не понимают системные константы цвета.
Используй GetSysColor(Системный цвет)

Делай так:
DC := GetDC(Wnd);
Pen := CreatePen(PS_SOLID, 1, GetSysColor(COLOR_BTNFACE + 1));
Brush := CreateSolidBrush(GetSysColor(COLOR_BTNFACE + 1));
OldP := SelectObject(DC, Pen);
OldB := SelectObject(DC, Brush);
Sign[0].X := X1;
Sign[0].Y := Y1;
Sign[1].X := X1 + SignWidth;
Sign[1].Y := Y1;
Sign[2].X := X1 + (SignWidth div 2);
Sign[2].Y := Y1 + SignHeight - 1;
Polygon(DC, Sign, 3);
SelectObject(DC, OldP);
SelectObject(DC, OldB);
DeleteObject(Pen);
DeleteObject(Brush);
ReleaseDC(Wnd, DC);

И всё пучком.


← →
DVM ©   (2004-07-22 23:53) [3]


> Kind ©   (22.07.04 23:45) [2]

не надо + 1


← →
Kind ©   (2004-07-23 00:16) [4]

Ну вдруг у него что-то своё там в программе, специфическое :)


← →
AD_infiniTUM   (2004-07-23 08:43) [5]

Спасибо, все работает.

> Ну вдруг у него что-то своё там в программе, специфическое

Нет ничего специфического :)



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

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



Память: 0.46 MB
Время: 0.023 c
3-1092146946
Koala
2004-08-10 18:09
2004.09.05
Как записать в поле даты - Null


3-1092217873
DA
2004-08-11 13:51
2004.09.05
Коннект к MS SQL


1-1092826286
Lizka
2004-08-18 14:51
2004.09.05
Ширина колонок у EhLibDBGrid


14-1092343375
pasha_golub
2004-08-13 00:42
2004.09.05
Литература vs Кинематограф


3-1091801616
Руслан
2004-08-06 18:13
2004.09.05
Как некоторые строки в DBGrid выделить жирным шрифтом?




   Наверх