campo-sirio/ba/ba3400.cpp
guy 49a5aec854 ba0.cpp Tolta gestione selezione colori perche' ora e' in libreria
ba3100.cpp    Pulizie di primavera
ba3400.cpp    Pulizie di primavera
ba883.cpp     Simulazione TTab_application
batbreg.uml   Invertito ordine di output della ricerca sul codice


git-svn-id: svn://10.65.10.50/trunk@3891 c028cbd2-c16b-5b4b-a496-9718f37d4682
1996-11-12 14:58:53 +00:00

102 lines
1.9 KiB
C++
Executable File

#include <relapp.h>
///////////////////////////////////////////////////////////
// Test Relapp
///////////////////////////////////////////////////////////
class TTestrel_application : public TRelation_application
{
const char* _maskname;
const char* _num;
TRelation* _rel;
TMask* _msk;
protected:
virtual bool user_create();
virtual bool user_destroy();
virtual TMask* get_mask(int mode) { return _msk; }
virtual bool changing_mask(int mode) { return FALSE;}
virtual TRelation* get_relation() const { return _rel; }
public:
TTestrel_application(const char* name, const char* num);
};
TTestrel_application::TTestrel_application(const char* name, const char* num)
: _maskname(name), _num(num),
_msk(NULL), _rel(NULL)
{}
bool TTestrel_application::user_create()
{
int id = atoi(_num);
if (id > 0) _rel = new TRelation(id);
else _rel = new TRelation(_num);
_msk = new TMask(_maskname);
return TRUE;
}
bool TTestrel_application::user_destroy()
{
delete _msk;
delete _rel;
return TRUE;
}
///////////////////////////////////////////////////////////
// Testmask
///////////////////////////////////////////////////////////
class TTest_application : public TApplication
{
const char* _maskname;
protected:
bool create() { return menu(0); }
bool destroy() { return TRUE; }
bool menu(MENU_TAG);
public:
TTest_application(const char* name) : _maskname(name) {}
};
bool TTest_application::menu(MENU_TAG)
{
TMask m(_maskname);
KEY k = m.run();
if (k == K_QUIT) stop_run();
return k != K_QUIT;
}
///////////////////////////////////////////////////////////
int ba3400(int argc, char* argv[])
{
TApplication::check_parameters(argc, argv);
if (argc < 3)
{
error_box("You should specify a mask");
return 1;
}
if (argc == 3)
{
TTest_application a(argv[2]);
a.run(argc, argv, "Testmask");
}
else
{
TTestrel_application a(argv[2], argv[3]);
a.run(argc, argv, "Gestione archivi");
}
return 0;
}