问题1:用OLE
xls:=createoleobject('excel.application');
xls.visible:=true;
xls.workbooks.open('book.xls');
i:=1;
while not table1.eof do
begin
xls.workbooks[1].worksheets['sheet1'].cells[i,1]:=table1.fieldbyname(..).value;
i=i:+1;
table1.next;
end;
....
xls.quit;
大体这样吧。
问题2:
其实你根本不必为把FOXPRO报表格式转换为EXCEL格式伤脑筋。用EXCEL做好报表
格式,再用以上方法把数据填进去不就得了?