怎样在把word文字转换成memo的string时，判断word中的分行?(thanks a lot)(100分)

S

sea_air

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-05

• #1

我用下面这样一条语句，把打开的word中的文字调入memo里，但不能按照word分行，
不能判断在word中是哪一行
Memo1.Lines.Add(WordDocument.range.Text);
Word中行换行符在memo中仅显示为一个空格
要想word中的一行，在memo中也为一行，应该怎么办？
不要让我看《Delphi与Word之间的融合技术》这篇文章，我是菜鸟一个，看了，也没看明白
最好能有源码？

 

L

lich007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-05

• #2

Word是根据页面设置来分行的，它的回车是分段了，估计较难，你得判断页面宽度，根据
宽度来取文本。

 

L

linsb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-05

• #3

n:=:= pars.Get_Count;
for i:=1 to n do begin
ARange := Pars.Item(i).Range;
Memo1.Lines.Add(ARange.Text);
end;
memo每行显示的字数，由memo的宽度而定，如要和word保持一致（其实无实际意义），需知道word的页面设置等参数。

 

S

sea_air

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-05

• #4

我说的就是Word里头的一段在memo中也显示为一段

 

L

linsb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-06

• #5

若如此，按我的思路做吧。