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

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

 
vvvaaa   (2005-09-04 12:05) [0]

var  hBr:HWND;
    l:LogBrush;
begin
 ...
 l.lbStyle:=BS_SOLID;
 l.lbColor:=AColor[ColorIndex];
 hBr:=CreateBrushIndirect(l);
 SelectObject(hDC1,hBr);
 Rectangle(hDC1,0,0,200,400);
 ...
 RedrawWindow(Handle,nil,0,RDW_INVALIDATE);
 DeleteObject(hBr);
end;

Возможно ли просто менять цвет кисти, а не удалять и заново создавать её с другим цветом?


 
Anton_K ©   (2005-09-04 12:12) [1]

Функция SetDCBrushColor, но только для Windows 2000/XP.


 
vvvaaa   (2005-09-04 12:19) [2]

У меня XP, но функция не работает и в SDK её нет :( Может есть ещё какие-то ограничения? И нет ли какой-то более универсальной функции?


 
Anton_K ©   (2005-09-04 18:50) [3]

>в SDK её нет
Зато в MSDN есть.
>И нет ли какой-то более универсальной функции?
Нет.



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

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



Память: 0.45 MB
Время: 0.025 c
2-1129009737
Серг73
2005-10-11 09:48
2005.11.06
Помогите плз... Delphi7>ADO>Access


14-1129150278
Германн
2005-10-13 00:51
2005.11.06
Непонятный глюк на форуме


1-1129707692
kyn66
2005-10-19 11:41
2005.11.06
Почему FindComponent не находит


1-1129199943
Aleksandr.
2005-10-13 14:39
2005.11.06
Объясните мне, в чем проблема уничтожения терминированной нити?!


1-1129160464
stef
2005-10-13 03:41
2005.11.06
Не получается создать список объектов




   Наверх