5,388
社区成员
发帖
与我相关
我的任务
分享Delphi如何控制WORD中的域（Rang）值，而不是替换掉rang？？这样能控制用户无权修改文件
Delphi如何控制WORD中的域（Rang）值，而不是替换掉rang？？这样能控制用户无权修改文件
...全文
请发表友善的回复…
发表回复
QDZZQ 2002-08-07
- 打赏
- 举报
procedure TMain.Button1Click(Sender: TObject);
var
s,x:OleVariant;
w:WideString;
begin
s:='ENT_CNAME';
w:='eeee';
Doc.Bookmarks.Item(s).Range
Doc.Bookmarks.Item(s).Range.Text:=w;//************************
end;
*** 号行提示不能删除怎么回事？？？？
var
s,x:OleVariant;
w:WideString;
begin
s:='ENT_CNAME';
w:='eeee';
Doc.Bookmarks.Item(s).Range
Doc.Bookmarks.Item(s).Range.Text:=w;//************************
end;
*** 号行提示不能删除怎么回事？？？？
wd2306 2002-08-03
- 打赏
- 举报
up
QDZZQ 2002-08-02
- 打赏
- 举报
000000
