高手!小妹求救!!!C++Builder中怎么传变量给Grid++report呀!!!

[baobao_520]

我想做报表:类似于酒店管理系统中统计报表,在Grid++report设计好了报表,SQL语句在报表中写了,但是我想要做个时间选择控件,选择时间后调用设计好的报表,在SQL语句中加入我的选择条件!
在线等,急急!!!谢谢!

[vc8fans]

没讲清楚，用全局变量吧

[jxf168]

传入sql:
Query2->Close();
Query2->SQL->Clear();
Query2->SQL->Add("SELECT Max(CheckDate) As CheckDate FROM YK_MedCheck");
Query2->SQL->Add("WHERE Department='"+StCode+"' AND AdjustFlag=0");
Query2->SQL->Add(" AND YK_MedCheck.CheckDate>='"+DateTimeToStr(begintime)+"' ");
Query2->SQL->Add(" AND YK_MedCheck.CheckDate<'"+DateTimeToStr(endtime)+"' ");
Query2->Open();

注上例中:
begintime 为开始时间(变量)
endtime 为结束时间(变量)


传入报表:
要加一个事件RMGridReport1GetValue()
点中RMGridReport1按f11 点events 中的OnGetValue事件写入你要传给报表的变量值后,在报表是就可以直接调用了这个(医院名称,盘点部门,操作员)变量了.
void __fastcall TfrmYppd::RMGridReport1GetValue(const AnsiString ParName,
Variant &ParValue)
{
//报表变量
Query2->Close();
Query2->SQL->Clear();
Query2->SQL->Add("select yhmc from xtzc");
Query2->Prepare();
Query2->Open();
String yhmc=Query2->FieldByName("yhmc")->AsString;
if(ParName=="医院名称")
{
ParValue=yhmc;
}
if( ParName.UpperCase() == "盘点部门" )
ParValue = cbobm->Text;
if( ParName.UpperCase() == "操作员" )
ParValue = dmdb->xt_name;
}

[zhanghelpsgz]

用StringGrid，BCB6里面有例子
void __fastcall TForm1::FormCreate(TObject *Sender)

{
StringGrid1->Cells[1][0] = "Column 1";
StringGrid1->Cells[2][0] = "Column 2";
StringGrid1->Cells[3][0] = "Column 3";
StringGrid1->Cells[4][0] = "Column 4";
StringGrid1->Cells[0][1] = "Row 1";
StringGrid1->Cells[1][1] = "C++";
StringGrid1->Cells[2][1] = "Builder";
StringGrid1->Cells[3][1] = "is";
StringGrid1->Cells[4][1] = "RAD";
StringGrid1->Cells[0][2] = "Row 2";
StringGrid1->Cells[1][2] = "Rapid";
StringGrid1->Cells[2][2] = "Application";

StringGrid1->Cells[4][2] = "Development";
}