Patch level : 10.0 272
Files correlati : ca2.exe Ricompilazione Demo : [ ] Commento : Aggiunto esecuzione ripetuta dell' invio a Board. con un intervallo in minuti dopo la M La linea di comando ad esempio è ca2 -4 -M60 -uADMIN git-svn-id: svn://10.65.10.50/branches/R_10_00@23209 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
a379b353fe
commit
3469b56f48
@ -242,12 +242,16 @@ void TBoard_app::main_loop()
|
|||||||
{
|
{
|
||||||
TBoard_msk m;
|
TBoard_msk m;
|
||||||
bool batch = false;
|
bool batch = false;
|
||||||
|
int mins = 1;
|
||||||
|
|
||||||
if (argc() > 2)
|
if (argc() > 2)
|
||||||
{
|
{
|
||||||
const TFixed_string a(argv(2));
|
const TFixed_string a(argv(2));
|
||||||
|
|
||||||
batch = toupper(a[1]) == 'M';
|
batch = toupper(a[1]) == 'M';
|
||||||
|
mins = atoi(a.right(1));
|
||||||
|
if (mins <1)
|
||||||
|
mins = 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
if (batch)
|
if (batch)
|
||||||
@ -257,7 +261,7 @@ void TBoard_app::main_loop()
|
|||||||
|
|
||||||
if (tray != NULL_WIN)
|
if (tray != NULL_WIN)
|
||||||
xvt_vobj_set_visible(task, FALSE);
|
xvt_vobj_set_visible(task, FALSE);
|
||||||
xvt_timer_create(m.win(), 60 * 1000L);
|
xvt_timer_create(m.win(), mins * 60 * 1000L);
|
||||||
while (m.run() == K_ENTER)
|
while (m.run() == K_ENTER)
|
||||||
{
|
{
|
||||||
TSheet_field& s = m.sfield(F_FILES);
|
TSheet_field& s = m.sfield(F_FILES);
|
||||||
|
@ -16,11 +16,13 @@ END
|
|||||||
DATE F_DATA_INI
|
DATE F_DATA_INI
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 2 "Data iniziale "
|
PROMPT 1 2 "Data iniziale "
|
||||||
|
FLAGS "H"
|
||||||
END
|
END
|
||||||
|
|
||||||
DATE F_DATA_FIN
|
DATE F_DATA_FIN
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 3 "Data finale "
|
PROMPT 1 3 "Data finale "
|
||||||
|
FLAGS "H"
|
||||||
END
|
END
|
||||||
|
|
||||||
SPREADSHEET F_FILES 78 -1
|
SPREADSHEET F_FILES 78 -1
|
||||||
|
Loading…
x
Reference in New Issue
Block a user