免费视频淫片aa毛片_日韩高清在线亚洲专区vr_日韩大片免费观看视频播放_亚洲欧美国产精品完整版

打開APP

未登錄

開通VIP，暢享免費(fèi)電子書等14項(xiàng)超值服

首頁(yè)

好書

留言交流

下載APP

聯(lián)系客服

delphi DBGrid簡(jiǎn)單自繪（字體顏色、背景等）

2021.07.06

從網(wǎng)上找的代碼應(yīng)該是C#寫的，其實(shí)delphi 的操作類似：

void __fastcall TForm1::DBGrid1DrawColumnCell(TObject *Sender,

const TRect &Rect, int DataCol, TColumn *Column,

TGridDrawState State)

{

AnsiString name= Column->Field->DataSet->FieldByName("NAME")->AsString;

if(name=="功能科室"&&DataCol==1) //只繪制name為功能科室行和第二列的交集

DBGrid1->Canvas->Font->Color=clRed;

if(name=="心電圖室")

DBGrid1->Canvas->Font->Color=clGreen;

if(name=="胃鏡室")

DBGrid1->Canvas->Brush->Color=clGreen;

DBGrid1->DefaultDrawColumnCell(Rect,DataCol,Column,State);//是什么意思??

}

本站僅提供存儲(chǔ)服務(wù)，所有內(nèi)容均由用戶發(fā)布，如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容，請(qǐng)點(diǎn)擊舉報(bào)。