java 通过delphi dll操作excel 无法执行CreateOleObject('Excel.Application')
问题描述:
由于excel文档内容非常复杂,通过java 的poi或jxl组件无法成功向excel中插入图片,因此只能考虑通过delphi操作,将其编译成DLL,在使用java调dll完成对excel的操作。
delphi代码如下:
procedure opExcel();
var
vXLS :Variant;
WorkSheet :variant;
begin
vXLS := CreateOleObject('Excel.Application');
Try
vXLS.DisplayAlerts :=false;
vXLS.WorKBooks.Close;
vXLS.WorkBooks.Open( 'd:\123.xls' );
WorkSheet := vXLS.WorKBooks[1].Sheets[1];
WorkSheet.Cells[28,3].Select;
WorkSheet.Pictures.Insert ('D:\1.png');
vXLS.WorKBooks[1].Save;
vXLS.WorKBooks[1].Close;
Finally
if Not Varisempty(vXLS) then vXLS.Quit;
end;
end;