Aggiunto il pack dei file da FOXPRO per le tabelle.

git-svn-id: svn://10.65.10.50/trunk@3251 c028cbd2-c16b-5b4b-a496-9718f37d4682

ba/ba1100.cpp

@@ -481,6 +481,21 @@ void TManutenzione_app::edit_riga (long riga_sel, TToken_string& riga)
     {
       f.packfile();
       f.packindex();
+      //Pack supplementare tramite FOXPRO (da togliere con CodeBase 6)
+#if XVT_OS == XVT_OS_WIN          
+      if (logicnum > 2 && logicnum < 6 && f.status() == NOERR)
+        if (fexist("packaga.exe"))
+        {
+          d.get(logicnum);
+          TFilename f_name(d.name());
+          f_name.ext("dbf");
+          f_name.replace('/','\\'); // A volte rimangono delle slash
+          TString cmd("packaga -t");
+          cmd << " " << f_name;
+          TExternal_app packapp(cmd);
+          packapp.run(FALSE,FALSE);
+        }
+#endif
     }
     else
       if (tasto == K_F6)
@@ -1024,7 +1039,7 @@ bool TManutenzione_app::menu(MENU_TAG m)
 
     case K_DEL: delete_riga(); break;
 
-    case K_ESC: done = TRUE; break;         
+    case K_ESC: done = TRUE; close_history(); break;         
       
     case K_F7: 
       update(); break;