【结贴】目前我们公司从2401版本升级到2936还存在的问题汇总**

jiahaiming

楼主，我们也很晕啊。
你们的代码成千上万行，我又不懂您的业务，看都看不明白。

你们自己也可以调试一下，毕竟是你们自己写的代码！

gaihl

两按钮不能用问题:主要原因是你继承的打印预览代码还是以前的版本代码
请在"巨龙应用界面->界面->工具栏->打印预览"单元中增加
procedure TPrintPreviewBar.actPrintPrintExecute(Sender: TObject);
begin
     ExecuteAction(BizActnConsts.ActionPreviewPrint, nil);
end;

procedure TPrintPreviewBar.actPrintSetupExecute(Sender: TObject);
begin
  ExecuteAction(BizActnConsts.ActionPreviewPageSetup, nil);
end;
并设置到控件ActionList->Actions中,"打印"和"打印设置"的OnExection事件中.

dragonsoft

不要老说是我们代码吗，升级的意义上来说应该是不会出现这些问题才是啊

lixy

这是是旧版本的缺陷。而您的界面是在旧平台界面上复制并修改过来的。所以升级并不能升级到您的代码里面。

gaihl

通过刚才的电话联系,我们应从两方面入手分析并来解决打印预览多出一页问题:
1.代码中替换小X图片后,没有被替换的小X图片被打印出来(之前版本是不打印出来的)
2.是否可以不用替换图片方式来实现,从而不再使小X一页出现,而用直接在单元格上设置图片方式.
我们这边会尽快找到实现手段,也请楼主共同努力.

dragonsoft

目前我们公司从2401版本升级到2936还存在的问题汇总，请在本周内帮我们解决，下周就要做性能测试，下下周就要上线替换2401版本的程序，请支持
1.在程序中功能树分配保存时报错 。

答复：该问题已经解决。

2.对象没有释放引起的IE退出报错问题，再帮我们找出还没有其他的问题引起IE推出报错的问题。高

答复：按照你们的建议，我们排查TQuery对象创建和释放代码，做了一些释放的调整，但还是会出现IE退出报错的现象。我们估计有对象没有释放是引发此现象的问题，但可能还有其他原因，因为用升级后原始的系统（没有替换为我们的代码和登录窗体），一样还是会出现问题，只不过频率比较低而已。

3.打印接受案件信息登记表问题没有反应，不能使用。
答复：该问题已经解决，加入我们的控件

4.文书预览非常慢的问题；

答复：还没有解决，在要生成文书编号时非常慢，等待解决

5.文书打印的打印功能丢失问题。

答复：今天测试了，可以了。

6.文书预览多出一页打”X”的问题
答复：该问题还在调试，待证实

7.某些环节还会出现“正在提交”问题；

答复：该问题是这样子的，之前按照你们的改了，可以了，但是就是有时候还会出现正在提交，要IE退出重新进入才能提交下去，这样就多出一条消息。

8.sys库流程数据的不能使用exp方式再导入数据库问题；
答复：删除了dual表后不能导出
9.处理接受案件没有显示办案人姓名、没有显示本单位的警员信息诱导功能。
答复：我们开发组已经处理
10.websphere6下部署新版本X3平台；高
答复：在另外一个帖子有回复，已经知道如何部署，还有加密狗的问题需要处理。
11.点击辅助工具的意见反馈处理权限时报错：错误如下(BIZ:\ZHAJ_DS\FZGJ\YSFKHFQX.FUNC.dir\YJFKHFQX.Form)”时发生了错误。错误信息：加载资源文件"BIZ:\ZHAJ_DS\FZGJ\YSFKHFQX.FUNC.dir\YJFKHFQX.Form"出错；错误原因：Error reading DataRecordView1.HorzScrollBar.Margin: Property HorzScrollBar does not exist；
答复：测试重新编译已经可以。

12.模糊诱导的意思是要输入汉字能够诱导出来，之前你们工程师说的解决方法不现实

13.在信息层字段的OnButtonClick事件里面写了代码，但执行时在字段关联的TDataEdit上没有出现按钮，不知道这是为什么？

dragonsoft

6.文书预览多出一页打”X”的问题,你们回复说要加这段代码，是要加在哪里啊？？？？
TSheetDoc(DocViewDYXX_DYBD.Doc).Sheet.CellTypes[0,intPageIndex] := TCellType.ctPicture;

dragonsoft

沟通后处理了，可以打印的XX实现了

dragonsoft

新增问题：2936版本的TDataRecordView的纵向、横向滚动条怎么弄出来

lixy

把TDataRecordView放在TScrollBox里面。