参考文章:
http://topic.csdn.net/t/20030625/10/1954419.html
http://bcbjournal.org/articles/vol4/0009/Working_with_string_grids.htm
http://www.experts-exchange.com/Programming/Languages/Pascal/Delphi/Q_22691390.html
http://www.experts-exchange.com/Programming/Languages/Pascal/Delphi/Q_21945304.html
http://www.experts-exchange.com/Programming/Languages/Pascal/Delphi/Q_20539050.html?sfQueryTermInfo=1+checkbox+combobox+stringgrid
http://www.xawk.com/delphi-hax252.html
http://delphi.ktop.com.tw/board.php?cid=168&fid=912&tid=30547
http://delphi.ktop.com.tw/board.php?cid=30&fid=69&tid=77780
http://www.experts-exchange.com/Programming/Languages/Pascal/Delphi/Q_21905652.html
http://cc.codegear.com/Item.aspx?id=15441
.cpp
//--------------------------------------------------------------------------- #include #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { SetCheckBox(*StringGrid1,1,1,true,true); } //--------------------------------------------------------------------------- void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol, int ARow, TRect &Rect, TGridDrawState State) { bool Checked; if( (ACol == 2) && (ARow > 0)){ InflateRect(&Rect, -2, -2); if (StringGrid1->Cells[ACol][ARow] == 't'){ Checked = false; }else{ Checked = true; } if(StringGrid1->Canvas){ StringGrid1->Canvas->FillRect(Rect); if(Checked){ DrawFrameControl(StringGrid1->Canvas->Handle, &Rect, DFC_SCROLL , DFCS_SCROLLDOWN ); DrawFrameControl(StringGrid1->Canvas->Handle, &Rect, DFC_SCROLL , DFCS_SCROLLDOWN ); }else{ DrawFrameControl(StringGrid1->Canvas->Handle, &Rect, DFC_BUTTON, DFCS_SCROLLLEFT | DFCS_ADJUSTRECT | DFCS_FLAT); } } } TStringGrid* StringGrid =static_cast (Sender); RECT RText = static_cast (Rect); const AnsiString text(StringGrid->Cells[ACol][ARow]); TCanvas* SGCanvas =StringGrid->Canvas; // if this cell contains a checkbox if(GetCheckBox(*StringGrid, ACol, ARow)) { // set the flags for rendering // checked/unchecked unsigned int state =DFCS_BUTTONCHECK; if(GetCheckState(*StringGrid, ACol, ARow)) { state = state | DFCS_CHECKED; } // size the checkbox RECT RCell =static_cast (Rect); OffsetRect(&RCell, 2,0.5 * (RCell.bottom - RCell.top)); RCell.right = RCell.left +GetSystemMetrics(SM_CXMENUCHECK); //RCell.bottom = RCell.top +GetSystemMetrics(SM_CYMENUCHECK); RCell.top -= 0.5 *(RCell.bottom - RCell.top) + 2; // draw the checkbox //DrawFrameControl(StringGrid1->Canvas->Handle,&RCell, DFC_BUTTON, state); //DrawFrameControl(StringGrid1->Canvas->Handle,&RCell, DFC_BUTTON , DFCS_BUTTON3STATE ); //StringGrid1->Canvas->Brush->Color = clBlack; //FrameRect(StringGrid1->Canvas->Handle , &RCell , StringGrid1->Canvas->Brush); //DrawFocusRect(StringGrid1->Canvas->Handle , &RCell); StringGrid1->Canvas->TextRect(RCell, 10, 10, "Hello World"); StringGrid1->Canvas->Brush->Color = clBlack; StringGrid1->Canvas->FrameRect(RCell); // move the text over RText.left = RCell.right; } // draw the text RText.left += 2; RText.top += 2; DrawText(SGCanvas->Handle,text.c_str(), text.Length(), &RText,DT_LEFT |DT_VCENTER |DT_SINGLELINE); } //--------------------------------------------------------------------------- bool __fastcall TForm1::GetCheckState(TStringGrid& AGrid, int ACol,int ARow) { return HIWORD(reinterpret_cast (AGrid.Objects[ACol][ARow])); } //--------------------------------------------------------------------------- void __fastcall TForm1::SetCheckState(TStringGrid& AGrid,int ACol, int ARow, bool AChecked) { long data = reinterpret_cast (AGrid.Objects[ACol][ARow]); AGrid.Objects[ACol][ARow] =reinterpret_cast (MAKELONG(LOWORD(data), AChecked)); } //--------------------------------------------------------------------------- bool __fastcall TForm1::GetCheckBox(TStringGrid& AGrid, int ACol, int ARow) { return LOWORD(reinterpret_cast (AGrid.Objects[ACol][ARow])); } //--------------------------------------------------------------------------- void __fastcall TForm1::SetCheckBox(TStringGrid& AGrid, int ACol, int ARow,bool AShow, bool AChecked) { AGrid.Objects[ACol][ARow] =reinterpret_cast (MAKELONG(AShow, false)); SetCheckState(AGrid, ACol, ARow, AChecked); } //---------------------------------------------------------------------------
.h
//--------------------------------------------------------------------------- #ifndef Unit1H #define Unit1H //--------------------------------------------------------------------------- #include #include #include #include #include #include //--------------------------------------------------------------------------- class TForm1 : public TForm { __published: // IDE-managed Components TStringGrid *StringGrid1; TListView *ListView1; void __fastcall StringGrid1DrawCell(TObject *Sender, int ACol, int ARow, TRect &Rect, TGridDrawState State); private: // User declarations public: // User declarations __fastcall TForm1(TComponent* Owner); bool __fastcall GetCheckState(TStringGrid& AGrid, int ACol,int ARow); void __fastcall SetCheckState(TStringGrid& AGrid,int ACol, int ARow, bool AChecked); bool __fastcall GetCheckBox(TStringGrid& AGrid, int ACol, int ARow); void __fastcall SetCheckBox(TStringGrid& AGrid, int ACol, int ARow,bool AShow, bool AChecked); }; //--------------------------------------------------------------------------- extern PACKAGE TForm1 *Form1; //--------------------------------------------------------------------------- #endif