BCB中如何打印DBGrid中的数据

BCB中怎么打印DBGrid中的数据
用TPrinter *Prntr = Printer()怎么打印DBGrid中的数据，菜鸟在线等待……

[解决办法]
用QuickRep不是更好么？

另外兄台，你结贴率真低啊。。。。


[解决办法]
Prntr->Canvas->TextOutA(30,30,DBGrid1->Fields[i]->DisplayText);
循环把dbgrid的东西读出来。位置自己调整。
[解决办法]
TDataSet *ds=DBGrid1->DataSource->DataSet;
void *bkmark=ds->GetBookmark();
ds->DisableControls();
for(ds->First();!ds->Eof;ds->Next())
{
//doing 
}
ds->GotoBookmark(bkmark);
ds->FreeBookmark(bkmark);
ds->EnableControls();