Word分页中表头怎样自动添加到下一页 (50分)

H

hthugm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-11

• #1

我从文本文件中取数据到WORD中，我在WORD生成一个表（在此表中的第一行为表头有OLE控制生成），
再在表中添加数据， 由于数据很多故在WORD中不只一页，
第二， 三页中的表头如何自动生成？
而且每一页中的行数是不能确定的（行宽是变化的）(一定要用WORD)

 

C

ccgaosong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-12

• #2

可以用excel实现。

 

H

hthugm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-12

• #3

不行。必须用WORD，而且每一页中的行数是不能确定的（行宽是变化的）

 

D

drummer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-12

• #4

干嗎要自動生成﹐用變量直接寫ok?
i see your short message.

 

D

drummer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-12

• #5

to all:
如何在ㄍdelphi中控制excel的顯示比例,如按原來大小的70%顯示?
thanks!

 

H

hthugm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-12

• #6

用变量写第一个表头因为第二个表，第三个表等等实际上用语句控制一次生成的故在
第二，三页的表的表头是无法控制了，
用下面方法实现
myTxtWord:=CreateOleObject('Excel.Application');
myBook:=mytxtWord.workbooks.add;
mytxtWord.windowState:=1;
myTxtWord.visible:=true;

 

H

hthugm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-12

• #7

myTxtWord:=CreateOleObject('Excel.Application');
myBook:=mytxtWord.workbooks.add;
mytxtWord.windowState:=1;
myTxtWord.visible:=true;

 

H

hthugm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-14

• #8

再次请求高手教我这个‘表头问题’？

 

H

hthugm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-15

• #9

难道高手不愿意回答这个问题还是DELPHI本身无法解决这个问题？

 

D

drummer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-15

• #10

to hthugm
您寫的:myTxtWord:=CreateOleObject('Excel.Application');
myBook:=mytxtWord.workbooks.add;
mytxtWord.windowState:=1; [red]//報錯﹐[/red]
myTxtWord.visible:=true;

 

D

drummer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-15

• #11

是在excel中的文檔的顯示比例﹐如在一屏中可以看到很多頁。

 

H

hthugm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-15

• #12

TO drummer:
等一下我试一试再说

 

H

hthugm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-15

• #13

To drummer:
word本身最多在一个界面显示两页而且字体已变小（EXCEL可以显示多页字体也变小）

 

C

ccgaosong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-19

• #14

选定一行，
然后
Selection.Rows.HeadingFormat:= wdToggle;
office 2000 适用

 

H

hthugm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-20

• #15

To ccgaosong:
谢谢！！！！！！！！