导出0号台账文件，默认加上后缀.ctf

Forms/MainFrm.dfm

@@ -1031,6 +1031,7 @@ object MainForm: TMainForm
       Caption = #24635#37327#25511#21046#26684#24335
       Category = 0
       Hint = #24635#37327#25511#21046#26684#24335
+      Visible = ivAlways
     end
     object dxbtnInsertCol: TdxBarButton
       Caption = #26032#22686#19968#21015

Forms/MainFrm.pas

@@ -735,7 +735,7 @@ begin
   // 导出前先保存
   CurProjectFrame.ProjectData.Save;
   // 导出云版专用
-  sFileName := SupportManager.ConfigInfo.OutputPath + CurProjectFrame.ProjectData.ProjectName;
+  sFileName := SupportManager.ConfigInfo.OutputPath + CurProjectFrame.ProjectData.ProjectName + '.ctf';
   if SaveFile(sFileName, '.ctf') then
   begin
     if FileExists(sFileName) and not QuestMessage(Format('存在同名文件“%s”，是否替换？', [ExtractFileName(sFileName)])) then