안녕하세요. 최용일입니다.



검색해보시면 많이 나오는데... 쩝...



ChechListBox의 Style속성을 lbOwnerDrawFixed나 lbOwnerDrawVariable로 설정하신 후에



OnDrawItem에서 코딩하시면 됩니다.



procedure TForm1.CheckListBox1DrawItem(Control: TWinControl;

Index: Integer; Rect: TRect; State: TOwnerDrawState);

begin

with TCheckListBox(Control).Canvas do

begin

Brush.Color := clAqua; // 바탕색

Font.Color := clRed; // 폰트색

FillRect(Rect);

TextOut(Rect.Left + 2, Rect.Top, TCheckListBox(Control).Items[Index]);

end;

end;



^^ 항상 즐코하세요.



윤미영 wrote:

> checklistbox에 내용이

> ㅁ a

> ㅁ b

> ...

> 라면 (ㅁ 는 체크하는 네모박스입니다).

>

> 체크하는 네모박스에 아이템에 따라 색깔을 달리 나타낼수있는 것이라든지 혹은 글자 색이라

>

> 도 item에 따라 다르게 할수 있는 방법이 있을까요?

>

> 감사합니다.

>