private void GetTableCaptionFromCOLDEF(TStringList aTableNameCaptionList)
{
int I;
DataRow DR;
InfoCommand aInfoCommand = new InfoCommand(FDatabaseType);
aInfoCommand.Connection = FConnection;
aInfoCommand.CommandText = "Select TABLE_NAME, CAPTION from COLDEF where FIELD_NAME = '*' or FIELD_NAME is null order by TABLE_NAME";
IDbDataAdapter DA = DBUtils.CreateDbDataAdapter(aInfoCommand);
DataSet D = new DataSet();
WzdUtils.FillDataAdapter(FDatabaseType, DA, D, "COLDEF");
aTableNameCaptionList.Clear();
for (I = 0; I < D.Tables[0].Rows.Count; I++)
{
DR = D.Tables[0].Rows[I];
if (DR["TABLE_NAME"].ToString().Trim() != "" && DR["CAPTION"].ToString().Trim() != "")
aTableNameCaptionList.Add(DR["TABLE_NAME"].ToString().Trim() + "=" + DR["CAPTION"].ToString().Trim());
}
}
