root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Aggiunta cancellazione automatica file temporanei.

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@307 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1994-10-04 15:36:42 +00:00
parent 80115f00e0
commit a0b81b88f3
2 changed files with 122 additions and 122 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
ba/ba0.cpp
View File

@ -1,6 +1,7 @@
#include <applicat.h>
#include <execp.h>
#include <mask.h>
#include <progind.h>
#include <utility.h>
#include <urldefid.h>
@ -216,15 +217,14 @@ int TMenu_application::do_level()
void TMenu_application::test_temp() const
{
TFilename name; name.temp();
const TString16 ext = name.ext();
name.tempdir();
name << "/" << "*." << ext;
TFilename name; name.tempdir();
name << "/" << "ci*";
#if XVT_OS == XVT_OS_WIN
struct _find_t f;
if (_dos_findfirst(name, _A_NORMAL, &f) == 0 &&
yesno_box("Si desidera cancellare i file temporanei (*.tmp)"))
yesno_box("Si desidera cancellare i file temporanei?"))
{
TIndwin pi(40, "Cancellazione file temporanei residui", FALSE, FALSE);
TFilename dir; dir.tempdir();
do
{

6
ba/batb%ivd.uml
View File

@ -26,7 +26,7 @@ BEGIN
FIELD %IVD->CODTAB[2,2]
FLAGS "U"
KEY 1
USE %IVD
USE %IVD SELECT CODTAB?="??"
INPUT CODTAB[1,1] F_SEZ
INPUT CODTAB[2,2] F_LETT
DISPLAY "Sezione" CODTAB[1,1]
@ -52,7 +52,7 @@ BEGIN
FIELD %IVD->CODTAB[3,6]
FLAGS "MZ"
KEY 1
COPY USE F_LETT
USE %IVD SELECT CODTAB[7,8]==""
COPY INPUT F_LETT
INPUT CODTAB[3,6] F_CLASSE
DISPLAY "Sezione" CODTAB[1,1]
@ -79,7 +79,7 @@ BEGIN
FIELD %IVD->CODTAB[7,8]
FLAGS "RZ"
KEY 1
COPY USE F_LETT
USE %IVD
COPY INPUT F_CLASSE
INPUT CODTAB[7,8] F_NUM
DISPLAY "Sezione" CODTAB[1,1]