【结】关于函数newdocfromlocal**

trickle

我在程序中调用
DOCRELEVANCYINFO2.TRelevancyGrid(DocView3.doc).NewDocFromLocal(name);

之后在docview中看不到我引入的文件，这个函数的作用是什么能说明下么？

atiger

http://bbs.justep.com/forum.php?mod=viewthread&tid=22713

trickle

文档关联定义这些我都设置了，但是不起作用。

atiger

把你的定义的界面都帖出来，我们看看呢

trickle

最初由 atiger 发布
[B]把你的定义的界面都帖出来，我们看看呢 [/B]

trickle

我有什么方法可以判断，文件已经完全上传到了知识中心吗？

gaihl

“业务模型\协同系统\文档\关联\文档关联信息\文档关联网格”中，
通过TDocUtils.Uploading(ataSet.FieldByName('FDOCURL').AsString)可以判断是否在上传中
参考位置：
procedure TRELEVANCYGRID.dsbRelevancyBeforeDelete(DataSet: TDataSet);
begin
  // TS 对DataSet.ControlsDisabled的判断作用在于可以提供一个强制删除机会，及其主表删除时不判断权限。
  if not DataSet.ControlsDisabled then
  begin
    TDocUtils.CheckUploading(FileName, '');

    actDeleteUpdate(actDelete); //如果是代码调进来的，则actDeleteUpdate就不会被执行

    if (not actDelete.Enabled)
      and (DataSetDocRelevancy.FieldByName('FFILESTATE').AsInteger <> TDOCRELEVANCYINFO2.FileState_New) then
      raise Exception.Create('权限不足，无法删除附件.');

    if (DataSet.FieldByName('FDOCURL').AsString <> '')
      and TDocUtils.Uploading(ataSet.FieldByName('FDOCURL').AsString) then
    begin
      if not jsDialogs.ConfirmBox('文档正在上传，是否继续删除？', '删除', 1) then
        SysUtils.Abort;
    end;
  end;
end;

trickle

好了，结贴吧