root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level : 12.0 nopatch

Browse Source 
Files correlati     : ba3.exe ba3400a.msk

Commento:
modificato programma di test maschere
This commit is contained in:
Alessandro Bonazzi 2022-09-08 11:13:38 +02:00
parent 324c587781
commit f05abe3f14
2 changed files with 6 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
src/ba/ba3400.cpp
View File

@ -52,26 +52,24 @@ bool TTestrel_application::user_destroy()
// Testmask // Testmask
/////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////
class TTest_application : public TApplication class TTest_application : public TSkeleton_application
{ {
const char* _maskname; const char* _maskname;
protected: protected:
bool create() { return menu(0); } void main_loop();
bool destroy() { return TRUE; }
bool menu(MENU_TAG);
public: public:
TTest_application(const char* name) : _maskname(name) {} TTest_application(const char* name) : _maskname(name) {}
}; };
bool TTest_application::menu(MENU_TAG) void TTest_application::main_loop()
{ {
if (*_maskname) if (*_maskname)
{ {
TMask m(_maskname); TMask m(_maskname);
KEY k = m.run();
if (k == K_QUIT) stop_run(); while (m.run() == K_ENTER);
} }
else else
{ {
@ -83,8 +81,6 @@ bool TTest_application::menu(MENU_TAG)
m.run(); m.run();
} }
} }
return FALSE;
} }
/////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////

2
src/ba/ba3400a.uml
View File

@ -4,7 +4,7 @@ PAGE "Richiesta" -1 -1 76 12
STRING F_NOME 50 STRING F_NOME 50
BEGIN BEGIN
PROMPT 3 3 "Nome maschera" PROMPT 3 3 "Maschera "
END END
BUTTON DLG_OK 10 2 BUTTON DLG_OK 10 2