public FieldInfoMatchTarget(TypeInfo parentTypeInfo, int index)
{
m_parentTypeInfo = parentTypeInfo;
m_index = index;
m_varDesc = m_parentTypeInfo.GetVarDesc(m_index);
m_nativeParentTypeName = m_parentTypeInfo.GetDocumentation();
}
public OWDispProperty(ITlibNode parent, ITypeInfo ti, VarDesc vd)
{
Parent = parent;
_name = ti.GetDocumentationById(vd.memid);
_vd = vd;
_ti = ti;
}
public OWEnumValue(ITlibNode parent, ITypeInfo ti, VarDesc vd)
{
Parent = parent;
_name = ti.GetDocumentationById(vd.memid);
_val = (int)vd.varValue;
_vd = vd;
_ti = ti;
}
public OWRecordMember(ITlibNode parent, ITypeInfo ti, VarDesc vd)
{
Parent = parent;
_name = ti.GetDocumentationById(vd.memid);
var ig = new IDLGrabber();
vd.elemDescVar.tdesc.ComTypeNameAsString(ti, ig);
_type = ig.Value;
}
public override List <ITlibNode> GenChildren()
{
var res = new List <ITlibNode>();
for (var x = 0; x < _ta.cVars; ++x)
{
var vd = new VarDesc(_ti, x);
res.Add(new OWEnumValue(this, _ti, vd));
}
return(res);
}
public List <ITlibNode> PropertyChildren()
{
var res = new List <ITlibNode>();
for (var x = 0; x < _ta.cVars; ++x)
{
var vd = new VarDesc(_ti, x);
res.Add(new OWDispProperty(this, _ti, vd));
}
return(res);
}
private List <ITlibNode> GenConstChildren()
{
var res = new List <ITlibNode>();
for (var x = 0; x < _ta.cVars; ++x)
{
var vd = new VarDesc(_ti, x);
res.Add(new OWModuleConst(this, _ti, vd, x));
}
return(res);
}
private void FormBase_Load(object sender, EventArgs e)
{
// Cargamos las Variables del INI
String Line, VarDesc, VarValue;
TextReader ConfigFile;
ConfigFile = new StreamReader("repo.ini");
while ((Line = ConfigFile.ReadLine()) != null)
{
// Validaos que no sea una linea en blanco y que tenga 2 parametros (par1=par2)
if ((Line.Trim() != "") && (Line.Contains("=")))
{
VarDesc = Line.Split('=')[0];
VarValue = Line.Split('=')[1];
switch (VarDesc.Trim())
{
// DB Variables
case "DBEngine":
Global_DBEngine = VarValue.ToString();
break;
case "DBServer":
Global_DBServer = VarValue.ToString();
break;
case "DBName":
Global_DBName = VarValue.ToString();
break;
case "DBUser":
Global_DBUser = VarValue.ToString();
break;
case "DBUserPwd":
Global_DBUserPwd = VarValue.ToString();
break;
// App Variables
case "AppPath":
Global_AppPath = VarValue.ToString();
break;
case "AppName":
Global_AppName = VarValue.ToString();
break;
}
}
}
ConfigFile.Close();
}
public OWModuleConst(ITlibNode parent, ITypeInfo ti, VarDesc vd, int idx)
{
_idx = idx;
Parent = parent;
var ig = new IDLGrabber();
vd.elemDescVar.tdesc.ComTypeNameAsString(ti, ig);
_name = ig.Value + " " + ti.GetDocumentationById(vd.memid);
_val = vd.varValue ?? "";
if (_val is string)
{
_val = (_val as string).ReEscape();
}
}
