如何在TStringGrid中加入TComboBox TCheckBox2

参考文章:
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 
      
     
     
    
    
   
   
  
  
 
 
  • 0
    点赞
  • 2
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值