版博士V2.0程序
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.
 
 
 
 

82 lines
2.8 KiB

  1. using CCWin.Win32.Const;
  2. using MaiMuAOI.KeyboardHook;
  3. using MaiMuAOI.SysCtrl;
  4. using System;
  5. using System.Collections.Generic;
  6. using System.ComponentModel;
  7. using System.Data;
  8. using System.Drawing;
  9. using System.Linq;
  10. using System.Text;
  11. using System.Threading;
  12. using System.Threading.Tasks;
  13. using System.Windows.Forms;
  14. namespace MaiMuAOI.SysUI.Load
  15. {
  16. public partial class CodeFrm : Form
  17. {
  18. KeyboardTools kts;
  19. public string[] codeArry = null;
  20. public CodeFrm()
  21. {
  22. InitializeComponent();
  23. }
  24. private void CodeFrm_Load(object sender, EventArgs e)
  25. {
  26. kts = new KeyboardTools();
  27. kts.WarningEvent = (wrn, str) => {
  28. if(wrn != MaiMuControl.Device.WarningEnum.Normal)
  29. MessageBox.Show(str, "错误", MessageBoxButtons.OK, MessageBoxIcon.Error);
  30. };
  31. kts.ScanerEvent = (code) => {
  32. this.Invoke(new System.Action(() =>
  33. {
  34. textBox1.Text = code;
  35. try
  36. {
  37. var strarry = code.Split('-');
  38. if (strarry.Length == 9)
  39. {
  40. label3.Text = $"网版供应商:{strarry[0]},接收网版客户:{strarry[1]},网版编码:{strarry[2]},\r\n" +
  41. $"目数:{strarry[3]},线径:{strarry[4]},纱厚:{strarry[5]},\r\n" +
  42. $"膜厚:{strarry[6]},线宽:{strarry[7]},张力:{strarry[8]}";
  43. codeArry = strarry;
  44. this.Refresh();
  45. Thread.Sleep(2000);
  46. kts.stop();
  47. this.DialogResult = DialogResult.OK;
  48. this.Close();
  49. }
  50. else
  51. {
  52. label3.Text = $"扫码错误:解析长度不足9位,缺少数据!!!请检测二维码格式内容";
  53. }
  54. }
  55. catch {
  56. label3.Text = $"扫码错误:无法解析!!!请检测二维码格式内容";
  57. }
  58. }));
  59. };
  60. kts.start();
  61. }
  62. private void textBox1_KeyUp(object sender, KeyEventArgs e)
  63. {
  64. if(e.KeyCode == Keys.Enter)
  65. {
  66. string sn = this.textBox1.Text.Trim();
  67. if (string.IsNullOrWhiteSpace(sn))
  68. return;
  69. Task.Factory.StartNew(() =>
  70. {
  71. kts.ScanerEvent?.Invoke(sn);
  72. });
  73. }
  74. }
  75. }
  76. }