![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Мастера, научите! [D6, Win2k]
Kair © (2004-12-28 10:51:00)1. Как устанавливать цвет у окна?
-=SS=- (2004-12-28 11:34:00) [1]Самый простой способ
Var
Can:TCanvas;
begin
Can:=TCanvas.Create;
Can.Handle:=GetDc(Form1.Handle);
Can.Brush.Color := $FF005A;
Can.Pen.Color := $FF005A;
Can.Rectangle(0,0,ClientWidth,ClientHeight);
Can.Free;
Правда сделано через одно место :)
wal (2004-12-28 11:26:00) [2]SetClassLong(hwnd, GCL_HBRBACKGROUND, hBrush).
Помоему так.
С уважением.
Kair (2004-12-28 11:12:00) [3]
> Jay1982 © (28.12.04 11:07) [1]
> Form1.Color
Конференция WinAPI...
> Atrion © (28.12.04 11:08) [4]
> А при создании окна ты что цвет не указываешь?...При регистрации
> оконного класса указываешь цвет окна...
Надо устанавливать когда уже окно создано. И не стандартные цвета типа Color_BtnFace, а какой-нибудь красный, синий или еще типа такого.
Atrion (2004-12-28 11:10:00) [4]Form1.Color не подойдет...или просто вопрос не в том разделе...
Jay1982 (2004-12-28 11:08:00) [5]Form1.Color
Atrion (2004-12-28 11:08:00) [6]А при создании окна ты что цвет не указываешь?...При регистрации оконного класса указываешь цвет окна...
Jay1982 (2004-12-28 11:07:00) [7]Form1.Color
Jay1982 (2004-12-28 11:07:00) [8]Form1.Color