王宏健的专栏 ---- 健康快乐

  博客园 :: 首页 :: 新随笔 :: 联系 :: 订阅 :: 管理 ::

文章分类 -  Delphi与Word

Delphi 与 Word_VBA
摘要：'插入表格Sub setTable() Set myRange = ActiveDocument.Range(Start:=2, End:=2) ActiveDocument.Tables.Add Range:=myRange, NumRows:=3, NumColumns:=4End Sub '取得Word常规字符串Sub getText() Set myRange = ActiveDo... 阅读全文
posted @ 2004-11-29 17:07 LuckyJan 阅读(439) 评论(0) 推荐(0)

Delphi与Word例1
摘要：//==================?Word_VBA 代码?====================//sub inWord()? Dim myTable As Table? Dim myBox, myPict, myShape As Shape? ? '画第一个矩形框? Set myBox = ActiveDocument.Shapes.AddTextbox(Orientation:=... 阅读全文
posted @ 2004-11-29 17:07 LuckyJan 阅读(736) 评论(0) 推荐(0)

Delphi与Word（三）取得Word文件的数据
摘要：//取得Word文件的数据procedure getWordStr;var WordApp: TWordApplication; WordDoc: TWordDocument; DocInx,oFileName,CfCversions,oReadOnly,AddToRctFiles,PswDocument, PswTemplate,oRevert,WPswDocument,WPs... 阅读全文
posted @ 2004-11-29 17:06 LuckyJan 阅读(549) 评论(0) 推荐(0)

Delphi与Word（二）取得Word 表格中的数据
摘要：//取得Word 表格中的数据procedure getWordCellStr;var WordApp: TWordApplication; WordDoc: TWordDocument; DocInx,oFileName,CfCversions,oReadOnly,AddToRctFiles,PswDocument, PswTemplate,oRevert,WPswDocum... 阅读全文
posted @ 2004-11-29 17:05 LuckyJan 阅读(612) 评论(0) 推荐(0)

Delphi与Word（一）合并Word 表格中单元格
摘要：//合并Word 表格中单元格procedure mergeWordCell;var WordApp: TWordApplication;??? WordDoc: TWordDocument;??? DocInx,oFileName,CfCversions,oReadOnly,AddToRctFiles,PswDocument,??? PswTemplate,oRevert,WPswDocumen... 阅读全文
posted @ 2004-11-29 17:03 LuckyJan 阅读(560) 评论(0) 推荐(0)