Patch level : 12.0 552

Files correlati     : sy
Commento            : Aggiunta lettura files per chiave in manutenzione archivi

git-svn-id: svn://10.65.10.50/branches/R_10_00@24430 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
mtollari 2018-03-12 16:03:20 +00:00
parent cd7c206c7d
commit 27258cc7dc
5 changed files with 13 additions and 3 deletions

View File

@ -650,8 +650,9 @@ void TManutenzione_app::edit_riga (long riga_sel, TToken_string& riga)
{
const TFilename filename(_mask->get(FLD_NOME));
const TString& tabella = _mask->get(F_TAB);
const int selKey = _mask->get_int(F_KEY);
TEdit_file ef;
ef.browse_file(logicnum, filename, tabella);
ef.browse_file(logicnum, filename, tabella, selKey > 0 ? selKey : 1);
}
break;
case K_F5:

View File

@ -86,7 +86,7 @@ protected:
bool browse_cursor(TCursor& cur, const TFilename& name);
public:
bool browse_file(int logicnum, const TFilename& name, const TString& tab);
bool browse_file(int logicnum, const TFilename& name, const TString& tab, const int selKey = 1);
bool browse_file(TExternisamfile* file, const TFilename& name);
TEdit_file() {}
virtual ~TEdit_file() {}

View File

@ -17,6 +17,7 @@
#define F_LEN 113
#define DLG_EDIR 114
#define F_TAB 115
#define F_KEY 116
#define FLD_OUTFILE 201
#define FLD_WITHKEY 202

View File

@ -42,6 +42,13 @@ BEGIN
GROUP 1
END
NUMBER F_KEY 1
BEGIN
PROMPT 30 5 "Chiave "
FLAGS "DR"
GROUP 1
END
BOOLEAN FLD_EXTEND
BEGIN
PROMPT 2 6 "Cambia dimensione"

View File

@ -158,7 +158,7 @@ bool TEdit_file::browse_cursor(TCursor& cursor, const TFilename& fname)
return ch != K_ESC;
}
bool TEdit_file::browse_file(int logicnum, const TFilename& name, const TString& tab)
bool TEdit_file::browse_file(int logicnum, const TFilename& name, const TString& tab, const int selKey)
{
if (logicnum >= LF_USER)
{
@ -180,6 +180,7 @@ bool TEdit_file::browse_file(int logicnum, const TFilename& name, const TString&
cursor.setregion(filter, filter);
}
}
cursor.setkey(selKey);
return browse_cursor(cursor, name);
}