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

Aggiunto metodo per avere lista di variabili in TString_array

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@2145 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1995-11-14 10:28:24 +00:00
parent 7e4865ef5a
commit 7b8f1ed944
3 changed files with 26 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
include/clifo.h
View File

@ -54,6 +54,6 @@
#define CLI_CODPAG "CODPAG"
#define CLI_SOSPESO "SOSPESO"
#define CLI_OCCAS "OCCAS"
#define CLI_CODLIN "CODLIN"
#endif

18
include/config.cpp
View File

@ -432,6 +432,24 @@ int TConfig::list_paragraphs(TString_array& pl)
return pl.items();
}
int TConfig::list_variables(TString_array& vl, bool value, const char* section)
{
set_paragraph(section);
vl.destroy();
_data.restart();
for (int i = 0; i < _data.items(); i++)
{
THash_object* o = _data.get_hashobj();
TToken_string* t = new TToken_string(o->key());
if (value) t->add((TString&)(o->obj()));
vl.add(t);
}
return vl.items();
}
// @doc EXTERNAL
TConfig::TConfig(int which_config, const char* paragraph)

8
include/config.h
View File

@ -115,7 +115,13 @@ public:
// @cmember Riempie pl con la lista dei paragrafi
int list_paragraphs(TString_array& pl);
// @cmember Riempie vl con la lista dei nomi delle variabili
// nella sezione corrente o in quella indicata; se
// add_value e' TRUE ci mette "variabile|valore"
// ACHTUNG: l'array e' in ordine HASH (CAZZ)
int list_variables(TString_array& vl, bool add_value = FALSE, const char* section = NULL);
// @cmember Costruttore (il paragrafo iniziale e' il modulo corrente
// salvo diversa indicazione)
TConfig(int which_config = CONFIG_GENERAL, const char* paragraph = NULL);