如何将SQL查找出来后的结果,送到EXECL中去(100分)

  • 主题发起人 主题发起人 gzlitao
  • 开始时间 开始时间
G

gzlitao

Unregistered / Unconfirmed
GUEST, unregistred user!
如何将SQL查找出来后的结果,将以显示在Dbgrid中的数据
直接送到EXECL中去(并自动打开execl)。(请给例子)
(连字段和内容送到execl中去呢?)
我已经查找出来了,显示在Dbgrid中了,想以按键之后
打开execl并发送数据到execl中去。

姓名 地址 性别

张三 广州 女
李四 北京 男

 
var
msexcel:olevariant;
wbook,wsheet:olevariant;
begin
MsExcel:= CreateOleObject('Excel.Application');
WBook:=MsExcel.Application;
wbook.workbooks.add;
WBook.Visible:=True;
WSheet:=WBook.ActiveSheet;
wsheet.cells[i,j]:=value//write to excel

end;
 
请问需要加入什么控件吗?
 
后退
顶部