Browse Source

Bug 导入0号台账文件后,书签界面不显示数据

MaiXinRong 9 years ago
parent
commit
c305ca7c9b
1 changed files with 2 additions and 0 deletions
  1. 2 0
      Units/ProjectData.pas

+ 2 - 0
Units/ProjectData.pas

@@ -1439,6 +1439,7 @@ end;
 
 procedure TProjectData.CloseAllData;
 begin
+  FBillsBookmarkData.Close;
   FBillsData.Close;
   FBillsCompileData.Close;
   FBillsMeasureData.Close;
@@ -1460,6 +1461,7 @@ begin
   FBGLData.Open(FConnection.Connection);
   FStaffData.Open(FConnection.Connection);
   FMainListData.Open(FConnection.Connection);
+  FBillsBookmarkData.Open;
 end;
 
 procedure TProjectData.UpdateOldData;