Aggiunta barra di attesa alla stampa tracciati

git-svn-id: svn://10.65.10.50/trunk@1027 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1995-02-22 18:56:10 +00:00
parent b99d633b3f
commit d322fce7a1

View File

@ -9,6 +9,7 @@
#include <urldefid.h>
#include <utility.h>
#include <validate.h>
#include <progind.h>
#include "ba1.h"
#include "ba1100.h"
@ -89,7 +90,7 @@ HIDDEN void build_filelist(const char *path, TArray & list)
TString80 dname(f.name);
list.add(dname.mid(1,3));
one_to_add = _dos_findnext(&f) != 0;
one_to_add = _dos_findnext(&f) == 0;
}
}
#endif
@ -202,24 +203,35 @@ void TManutenzione_app::print()
d.get(LF_DIR);
int items = (int)d.eod();
TProgind *pi;
pi = new TProgind(items,"Stampa tracciati record archivi", TRUE, TRUE, 63);
for (int i = 2 ; i <= items; i++)
pi->setstatus(2);
for (int i = 2 ; !pi->iscancelled() && i <= items; i++)
{
TRec_sheet r(i, "");
pi->addstatus(1);
do_print(p, r);
}
delete pi;
TArray list;
build_filelist(DESCDIR, list);
items = list.items();
for (i = 0; i < items; i++)
pi = new TProgind(items,"Stampa descrizione tabelle", TRUE, TRUE, 63);
for (i = 0; !pi->iscancelled() && i < items; i++)
{
TString & tab = (TString &) list[i];
TRec_sheet r(4, tab);
pi->addstatus(1);
do_print(p, r);
}
delete pi;
}
else do_print(p, *_rec);
p.close();