麻豆小视频在线观看_中文黄色一级片_久久久成人精品_成片免费观看视频大全_午夜精品久久久久久久99热浪潮_成人一区二区三区四区

首頁 > 學(xué)院 > 開發(fā)設(shè)計 > 正文

改變DBGrid的顏色

2019-11-17 05:24:36
字體：大 中 小
供稿：網(wǎng)友

　　//---------------------------------------------------------------------------

#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::DBGrid1DrawColumnCell(TObject *Sender,
      const TRect &Rect, int DataCol, TColumn *Column,
      TGridDrawState State)
{
if(Column->Field->DataSet->RecNo%2)
  {
  DBGrid1->Canvas->Brush->Color=clSkyBlue;
  DBGrid1->Canvas->FillRect(Rect);
  }
DrawText(DBGrid1->Canvas->Handle, Column->Field->Text.c_str(),-1,(RECT*)&Rect,DT_SINGLELINE DT_VCENTER DT_CENTER);
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
for(int i=0;i<DBGrid1->Columns->Count;i++)
{ if(i%2==0)DBGrid1->Columns->Items[i]->Color=clAqua;
    else DBGrid1->Columns->Items[i]->Color=clInfoBk;
}
}
//-----------------------------------------------------------------

發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板： 九九热精品视频在线免费观看 | 黄色网址进入 | 欧美一级黄色片在线观看 | 国产免费最爽的乱淫视频a 毛片国产 | 日日摸夜夜添夜夜添牛牛 | chengrenzaixian | 久久一区国产 | 国产理论视频在线观看 | 中文字幕免费看 | 精品国产久 | 亚洲经典视频 | 国产一级一区二区 | 欧美一级特黄a | 国产瑟瑟视频 | 久久艳片 | 天天色人人爱 | 欧美精品久久久久久久久老牛影院 | 中文字幕一二三区芒果 | 欧美a级一区二区 | 娇妻被各种姿势c到高潮小说 | 性爱视频免费 | 美国黄色毛片女人性生活片 | 国产一级二级毛片 | 91美女啪啪 | 欧美重口另类videos人妖 | 亚洲网站一区 | 美女色影院 | 久久久www成人免费精品 | 羞羞视频免费网站含羞草 | 天天草夜夜骑 | 色婷婷tv| 最新亚洲国产 | 一级α片免费看 | 1024亚洲天堂 | 美国一级免费视频 | 福利免费在线观看 | 国产成人小视频在线观看 | 欧美城网站地址 | 欧美在线中文字幕 | 最新欧美精品一区二区三区 | 最新午夜综合福利视频 |