|
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ListBox1->Items->Add ("Hello");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ListBox1DrawItem(TWinControl *Control, int Index, TRect Rect, TOwnerDrawState State)
{
switch(Index % 5) {
case 0 :
ListBox1->Canvas->Font->Color= clNavy;
break;
case 1 :
ListBox1->Canvas->Font->Color= clMaroon;
break;
case 2 :
ListBox1->Canvas->Font->Color= clOlive;
break;
case 3 :
ListBox1->Canvas->Font->Color= clBlack;
break;
case 4 :
ListBox1->Canvas->Font->Color= clTeal;
break;
}
ListBox1->Canvas->TextRect(Rect, Rect.Left, Rect.Top, ListBox1->Items->Strings[Index]);
}
//---------------------------------------------------------------------------
위와 같이 코딩을 하면 각 라인별로 5가지의 색이 번갈아 가면서 텍스트의 색이 변함니다..위에서 처럼 ListBox1DrawItem함수의 index값을 조건문에 사용하면 변화가 됩니다.
하지만..아래 제가 코딩한 부분을 적어놓았으니 참고 해주기고, 전 이 index값을 사용하는 것이 아니라..리스트 박스의 아이템에서 메세지 레벨이라는 값도 들어가집니다.이 메세지 레벨값을 보고 그 메세지 레벨에 해당하는 색을 설정하고 싶거든요..메세지 레벨의 값은 각 5개로 "L","M","H","E","F"로 다섯가지 입니다.그래서 전 아이템에서 이다섯개를 순서대로 0~4로 지정하여 그 해당값을 전역변수 tmp_level에 할당하고, 이를 ListBox1DrawItem함수에서 조건문에 사용하였습니다..근데 한 라인의 아이템의 색이 변하는것이아니라..전체가가 다 변해서...이 글을 올리게 되엇습니다..뭐가 잘못되엇는지 설명해주시고 이왕이면 예제 프로그램까지 곁들여 설명해주시면 감사하겟ㅆ브니다...초보의 비애가 넘 커서리...못한다고 갈굼들이 장난이 아닙니다..그럼 많은 가르침 부탁 드립니다..
bool __fastcall TMsgForm::ReadMsg( void )
{
....
....
....
tmp_level=....;
...
}
void __fastcall TMsgForm::ListBox1DrawItem(TWinControl *Control, int Index,
TRect &Rect, TOwnerDrawState State)
{
if( tmp_level == MSG_LVL_LOW){
ListBox1->Canvas->Font->Color= clWhite;}
else if( tmp_level == MSG_LVL_MED){
ListBox1->Canvas->Font->Color = clAqua;}
else if( tmp_level == MSG_LVL_HIGH){
ListBox1->Canvas->Font->Color = clYellow;}
else if( tmp_level == MSG_LVL_ERROR){
ListBox1->Canvas->Font->Color = clFuchsia;}
else if( tmp_level == MSG_LVL_FATAL){
ListBox1->Canvas->Font->Color = clRed;}
ListBox1->Canvas->TextRect(Rect, Rect.Left, Rect.Top, ListBox1->Items->Strings[Index]);
}
|