private void TfoDownload_FormDestroy(object sender, EventArgs e)
{
DataStream.Dispose();
LogFile.SaveToFile(baseFolder + "update.log");
LogFile.Clear();
LogFile = null;
if (idleHandler != null)
{
Application.Idle -= idleHandler;
}
}
// IniFile Constructor.
public TIniFile(string strIniPath)
{
m_Path = strIniPath;
TmpList = new TStringList();
TmpList.Clear();
if (File.Exists(m_Path))
{
TmpList.LoadFromFile(m_Path);
}
}
public void GetListOfLanguages(TStringList list)
{
string filename, path;
string langcode;
int j;
list.Clear();
// Iterate through filesystem
foreach (string name in System.IO.Directory.EnumerateDirectories(Directory, "*"))
{
if (name != "." && name != "..")
{
filename = Directory + name + Path.DirectorySeparatorChar + "LC_MESSAGES" + Path.DirectorySeparatorChar + Domain + ".mo";
if (File.Exists(filename))
{
langcode = name.ToLower();
if (list.IndexOf(langcode) == -1)
{
list.Add(langcode);
}
}
}
}
// Iterate through embedded files
for (int i = 0; i < TFileLocator.filelist.Count; i++)
{
filename = TFileLocator.basedirectory + TFileLocator.filelist.Strings[i];
path = Directory;
path = path.ToUpper();
filename = filename.ToUpper();
j = path.Length;
if (filename.Substring(0, j) == path)
{
path = Path.DirectorySeparatorChar + "LC_MESSAGES" + Path.DirectorySeparatorChar + Domain + ".mo";
path = path.ToUpper();
if (filename.Substring(filename.Length - path.Length, path.Length) == path)
{
langcode = filename.Substring(j, filename.Length - path.Length - j).ToLower();
langcode = langcode.Substring(0, 3) + langcode.Substring(3).ToUpper();
if (list.IndexOf(langcode) == -1)
{
list.Add(langcode);
}
}
}
}
}
public void Execute()
{
int I;
uint dwTick2C;
string s18 = string.Empty;
string s1C = string.Empty;
string s24 = string.Empty;
string s28 = string.Empty;
int nC;
int n10;
int n14;
TConfig Config;
Config = LSShare.g_Config;
dwTick2C = 0;
while (true)
{
if ((HUtil32.GetTickCount() - dwTick2C) > 5 * 60 * 1000)
{
dwTick2C = HUtil32.GetTickCount();
try
{
if (File.Exists(Config.sFeedIDList))
{
AccountLoadList.Clear();
AccountLoadList.LoadFromFile(Config.sFeedIDList);
if (AccountLoadList.Count > 0)
{
AccountCostList.Clear();
for (I = 0; I < AccountLoadList.Count; I++)
{
s18 = AccountLoadList[I].Trim();
s18 = HUtil32.GetValidStr3(s18, ref s1C, new string[] { " ", "\t" });
s18 = HUtil32.GetValidStr3(s18, ref s24, new string[] { " ", "\t" });
s18 = HUtil32.GetValidStr3(s18, ref s28, new string[] { " ", "\t" });
n10 = HUtil32.Str_ToInt(s24, 0);
n14 = HUtil32.Str_ToInt(s28, 0);
nC = HUtil32.MakeLong(HUtil32._MAX(n14, 0), HUtil32._MAX(n10, 0));
AccountCostList.Add(s1C, nC);
if (!bo40)
{
if ((I % 100) == 0)
{
Thread.Sleep(1);
}
}
}
}
//LoadAccountCostList(Config, AccountCostList);
}
}
catch
{
LSShare.MainOutMessage("Exception] loading on IDStrList.");
}
try
{
if (File.Exists(Config.sFeedIPList))
{
IPaddrLoadList.Clear();
IPaddrLoadList.LoadFromFile(Config.sFeedIPList);
if (IPaddrLoadList.Count > 0)
{
IPaddrCostList.Clear();
for (I = 0; I < IPaddrLoadList.Count; I++)
{
s18 = IPaddrLoadList[I].Trim();
s18 = HUtil32.GetValidStr3(s18, ref s1C, new string[] { " ", "\t" });
s18 = HUtil32.GetValidStr3(s18, ref s24, new string[] { " ", "\t" });
s18 = HUtil32.GetValidStr3(s18, ref s28, new string[] { " ", "\t" });
n10 = HUtil32.Str_ToInt(s24, 0);
n14 = HUtil32.Str_ToInt(s28, 0);
//@ Unsupported function or procedure: 'MakeLong'
nC = HUtil32.MakeLong(HUtil32._MAX(n14, 0), HUtil32._MAX(n10, 0));
IPaddrCostList.Add(s1C, nC);
if (!bo40)
{
if ((I % 100) == 0)
{
Thread.Sleep(1);
}
}
}
}
//LoadIPaddrCostList(Config, IPaddrCostList);
}
}
catch
{
LSShare.MainOutMessage("Exception] loading on IPStrList.");
}
}
Thread.Sleep(10);
//@ Unsupported property or method(C): 'Terminated'
//if (this.Terminated)
//{
// break;
//}
}
}
public override void Execute()
{
ICollection <List <TTP_RetranslatorItem> > items = (ICollection <List <TTP_RetranslatorItem> >)ValuesProp.GetValue(list, null);
foreach (var item in items.Flatten())
{
object obj = item.obj.IsAlive ? item.obj.Target : null;
if (obj == null)
{
continue;
}
if (obj is Component)
{
var comp = ((Component)obj).FindComponent("GNUgettextMarker") as TGnuGettextComponentMarker;
if (comp != null && this != comp.Retranslator)
{
comp.Retranslator.Execute();
continue;
}
}
if (obj is TStringList)
{
// Since we don't know the order of items in sl, and don't have
// the original .Objects[] anywhere, we cannot anticipate anything
// about the current sl.Strings[] and sl.Objects[] values. We therefore
// have to discard both values. We can, however, set the original .Strings[]
// value into the list and retranslate that.
var sl = new TStringList();
try
{
sl.Text = item.OldValue;
TGnuGettextInstance.TranslateStrings(sl, TextDomain);
((TStringList)obj).BeginUpdate();
try
{
((TStringList)obj).Text = sl.Text;
}
finally
{
((TStringList)obj).EndUpdate();
}
}
finally
{
sl.Clear();
sl = null;
}
}
else
{
string newValue;
if (TextDomain == "" || TextDomain == TGnuGettextInstance.DefaultTextDomain)
{
newValue = Utils.ComponentGettext(item.OldValue);
}
else
{
newValue = TGnuGettextInstance.dgettext(TextDomain, item.OldValue);
}
var ppi = obj.GetType().GetProperty(item.Propname);
if (ppi != null)
{
ppi.SetValue(obj, newValue, null);
}
else
{
#if DXGETTEXTDEBUG
Debug.WriteLine("ERROR: On retranslation, property disappeared: " + item.Propname + " for object of type " + obj.GetType().Name);
#endif
}
}
}
}
