Modifiche per 97_03
git-svn-id: svn://10.65.10.50/trunk@4782 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
15c5556fdb
commit
17e54e9f2b
@ -21,6 +21,12 @@ class TDeletedoc_app : public TApplication
|
||||
char _unit;
|
||||
TFilename _tmp_dir;
|
||||
TIsamtempfile *_tdoc,*_trdoc;
|
||||
TLocalisamfile *_clifo,
|
||||
*_cfven,
|
||||
*_doc,
|
||||
*_rdoc,
|
||||
*_tab,
|
||||
*_occas;
|
||||
|
||||
protected:
|
||||
|
||||
@ -210,13 +216,25 @@ bool TDeletedoc_app::create()
|
||||
if (!fexist(_tmp_dir)) make_dir(_tmp_dir);
|
||||
_tmp_dir.insert("%"); // Add % sign
|
||||
dispatch_e_menu(BAR_ITEM(1));
|
||||
_clifo = new TLocalisamfile(LF_CLIFO);
|
||||
_cfven = new TLocalisamfile(LF_CFVEN);
|
||||
_doc = new TLocalisamfile(LF_DOC);
|
||||
_rdoc = new TLocalisamfile(LF_RIGHEDOC);
|
||||
_tab = new TLocalisamfile(LF_TAB);
|
||||
_occas = new TLocalisamfile(LF_OCCAS);
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
bool TDeletedoc_app::destroy()
|
||||
{
|
||||
_tmp_dir=_tmp_dir.sub(1); // Cut out % sign
|
||||
if (fexist(_tmp_dir)) rmdir(_tmp_dir);
|
||||
if (fexist(_tmp_dir)) rmdir(_tmp_dir);
|
||||
if (_clifo) delete _clifo;
|
||||
if (_cfven) delete _cfven;
|
||||
if (_doc) delete _doc;
|
||||
if (_rdoc) delete _rdoc;
|
||||
if (_occas) delete _occas;
|
||||
if (_tab) delete _tab;
|
||||
return TApplication::destroy();
|
||||
}
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user