请问我如何打印dbgrid中的内容?我没有作过。请详细指点一下,谢谢了
解决方案 »
- 怎样将TadoQuery组件获得的记录一次性存入与之结构相同的数据表中呢?
- 两个dbgrid之间的数据转移
- 关于indey控件的问题,紧急,解决定给分
- 关于邮件服务器 NMSMTP 组件的发送密码验证问题,请大虾帮我,紧急!!!谢谢!
- 咱们相恋吧!!! --- 犬犬(心帆)
- 数据的完整性问题
- 简单问题
- 怎么用SQL语言设定关键字(unique 和 primary key有什么不同)
- 小声的问:Code Insight窗口怎样改成不用Ctrl+空格弹出?大声的喊:放分喽!瞧我的信誉!
- 谁有MP3格式的中文说明?
- 如何开发一个播放器类似的界面?包括可以根据ini文件来换皮肤等等
- 为什么用delphi7的TImage控件无法显示用photoshop转换来的.jpg文件呢?
或者fr(FastReport )有一个控件用来打印dbgrid内容的
begin
frUserDataset1.RangeEndCount := dbgrid1.FieldCount;
frUserDataset2.RangeEndCount := dbgrid1.FieldCount;
frReport1.ShowReport;
end;procedure TqueryForm.frReport1GetValue(const ParName: String;
var ParValue: Variant);
begin
if ParName = 'Cell' then
ParValue := dbgrid1.Fields[frUserDataset1.RecNo].Value;
if ParName = 'Header' then
ParValue := dbgrid1.Fields[frUserDataset2.RecNo].FieldName;
end;
先试试。不行发个demo给你。