怎样在delphi中导入execl的表格并进行打印
急！！！ 问题点数：0、回复次数：2Top
1 楼lihao_ningxia（耗子）回复于 2003-09-04 13:26:21 得分 0
用ADO导入吧，ADO可以访问EXCEL表，然后就可以打印了Top
2 楼stefanchow（无聊不丈夫）回复于 2003-09-04 14:45:44 得分 0
procedure TForm1.ConnectBtnClick(Sender: TObject);
begin
Try
DM.ExcelApplication1.Connect;
Except
MessageDlg('Excel2000是否已正确安装',mtError, [mbOk], 0);
Abort;
End;
DM.ExcelApplication1.Visible[0]:=True;
DM.ExcelApplication1.Caption:='连接Excel';
DM.ExcelApplication1.Workbooks.Add(Null,0);
DM.ExcelWorkbook1.ConnectTo(DM.ExcelApplication1.Workbooks[1]);
DM.ExcelWorksheet1.ConnectTo(DM.ExcelWorkbook1.Worksheets[1] as _Worksheet);
end;Top
