华恒Mes鼎捷代码
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

307 lines
11 KiB

5 months ago
  1. using System;
  2. using System.Collections.Generic;
  3. using System.ComponentModel;
  4. using System.Data;
  5. using System.Data.Linq;
  6. using System.Linq;
  7. using System.Drawing;
  8. using System.Text;
  9. using System.Windows.Forms;
  10. using DevExpress.XtraEditors;
  11. using DevExpress.XtraGrid.Views.BandedGrid;
  12. using DevExpress.XtraGrid.Columns;
  13. using DevExpress.XtraGrid;
  14. using System.IO;
  15. using System.Threading;
  16. using ICSSoft.Base.Language.Tool;
  17. using ICSSoft.Base.Config.AppConfig;
  18. using ICSSoft.Base.UserControl.MessageControl;
  19. using ICSSoft.Base.Config.DBHelper;
  20. using ICSSoft.Base.Report.Filter;
  21. using ICSSoft.Base.UserControl.FormControl;
  22. using ICSSoft.Base.Report.GridReport;
  23. using ICSSoft.Base.ReferForm.AppReferForm;
  24. using ICSSoft.Frame.Data.BLL;
  25. namespace ICSSoft.Frame.APP
  26. {
  27. public partial class FormICSNOInput : DevExpress.XtraEditors.XtraForm
  28. {
  29. private string sqltxt = "";
  30. private string sqlconn = "";
  31. String guid = AppConfig.GetGuid();
  32. private DataTable dataSource = null;
  33. #region 构造函数
  34. public FormICSNOInput()
  35. {
  36. InitializeComponent();
  37. this.MaximumSize = new Size(Screen.PrimaryScreen.WorkingArea.Width, Screen.PrimaryScreen.WorkingArea.Height);
  38. this.WindowState = FormWindowState.Maximized;
  39. }
  40. #endregion
  41. #region 操作权限
  42. public DataTable RightOfExute()
  43. {
  44. DataTable rData = new DataTable();
  45. rData.Columns.Add("BtnName");
  46. rData.Columns.Add("ActionName");
  47. //查看权限(必须有)
  48. DataRow seeRow = rData.NewRow();
  49. seeRow["BtnName"] = "see";
  50. seeRow["ActionName"] = "查看";
  51. rData.Rows.Add(seeRow);
  52. List<Control> ControlList = new List<Control>();
  53. ControlList.Add(btnOutPut);
  54. foreach (Control ctr in ControlList)
  55. {
  56. if (ctr.GetType() == typeof(SimpleButton))
  57. {
  58. DataRow dr = rData.NewRow();
  59. dr["BtnName"] = ctr.Name;
  60. dr["ActionName"] = ctr.Text;
  61. rData.Rows.Add(dr);
  62. }
  63. }
  64. rData.AcceptChanges();
  65. return rData;
  66. }
  67. public DataTable RightOfData()// 数据权限
  68. {
  69. DataTable rData = new DataTable();
  70. rData.Columns.Add("BodyName");
  71. rData.Columns.Add("ControlName");
  72. rData.Columns.Add("ControlCaption");
  73. rData.AcceptChanges();
  74. return rData;
  75. }
  76. #endregion
  77. #region 退出
  78. private void btnClose_Click(object sender, EventArgs e)
  79. {
  80. AppConfig.CloseFormShow(this.Text);
  81. this.Close();
  82. }
  83. private void btnExit_Click(object sender, EventArgs e)
  84. {
  85. AppConfig.CloseFormShow(this.Text);
  86. this.Close();
  87. }
  88. #endregion
  89. #region 移动窗体
  90. private const int WM_NCHITTEST = 0x84;
  91. private const int HTCLIENT = 0x1;
  92. private const int HTCAPTION = 0x2;
  93. //首先必须了解Windows的消息传递机制,当有鼠标活动消息时,
  94. //系统发送WM_NCHITTEST 消息给窗体作为判断消息发生地的根据。 nchittest
  95. //假如你点击的是标题栏,窗体收到的消息值就是 HTCAPTION ,
  96. //同样地,若接受到的消息是 HTCLIENT,说明用户点击的是客户区,也就是鼠标消息发生在客户区。
  97. //重写窗体,使窗体可以不通过自带标题栏实现移动
  98. protected override void WndProc(ref Message m)
  99. {
  100. //当重载窗体的 WndProc 方法时,可以截获 WM_NCHITTEST 消息并改些该消息,
  101. //当判断鼠标事件发生在客户区时,改写改消息,发送 HTCAPTION 给窗体,
  102. //这样,窗体收到的消息就时 HTCAPTION ,在客户区通过鼠标来拖动窗体就如同通过标题栏来拖动一样。
  103. //注意:当你重载 WndProc 并改写鼠标事件后,整个窗体的鼠标事件也就随之改变了。
  104. switch (m.Msg)
  105. {
  106. case WM_NCHITTEST:
  107. base.WndProc(ref m);
  108. if ((int)m.Result == HTCLIENT)
  109. m.Result = (IntPtr)HTCAPTION;
  110. return;
  111. }
  112. //拦截双击标题栏、移动窗体的系统消息
  113. if (m.Msg != 0xA3)
  114. {
  115. base.WndProc(ref m);
  116. }
  117. }
  118. #endregion
  119. #region 列表
  120. private void grvDetail_CustomDrawRowIndicator(object sender, DevExpress.XtraGrid.Views.Grid.RowIndicatorCustomDrawEventArgs e)
  121. {
  122. }
  123. #endregion
  124. #region 过滤
  125. private string tempTableName = "";
  126. private void btnFilter_Click(object sender, EventArgs e)
  127. {
  128. FormFilter filter = new FormFilter(AppConfig.GetSourceId(this.Tag.ToString(), btnConfig.Name));
  129. filter.OldTempTableName = tempTableName;
  130. if (filter.ShowDialog() == DialogResult.OK)
  131. {
  132. DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在查找...请稍等...");
  133. try
  134. {
  135. _wait.Show();
  136. tempTableName = filter.NewTempTableName;
  137. sqltxt = filter.SqlText;
  138. sqlconn = filter.FilterConnectString;
  139. dataSource = filter.FilterData.Tables[0];
  140. grdDetail.DataSource = dataSource;
  141. grvDetail.BestFitColumns();
  142. rptPage.RecordNum = dataSource.Rows.Count;
  143. rptPage.PageSize = 499;
  144. rptPage.PageIndex = 1;
  145. rptPage.ReLoad();
  146. rptPage.PageSize = 500;
  147. rptPage.PageIndex = 1;
  148. rptPage.ReLoad();
  149. _wait.Close();
  150. }
  151. catch (Exception ex)
  152. {
  153. MessageBox.Show("异常:" + ex.Message, "异常", MessageBoxButtons.OK, MessageBoxIcon.Error);
  154. _wait.Close();
  155. }
  156. }
  157. }
  158. #endregion
  159. #region 绑定数据源
  160. private void btnConfig_Click(object sender, EventArgs e)
  161. {
  162. if (AppConfig.UserCode.ToLower() != "demo")
  163. {
  164. ICSBaseSimpleCode.AppshowMessageBox("您没有权限设置数据源,请联系软件提供商!");
  165. return;
  166. }
  167. FormDataSource fdata = new FormDataSource(AppConfig.GetMenuId(this.Tag.ToString()), btnConfig.Name);
  168. fdata.ShowDialog();
  169. }
  170. #endregion
  171. #region 分页
  172. private void rptPage_PageIndexChanged(object Sender, EventArgs e)
  173. {
  174. DataTable data = AppConfig.GetPageData(dataSource, rptPage.PageIndex, rptPage.PageSize).Copy();
  175. grdDetail.DataSource = data;
  176. }
  177. #endregion
  178. #region 过滤方法
  179. private void FormContainerManager_FormClosing(object sender, FormClosingEventArgs e)
  180. {
  181. AppConfig.DropTemTable(tempTableName);
  182. }
  183. #endregion
  184. #region 导出
  185. private void btnOutPut_Click(object sender, EventArgs e)
  186. {
  187. try
  188. {
  189. FormOutExcel foe = new FormOutExcel(this.Tag.ToString(), grdDetail);
  190. foe.ShowDialog();
  191. }
  192. catch (Exception ex)
  193. {
  194. MessageBox.Show("异常:" + ex.Message, "异常", MessageBoxButtons.OK, MessageBoxIcon.Error);
  195. }
  196. //SimpleButton btntemp = (SimpleButton)sender;
  197. //if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
  198. //{
  199. // ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
  200. // return;
  201. //}
  202. //FormOutExcel foe = new FormOutExcel();
  203. //if (foe.ShowDialog() == DialogResult.OK)
  204. //{
  205. // try
  206. // {
  207. // string outtype = foe._OutType;
  208. // string exceltype = foe._ExcelType;
  209. // string filename = foe._FileName;
  210. // string url = foe._Url;
  211. // string sheetname = foe._SheetName;
  212. // if (outtype.ToLower() == "excel")
  213. // {
  214. // DevExpress.XtraPrinting.XlsExportOptions op = new DevExpress.XtraPrinting.XlsExportOptions();
  215. // op.SheetName = sheetname;
  216. // grdDetail.MainView.ExportToXls((url + "\\" + filename + (exceltype == "2003" ? ".xls" : ".xlsx")), op);
  217. // }
  218. // else
  219. // {
  220. // grdDetail.MainView.ExportToPdf(url + "\\" + filename + ".pdf");
  221. // }
  222. // MessageBox.Show("导出成功", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information);
  223. // }
  224. // catch (Exception ex)
  225. // {
  226. // MessageBox.Show("异常:" + ex.Message, "异常", MessageBoxButtons.OK, MessageBoxIcon.Error);
  227. // }
  228. //}
  229. }
  230. #endregion
  231. #region 刷新
  232. private void btnRefresh_Click(object sender, EventArgs e)
  233. {
  234. DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在查找...请稍等...");
  235. try
  236. {
  237. _wait.Show();
  238. FormFilter filter = new FormFilter(AppConfig.GetSourceId(this.Tag.ToString(), btnConfig.Name), false);
  239. filter.OldTempTableName = tempTableName;
  240. //tempTableName = filter.NewTempTableName;
  241. //DataTable data = DBHelper.ExecuteDataset(AppConfig.FrameConnectString, CommandType.Text, "select * from " + tempTableName).Tables[0];
  242. dataSource = DBHelper.ExecuteDataset(sqlconn, CommandType.Text, sqltxt).Tables[0];
  243. grdDetail.DataSource = dataSource;
  244. grvDetail.BestFitColumns();
  245. rptPage.RecordNum = dataSource.Rows.Count;
  246. rptPage.PageIndex = 1;
  247. rptPage.ReLoad();
  248. _wait.Close();
  249. }
  250. catch (Exception ex)
  251. {
  252. MessageBox.Show("异常:" + ex.Message, "异常", MessageBoxButtons.OK, MessageBoxIcon.Error);
  253. _wait.Close();
  254. }
  255. }
  256. #endregion
  257. private void FormICSNOInput_FormClosing(object sender, FormClosingEventArgs e)
  258. {
  259. AppConfig.DropTemTable(tempTableName);
  260. }
  261. private void FormICSNOInput_Load(object sender, EventArgs e)
  262. {
  263. btnFilter_Click(sender, e);
  264. }
  265. private void grvDetail_CustomDrawCell(object sender, DevExpress.XtraGrid.Views.Base.RowCellCustomDrawEventArgs e)
  266. {
  267. if (e.RowHandle >= 0 && e.Column.FieldName == "DCTCODE")
  268. {
  269. e.CellValue = "cccc";
  270. }
  271. }
  272. private void grvDetail_DoubleClick(object sender, EventArgs e)
  273. {
  274. }
  275. }
  276. }