Aggiunta stampa descrizioni tabelle sotto windows

git-svn-id: svn://10.65.10.50/trunk@974 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1995-02-06 13:39:17 +00:00
parent c9691ad83b
commit d45c75f41b

View File

@ -19,7 +19,10 @@ struct direct
{
unsigned short d_ino;
char d_name[DIRSIZ];
};
};
#else
#include <errno.h>
#include <dos.h>
#endif
class TManutenzione_app : public TApplication
@ -74,7 +77,21 @@ HIDDEN void build_filelist(const char *path, TArray & list)
list.add(dname.mid(1,3));
}
}
close(fd);
close(fd);
#else
_find_t f;
if (_dos_findfirst("recdesc/d???.des", _A_NORMAL, &f) == 0)
{
bool one_to_add = TRUE;
while (one_to_add)
{
TString80 dname(f.name);
list.add(dname.mid(1,3));
one_to_add = _dos_findnext(&f) != 0;
}
}
#endif
}
@ -180,8 +197,11 @@ void TManutenzione_app::print()
p.headerlen(6);
p.footerlen(4);
if (_rec == NULL)
{
int items = _rec->dir()->items();
{
TDir d;
d.get(LF_DIR);
int items = d.eod();
for (int i = 2 ; i <= items; i++)
{