如何改变WINDDOWS选定的项目的颜色? (50分)

Z

zhangdamin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-05-16

• #1

如何改变WINDOWS选定的项目的颜色,如DBGRID选择行的背景颜色(即当前记录所在的行)?

 

C

Croco

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-05-16

• #2

?

 

P

popeye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-05-16

• #3

g

 

C

Croco

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-05-16

• #4

请参看 Win32API: GetSysColor 帮助。
procedure SetSysColor(nIndex: Integer; AColor: TColor);
var
NewColor: LongInt;
begin
NewColor := ColorToRGB(AColor);
SetSysColors(1, nIndex, NewColor);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
//把高亮色变为红色。
SetSysColor(COLOR_HIGHLIGHT, clRed);
end;

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-05-16

• #5

DBgrid的OnDrawColumnCell事件：
if (your condition) then
DBGrid1.Canvas.Brush.Color:=(your request);
DBGrid1.DefaultDrawColumnCell(Rect,DataCol,Column,State);

 

P

popeye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-05-17

• #6

?

 

C

Chenlili

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-05-17

• #7

hehe,What?

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-21

• #8

接受答案了.