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

Aggiunta modalita interattiva

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@4770 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1997-06-27 09:31:06 +00:00
parent 392b0393b5
commit ae0031d407
2 changed files with 46 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
ba/ba3400.cpp
View File

@ -66,12 +66,25 @@ public:
}; };
bool TTest_application::menu(MENU_TAG) bool TTest_application::menu(MENU_TAG)
{
if (*_maskname)
{ {
TMask m(_maskname); TMask m(_maskname);
KEY k = m.run(); KEY k = m.run();
if (k == K_QUIT) stop_run(); if (k == K_QUIT) stop_run();
}
else
{
TMask mr("ba3400a");
while (mr.run() == K_ENTER)
{
TMask m(mr.get(102));
KEY k = m.run();
// if (k == K_QUIT) stop_run();
}
}
return k != K_QUIT; return FALSE;
} }
/////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////
@ -80,15 +93,15 @@ bool TTest_application::menu(MENU_TAG)
int ba3400(int argc, char* argv[]) int ba3400(int argc, char* argv[])
{ {
TApplication::check_parameters(argc, argv); TApplication::check_parameters(argc, argv);
if (argc < 3) // if (argc < 3)
{ // {
error_box("You should specify a mask"); // error_box("You should specify a mask");
return 1; // return 1;
} // }
if (argc == 3) if (argc <= 3)
{ {
TTest_application a(argv[2]); TTest_application a(argc == 2 ? "" : argv[2]);
a.run(argc, argv, "Testmask"); a.run(argc, argv, "Testmask");
} }
else else

21
ba/ba3400a.uml Executable file
View File

@ -0,0 +1,21 @@
#define F_NOME 102
PAGE "Richiesta" -1 -1 76 8
STRING F_NOME 50
BEGIN
PROMPT 3 3 "Nome maschera"
END
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_CANCEL 10 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
ENDMASK