Created LoadResWords
This commit is contained in:
@ -22,7 +22,7 @@ namespace CobXmlSupport
|
|||||||
{
|
{
|
||||||
|
|
||||||
Dictionary<string, string> uniqueTags, uniqueAttr, uniqueVars, uniqueCntVars;
|
Dictionary<string, string> uniqueTags, uniqueAttr, uniqueVars, uniqueCntVars;
|
||||||
|
private List<string> CobResWords = null;
|
||||||
private List<qualifieldhlp> qldList;
|
private List<qualifieldhlp> qldList;
|
||||||
private List<CobRow> rowList, tmpRowList;
|
private List<CobRow> rowList, tmpRowList;
|
||||||
private CobRow latestLevelParent;
|
private CobRow latestLevelParent;
|
||||||
@ -1797,15 +1797,13 @@ namespace CobXmlSupport
|
|||||||
private void btnTestThings_Click(object sender, EventArgs e)
|
private void btnTestThings_Click(object sender, EventArgs e)
|
||||||
{
|
{
|
||||||
//Create showing window
|
//Create showing window
|
||||||
|
loadResWords();
|
||||||
fromToMoves = new ShowCode();
|
fromToMoves = new ShowCode();
|
||||||
fromToMoves.Parent = this;
|
fromToMoves.Parent = this;
|
||||||
fromToMoves.Labeltext = "Cobol \"reserved\" Words";
|
fromToMoves.Labeltext = "Cobol \"reserved\" Words";
|
||||||
string number = "";
|
|
||||||
for(int i=0;i<700;i++){
|
foreach(string str in CobResWords.ToArray()) {
|
||||||
number = i.ToString("0");
|
if (fromToMoves.CodeShower.Text == "") { }
|
||||||
string strName = "String" + (string)(i>0?number:"");
|
|
||||||
string str = Properties.Resources.ResourceManager.GetString(strName);
|
|
||||||
if (str==null) break;
|
|
||||||
else fromToMoves.CodeShower.Text += "\r\n";
|
else fromToMoves.CodeShower.Text += "\r\n";
|
||||||
fromToMoves.CodeShower.Text += str;
|
fromToMoves.CodeShower.Text += str;
|
||||||
}
|
}
|
||||||
@ -1814,5 +1812,18 @@ namespace CobXmlSupport
|
|||||||
//createXMLMoveCode();
|
//createXMLMoveCode();
|
||||||
}
|
}
|
||||||
|
|
||||||
|
private void loadResWords(){
|
||||||
|
string number = "";
|
||||||
|
CobResWords = new List<string>();
|
||||||
|
for (int i = 0; i < 700; i++)
|
||||||
|
{
|
||||||
|
number = i.ToString("0");
|
||||||
|
string strName = "String" + (string)(i > 0 ? number : "");
|
||||||
|
string str = Properties.Resources.ResourceManager.GetString(strName);
|
||||||
|
if (str == null) break;
|
||||||
|
CobResWords.Add(str);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user