| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 662 人关注过本帖
标题:[求助]如何导出多表头
只看楼主 加入收藏
kitty0261
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2006-10-9
收藏
 问题点数:0 回复次数:1 
[求助]如何导出多表头
用delphi 导出excel 时,在控件GBDridEh 中连接的表是多表头的,请问如何导出多表头呢?!

请指教!!!
搜索更多相关主题的帖子: 表头 
2006-11-08 11:21
形影随从
Rank: 1
等 级:新手上路
威 望:1
帖 子:188
专家分:0
注 册:2005-3-15
收藏
得分:0 
procedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
begin
OraQuery1.Close;
OraQuery1.SQL.Clear;
OraQuery1.SQL.Add('select a.isn, a.mo, b.item, b.itemnm from isn a, item b where a.item=b.item and a.isn=''MACHAEL20Y''');
OraQuery1.Open;
for i := 0 to DBGrid1.FieldCount - 1 do
begin
memo1.Lines.Add(DBGrid1.Fields[i].FieldName); //這可改成你導出EXCEL格式
end;
end;

2006-11-13 10:35
快速回复:[求助]如何导出多表头
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.019066 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved