cyf/lserp_cs_6.0
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

SVN r1220

Browse Source 
SVN-Revision: r1220
This commit is contained in:
cyf
2026-06-22 02:29:22 +00:00
parent 1e2c081b6a
commit c3e1e7d2d2
9 changed files with 177 additions and 71 deletions
Download Patch File Download Diff File Expand all files Collapse all files
插件库/Lskj.Main/FrmConfigLocal.cs
+8 -34
View File
@@ -233,11 +233,15 @@ namespace Lskj.Main
DBConfig.Instance.Connection = Connection;
if (DBConfig.Instance.CreateConnection(Connection))
{
if (DelphiHelper.Delphi_Init(new StringBuilder(DBConfig.Instance.GetDelphiConnection(DBConfig.Instance.dephiConnection))) == 0)
if (!DBConfig.Instance.ServerType.Equals("达梦数据库"))
{
MessageUtil.Show(ResourceKeys.UnConnectServer + "[By Delphi]");
return;
if (DelphiHelper.Delphi_Init(new StringBuilder(DBConfig.Instance.GetDelphiConnection(DBConfig.Instance.dephiConnection))) == 0)
{
MessageUtil.Show(ResourceKeys.UnConnectServer + "[By Delphi]");
return;
}
}
if (isSave)
{
if (!string.IsNullOrEmpty(this.txtZTName.Text))
@@ -251,34 +255,4 @@ namespace Lskj.Main
DBConfig.Instance.WriteConfig("LocalLastIP", this.txtIP.Text);
DBConfig.Instance.WriteConfig("LocalLastPort", this.txtPort.Text);
DBConfig.Instance.WriteConfig("LocalLastPortName", this.txtZTName.Text);
this.DialogResult = DialogResult.OK;
this.Close();
}
else
{
MessageUtil.Show("请设置账套名！");
}
}
else
{
MessageUtil.Show(ResourceKeys.ConnectSuccess);
}
}
else
{
MessageUtil.Show(ResourceKeys.ConnectFault);
}
}
else
{
MessageUtil.Show(ResourceKeys.ConnectFault);
}
//IniHelper.Write("SystemResources.ini", "FrmConfigFlag", "1");
}
catch (Exception)
{
MessageUtil.Show(ResourceKeys.ConnectFault);
}
}
}
}
t