campo-sirio/ba/ba883.cpp
guy 62c87bc729 Tolta provvisoriamente relapp
git-svn-id: svn://10.65.10.50/trunk@2679 c028cbd2-c16b-5b4b-a496-9718f37d4682
1996-03-15 09:36:00 +00:00

127 lines
2.6 KiB
C++
Executable File

#include <applicat.h>
#include <mask.h>
#include <urldefid.h>
/*
#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) { return _msk; }
virtual bool changing_mask(int) { return FALSE;}
virtual TRelation* get_relation() const { return _rel; }
virtual int read(TMask& m) { m.autoload(_rel); return NOERR; }
virtual int write(const TMask&) { return NOERR; }
virtual int rewrite(const TMask&) { return NOERR; }
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()
{
_msk = new TMask(_maskname);
int id = atoi(_num);
if (id > 0) _rel = new TRelation(id);
else _rel = new TRelation(_num);
return TRUE;
}
bool TTestrel_application::user_destroy()
{
delete _msk;
delete _rel;
return TRUE;
}
*/
///////////////////////////////////////////////////////////
// Testmask
///////////////////////////////////////////////////////////
class TTest_application : public TApplication
{
TFilename _maskname;
protected:
bool create() { dispatch_e_menu(BAR_ITEM(1)); return TRUE; }
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 main(int argc, char** argv)
{
TApplication::check_parameters(argc, argv);
if (argc < 3)
{
TFilename n;
if (argc == 1)
{
TMask m("Inserire il nome della maschera", 1, 42, 4);
m.add_string(101, 0, "", 1, 1, 40);
m.field(101).check_type(CHECK_REQUIRED);
m.add_button(DLG_OK, 0, "", -12, -1, 10, 2);
m.add_button(DLG_CANCEL, 0, "", -22, -1, 10, 2);
if (m.run() == K_ENTER)
n = m.get(101);
}
else
n = argv[1];
if (n.not_empty())
{
TTest_application a(n);
n = n.name(); n.insert("Test Mask ", 0);
a.run(argc, argv, n);
}
}
/*
else
{
TTestrel_application a(argv[1], argv[2]);
a.run(argc, argv, "Test Relation Application");
}
*/
return 0;
}