请问如何实现笔迹留痕？(200分)

huopen · 2002-01-04

请问实现笔迹留痕方法或控件？即：几个人处理同一片文章，后人可以知道前人的所由笔迹。

taozhiyu · 2002-01-04

做个认证系统，每次处理后记录下什么人。做了些什么

gxcooo · 2002-01-04

版本控制CVS?

南宫吹云 · 2002-01-04

用不同颜色区分？

huopen · 2002-01-04

好像ｗｏｒｄ的修订功能！

bluerain · 2002-01-04

昨天刚和一个朋友讨论过这个痕迹问题.我们讨论的是word文档.方案如下:
1.保存: 象版本控制系统一样,用户修改了文档,就设置一个修改的版本号,然后存入
数据库,其中数据库中应该有修改时间,修改版本,也可以加入修改用户等
信息
2.痕迹查看 : 查看痕迹的时,调出各个版本的文档,然后利用word的合并和比较功能.

htw · 2002-01-04

这叫痕迹保留功能。

痕迹保留的实现方法：
建议运用Word的模板, 用Notes 驱动，注意的问题：1) 连接问题; 2)Word
表格处理问题，不能保存，现有系统当加入表格后，文字乱了。
痕迹保留的4种实现方法：1)多副本　　2)Word模板 3)手写输入，但图像
较大 4)运用Notes自身功能，鼠标点击显示出修改痕迹，但不能打印。
讨论结果：用word模板实现

我用word的修订功能和宏功能及菜单定制功能组合做成一个模板，需要编写代码，编写的代码
在1000行以内，可以由notes调用来实现，另外在delphi中也可实现此功能。

encounter · 2002-01-04

可不可以用日志的方法？

huopen · 2002-01-07

请问ｈｔｗ能否提供用word模板的实现代码？

mrb · 2002-12-03

请问ｈｔｗ能否提供用word模板的实现代码？
谢谢！

mrb · 2002-12-04

Word作为OA流转是可以，而且很好，不过还要为每一个人都保存一个文件在数据库中。
每个人第一次打开这个公文的时候，首先是接收上一个人的所有修订，这样就生成了没有
修改痕迹的文档，然后再进入修订状态，记录他的修订很急。
下面就是我的一些体会。希望对你有用。
http://www.delphibbs.com/delphibbs/dispq.asp?lid=737517
给你几个VBA代码吧。就这些了。。。

'在屏幕上突出显示修订
ActiveDocument.ShowRevisions = True

'进入修订状态。
ActiveDocument.TrackRevisions = True

'退出修订状态，进入正常状态
ActiveDocument.TrackRevisions = False

'保护文档，只能阅看
ActiveDocument.Protect Type:=wdAllowOnlyComments

'虽然能够实现只能修订，可以使用，启动的时候先保存，然后再设置为只能修订状态
Doc.Protect Type:=wdAllowOnlyRevisions

'取消对文档保护
Doc.Unprotect

请问如何实现笔迹留痕？(200分)

huopen

Unregistered / Unconfirmed

taozhiyu

Unregistered / Unconfirmed

gxcooo

Unregistered / Unconfirmed

南宫吹云

Unregistered / Unconfirmed

huopen

Unregistered / Unconfirmed

bluerain

Unregistered / Unconfirmed

htw

Unregistered / Unconfirmed

encounter

Unregistered / Unconfirmed

huopen

Unregistered / Unconfirmed

mrb

Unregistered / Unconfirmed

mrb

Unregistered / Unconfirmed

Similar threads