网
网络踏浪
Unregistered / Unconfirmed
GUEST, unregistred user!
各位大侠，我有如下一个问题：在利用delphi操作Word表格(只是1行1列的表格)时，表格内容由Delphi自动填入，我希望由程序自动判定表格填充是否已经满Word一页了，如果满一页，则自动将余下的内容填入下一个表格。程序如下：xyz:=1; //表格的个数for i:=1 to 25 do begin s1:='e:/11.doc'; //假定是插入到表格的一个Word文件 WordApp.Selection.InsertFile(s1,mRange,mConfirmConversions,mLink,mAttachment); myhigh:=doc.Tables.Item(xyz).Cell(1,1).height; if myhigh>=685 then inc(xyz)end; 上述程序执行的效果是：如果原来表格高度设置得很小，程序结果会自动使表格增高，但在程序循环过程中测试的表格高度始终是当初的初始值。请各位指点问题所在。非常谢谢。