OleContainer中的EXCEL表如何导到ExcelApplication的实例中去,为了预览和打印(50分)

  • 主题发起人 主题发起人 wyb_506
  • 开始时间 开始时间
将Excel 在外部启动,将你在OleContainer中的内容到入,同时启动Excel
的Preview功能,
//Preview
XLApp:=CreateOleObject('Excel.Application');
XLApp.Workbooks.Add(xlWBatWorkSheet);
InsertData;
PageSet;
XlApp.Visible:=True;
XlApp.Workbooks[1].WorkSheets[1].PrintPreview;
//Print
XLApp:=CreateOleObject('Excel.Application');
XLApp.Workbooks.Add(xlWBatWorkSheet);
InsertData;
PageSet;
XlApp.Visible:=False;
XlApp.Workbooks[1].WorkSheets[1].PrintOut;
if not VarIsEmpty(XLApp) then
begin
XLApp.DisplayAlerts:=False;
XLApp.Quit;
end;
你试一试吧!
 
XLApp.Workbooks.Add(xlWBatWorkSheet);中 xlWBatWorkSheet怎么和OleContainer连接呢?还是不懂,请赐教
 
后退
顶部