张志峰的博客

水滴石川,积少成多。

导航

上一页 1 ··· 35 36 37 38 39 40 41 42 43 ··· 120 下一页

2016年3月7日

摘要: Delphi读取Word现在关于往Word中写入数据的方法比较多,现在专门开个贴子,希望大家把自己读取Word内容的心得体会说一下,包括读取word文档中,有几个段落,如何读取第几个段落,读取有拼音的汉字,读取图片,读取表格等,希望大家不吝赐教![解决办法]//启动Wordtrywordapplic 阅读全文

posted @ 2016-03-07 11:16 ╰★张志峰★╮ 阅读(6183) 评论(0) 推荐(0)

摘要: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) bt 阅读全文

posted @ 2016-03-07 11:10 ╰★张志峰★╮ 阅读(631) 评论(0) 推荐(0)

摘要: uses ComObj,word2000 procedure TForm1.ExportWord(); var FWord :Variant; FDoc :Variant; i,Row:Integer; nodeString:Tstringlist; nodeList:TList; Tables,T 阅读全文

posted @ 2016-03-07 11:09 ╰★张志峰★╮ 阅读(2313) 评论(0) 推荐(0)

摘要: unit ControlWordS;interfaceuses Classes, Sysutils, Word97;type TControlWord = class(TComponent) private { Private declarations } FWordApp : TWordAppli 阅读全文

posted @ 2016-03-07 10:17 ╰★张志峰★╮ 阅读(792) 评论(0) 推荐(0)

摘要: C#控制定位Word光标移动到任意行或者最后一行,取得光标位置等操作 http://blog.csdn.net/jglie/article/details/7394256 十一、上下左右移动光标位 private void moveLeft() { object moveUnit = Microso 阅读全文

posted @ 2016-03-07 10:13 ╰★张志峰★╮ 阅读(3065) 评论(1) 推荐(0)

摘要: 源代码如下: //Word打印(声明部分) wDoc,wApp:Variant; function PrnWordBegin(tempDoc,docName:String):boolean; function PrnWordReplace(docText,newText:String;bSimple 阅读全文

posted @ 2016-03-07 10:10 ╰★张志峰★╮ 阅读(731) 评论(0) 推荐(0)

摘要: private void but_Table_Click(object sender, EventArgs e) { object Nothing = System.Reflection.Missing.Value; object missing = System.Reflection.Missin 阅读全文

posted @ 2016-03-07 09:45 ╰★张志峰★╮ 阅读(925) 评论(0) 推荐(0)

摘要: var wordApp, WordDoc, WrdSelection, wrdtable: variant; strAdd: string; wdPar,wdRange:OleVariant; iCol, iRow, I, J: Integer; begin try wordApp := Creat 阅读全文

posted @ 2016-03-07 09:40 ╰★张志峰★╮ 阅读(3331) 评论(0) 推荐(1)

摘要: http://www.webshu.net/jiaocheng/programme/ASPNET/200804/6499.html <% if request("infoid")<>"" then set rs=conn.execute("select * from nproduct where i 阅读全文

posted @ 2016-03-07 09:37 ╰★张志峰★╮ 阅读(821) 评论(0) 推荐(0)

摘要: //设置表格样式 wordDoc.Tables.Item(1).Borders.Item(Word.WdBorderType.wdBorderLeft).LineStyle = Word.WdLineStyle.wdLineStyleSingle; wordDoc.Tables.Item(1).Bo 阅读全文

posted @ 2016-03-07 09:26 ╰★张志峰★╮ 阅读(512) 评论(0) 推荐(0)

上一页 1 ··· 35 36 37 38 39 40 41 42 43 ··· 120 下一页