F_PLC_M.cs 14 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434
  1. using System;
  2. using System.Windows.Forms;
  3. using Curtain.Framework.Json;
  4. using Curtain.Net.Sockets.PLC;
  5. using Curtain.Net.Sockets.PLC.Model;
  6. using Curtain.Net.Sockets.PLC.Model.Melsec;
  7. namespace PLC_WF
  8. {
  9. public partial class F_PLC_M<TClientModel> : Form
  10. where TClientModel : IClientModel, new()
  11. {
  12. SocketClient<TClientModel> _client = null;
  13. public F_PLC_M()
  14. {
  15. InitializeComponent();
  16. _client = new SocketClient<TClientModel>();
  17. this.Text = typeof(TClientModel).Name;
  18. }
  19. private void btnConn_Click(object sender, EventArgs e)
  20. {
  21. if (_client != null)
  22. {
  23. _client?.Close();
  24. _client?.Dispose();
  25. _client = null;
  26. }
  27. _client = new SocketClient<TClientModel>();
  28. try
  29. {
  30. _client.Connect(this.txtIP.Text, int.Parse(this.txtPort.Text));
  31. this.txtMessage.Text = "OK";
  32. }
  33. catch (Exception ex)
  34. {
  35. this.txtMessage.Text = ex.ToString();
  36. _client?.Close();
  37. }
  38. }
  39. private void btnClose_Click(object sender, EventArgs e)
  40. {
  41. _client?.Close();
  42. _client?.Dispose();
  43. _client = null;
  44. }
  45. private void btnClear_Click(object sender, EventArgs e)
  46. {
  47. this.txtMessage.Clear();
  48. }
  49. #region R
  50. private void btnR_bool_Click(object sender, EventArgs e)
  51. {
  52. this.txtMessage.Text = null;
  53. try
  54. {
  55. PLCResult<bool> rr = _client.Read<bool>(this.txtCode.Text, txtNumber.Text, Convert.ToInt32(txtLength.Text));
  56. this.txtMessage.Text = JsonHelper.FromObject(rr);
  57. }
  58. catch (Exception ex)
  59. {
  60. this.txtMessage.Text = ex.ToString();
  61. _client?.Close();
  62. }
  63. }
  64. private void btnR_byte_Click(object sender, EventArgs e)
  65. {
  66. this.txtMessage.Text = null;
  67. try
  68. {
  69. PLCResult<byte> rr = _client.Read<byte>(this.txtCode.Text, txtNumber.Text, Convert.ToInt32(txtLength.Text));
  70. this.txtMessage.Text = JsonHelper.FromObject(rr);
  71. }
  72. catch (Exception ex)
  73. {
  74. this.txtMessage.Text = ex.ToString();
  75. _client?.Close();
  76. }
  77. }
  78. private void btnR_short_Click(object sender, EventArgs e)
  79. {
  80. this.txtMessage.Text = null;
  81. try
  82. {
  83. PLCResult<short> rr = _client.Read<short>(this.txtCode.Text, txtNumber.Text, Convert.ToInt32(txtLength.Text));
  84. this.txtMessage.Text = JsonHelper.FromObject(rr);
  85. }
  86. catch (Exception ex)
  87. {
  88. this.txtMessage.Text = ex.ToString();
  89. _client?.Close();
  90. }
  91. }
  92. private void btnR_ushort_Click(object sender, EventArgs e)
  93. {
  94. this.txtMessage.Text = null;
  95. try
  96. {
  97. PLCResult<ushort> rr = _client.Read<ushort>(this.txtCode.Text, txtNumber.Text, Convert.ToInt32(txtLength.Text));
  98. this.txtMessage.Text = JsonHelper.FromObject(rr);
  99. }
  100. catch (Exception ex)
  101. {
  102. this.txtMessage.Text = ex.ToString();
  103. _client?.Close();
  104. }
  105. }
  106. private void btnR_int_Click(object sender, EventArgs e)
  107. {
  108. this.txtMessage.Text = null;
  109. try
  110. {
  111. PLCResult<int> rr = _client.Read<int>(this.txtCode.Text, txtNumber.Text, Convert.ToInt32(txtLength.Text));
  112. this.txtMessage.Text = JsonHelper.FromObject(rr);
  113. }
  114. catch (Exception ex)
  115. {
  116. this.txtMessage.Text = ex.ToString();
  117. _client?.Close();
  118. }
  119. }
  120. private void btnR_uint_Click(object sender, EventArgs e)
  121. {
  122. this.txtMessage.Text = null;
  123. try
  124. {
  125. PLCResult<uint> rr = _client.Read<uint>(this.txtCode.Text, txtNumber.Text, Convert.ToInt32(txtLength.Text));
  126. this.txtMessage.Text = JsonHelper.FromObject(rr);
  127. }
  128. catch (Exception ex)
  129. {
  130. this.txtMessage.Text = ex.ToString();
  131. _client?.Close();
  132. }
  133. }
  134. private void btnR_long_Click(object sender, EventArgs e)
  135. {
  136. this.txtMessage.Text = null;
  137. try
  138. {
  139. PLCResult<long> rr = _client.Read<long>(this.txtCode.Text, txtNumber.Text, Convert.ToInt32(txtLength.Text));
  140. this.txtMessage.Text = JsonHelper.FromObject(rr);
  141. }
  142. catch (Exception ex)
  143. {
  144. this.txtMessage.Text = ex.ToString();
  145. _client?.Close();
  146. }
  147. }
  148. private void btnR_ulong_Click(object sender, EventArgs e)
  149. {
  150. this.txtMessage.Text = null;
  151. try
  152. {
  153. PLCResult<ulong> rr = _client.Read<ulong>(this.txtCode.Text, txtNumber.Text, Convert.ToInt32(txtLength.Text));
  154. this.txtMessage.Text = JsonHelper.FromObject(rr);
  155. }
  156. catch (Exception ex)
  157. {
  158. this.txtMessage.Text = ex.ToString();
  159. _client?.Close();
  160. }
  161. }
  162. private void btnR_float_Click(object sender, EventArgs e)
  163. {
  164. this.txtMessage.Text = null;
  165. try
  166. {
  167. PLCResult<float> rr = _client.Read<float>(this.txtCode.Text, txtNumber.Text, Convert.ToInt32(txtLength.Text));
  168. this.txtMessage.Text = JsonHelper.FromObject(rr);
  169. }
  170. catch (Exception ex)
  171. {
  172. this.txtMessage.Text = ex.ToString();
  173. _client?.Close();
  174. }
  175. }
  176. private void btnR_double_Click(object sender, EventArgs e)
  177. {
  178. this.txtMessage.Text = null;
  179. try
  180. {
  181. PLCResult<double> rr = _client.Read<double>(this.txtCode.Text, txtNumber.Text, Convert.ToInt32(txtLength.Text));
  182. this.txtMessage.Text = JsonHelper.FromObject(rr);
  183. }
  184. catch (Exception ex)
  185. {
  186. this.txtMessage.Text = ex.ToString();
  187. _client?.Close();
  188. }
  189. }
  190. private void btnR_string_Click(object sender, EventArgs e)
  191. {
  192. this.txtMessage.Text = null;
  193. try
  194. {
  195. PLCResult<string> rr = _client.Read<string>(this.txtCode.Text, txtNumber.Text, Convert.ToInt32(txtLength.Text));
  196. this.txtMessage.Text = JsonHelper.FromObject(rr);
  197. }
  198. catch (Exception ex)
  199. {
  200. this.txtMessage.Text = ex.ToString();
  201. _client?.Close();
  202. }
  203. }
  204. #endregion
  205. #region W
  206. private void btnW_bool_Click(object sender, EventArgs e)
  207. {
  208. this.txtMessage.Text = null;
  209. try
  210. {
  211. PLCResult rr = _client.Write<bool>(this.txtW_Code.Text, txtW_Num.Text,
  212. ((string.IsNullOrWhiteSpace(txtW_Value.Text) || txtW_Value.Text == "0") ? false : true));
  213. this.txtMessage.Text = JsonHelper.FromObject(rr);
  214. }
  215. catch (Exception ex)
  216. {
  217. this.txtMessage.Text = ex.ToString();
  218. _client?.Close();
  219. }
  220. }
  221. private void btnW_byte_Click(object sender, EventArgs e)
  222. {
  223. this.txtMessage.Text = null;
  224. try
  225. {
  226. PLCResult rr = _client.Write<byte>(this.txtW_Code.Text, txtW_Num.Text, Convert.ToByte(txtW_Value.Text));
  227. this.txtMessage.Text = JsonHelper.FromObject(rr);
  228. }
  229. catch (Exception ex)
  230. {
  231. this.txtMessage.Text = ex.ToString();
  232. _client?.Close();
  233. }
  234. }
  235. private void btnW_short_Click(object sender, EventArgs e)
  236. {
  237. this.txtMessage.Text = null;
  238. try
  239. {
  240. PLCResult rr = _client.Write<short>(this.txtW_Code.Text, txtW_Num.Text, Convert.ToInt16(txtW_Value.Text));
  241. this.txtMessage.Text = JsonHelper.FromObject(rr);
  242. }
  243. catch (Exception ex)
  244. {
  245. this.txtMessage.Text = ex.ToString();
  246. _client?.Close();
  247. }
  248. }
  249. private void btnW_ushort_Click(object sender, EventArgs e)
  250. {
  251. this.txtMessage.Text = null;
  252. try
  253. {
  254. PLCResult rr = _client.Write<ushort>(this.txtW_Code.Text, txtW_Num.Text, Convert.ToUInt16(txtW_Value.Text));
  255. this.txtMessage.Text = JsonHelper.FromObject(rr);
  256. }
  257. catch (Exception ex)
  258. {
  259. this.txtMessage.Text = ex.ToString();
  260. _client?.Close();
  261. }
  262. }
  263. private void btnW_int_Click(object sender, EventArgs e)
  264. {
  265. this.txtMessage.Text = null;
  266. try
  267. {
  268. PLCResult rr = _client.Write<int>(this.txtW_Code.Text, txtW_Num.Text, Convert.ToInt32(txtW_Value.Text));
  269. this.txtMessage.Text = JsonHelper.FromObject(rr);
  270. }
  271. catch (Exception ex)
  272. {
  273. this.txtMessage.Text = ex.ToString();
  274. _client?.Close();
  275. }
  276. }
  277. private void btnW_uint_Click(object sender, EventArgs e)
  278. {
  279. this.txtMessage.Text = null;
  280. try
  281. {
  282. PLCResult rr = _client.Write<uint>(this.txtW_Code.Text, txtW_Num.Text, Convert.ToUInt32(txtW_Value.Text));
  283. this.txtMessage.Text = JsonHelper.FromObject(rr);
  284. }
  285. catch (Exception ex)
  286. {
  287. this.txtMessage.Text = ex.ToString();
  288. _client?.Close();
  289. }
  290. }
  291. private void btnW_long_Click(object sender, EventArgs e)
  292. {
  293. this.txtMessage.Text = null;
  294. try
  295. {
  296. PLCResult rr = _client.Write<long>(this.txtW_Code.Text, txtW_Num.Text, Convert.ToInt64(txtW_Value.Text));
  297. this.txtMessage.Text = JsonHelper.FromObject(rr);
  298. }
  299. catch (Exception ex)
  300. {
  301. this.txtMessage.Text = ex.ToString();
  302. _client?.Close();
  303. }
  304. }
  305. private void btnW_ulong_Click(object sender, EventArgs e)
  306. {
  307. this.txtMessage.Text = null;
  308. try
  309. {
  310. PLCResult rr = _client.Write<ulong>(this.txtW_Code.Text, txtW_Num.Text, Convert.ToUInt64(txtW_Value.Text));
  311. this.txtMessage.Text = JsonHelper.FromObject(rr);
  312. }
  313. catch (Exception ex)
  314. {
  315. this.txtMessage.Text = ex.ToString();
  316. _client?.Close();
  317. }
  318. }
  319. private void btnW_float_Click(object sender, EventArgs e)
  320. {
  321. this.txtMessage.Text = null;
  322. try
  323. {
  324. PLCResult rr = _client.Write<float>(this.txtW_Code.Text, txtW_Num.Text, Convert.ToSingle(txtW_Value.Text));
  325. this.txtMessage.Text = JsonHelper.FromObject(rr);
  326. }
  327. catch (Exception ex)
  328. {
  329. this.txtMessage.Text = ex.ToString();
  330. _client?.Close();
  331. }
  332. }
  333. private void btnW_double_Click(object sender, EventArgs e)
  334. {
  335. this.txtMessage.Text = null;
  336. try
  337. {
  338. PLCResult rr = _client.Write<double>(this.txtW_Code.Text, txtW_Num.Text, Convert.ToDouble(txtW_Value.Text));
  339. this.txtMessage.Text = JsonHelper.FromObject(rr);
  340. }
  341. catch (Exception ex)
  342. {
  343. this.txtMessage.Text = ex.ToString();
  344. _client?.Close();
  345. }
  346. }
  347. private void btnW_string_Click(object sender, EventArgs e)
  348. {
  349. this.txtMessage.Text = null;
  350. try
  351. {
  352. //PLCResult rr = _client.Write<string>(txtW_Code.Text, txtW_Num.Text,
  353. // txtW_Value.Text, Convert.ToInt32(txtW_Len.Text));
  354. PLCResult rr = _client.Write<string>(txtW_Code.Text, txtW_Num.Text,
  355. txtW_Value.Text);
  356. this.txtMessage.Text = JsonHelper.FromObject(rr);
  357. }
  358. catch (Exception ex)
  359. {
  360. this.txtMessage.Text = ex.ToString();
  361. _client?.Close();
  362. }
  363. }
  364. #endregion
  365. #region DO
  366. private void btnDo_Click(object sender, EventArgs e)
  367. {
  368. this.txtMessage.Text = null;
  369. try
  370. {
  371. if (sender is Button bb)
  372. {
  373. string s = this.textBox1.Text;
  374. PLCMessage cm = new PLCMessage();
  375. cm.Command = s;
  376. PLCResult<PLCMessage> rr = null;
  377. if (bb.Name == "btnDo")
  378. {
  379. rr = _client.DoCommand(cm);
  380. }
  381. else
  382. {
  383. //cm.Command = s;
  384. rr = _client.DoCommandOneWay(cm);
  385. //using (Socket socket = new Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp))
  386. //{
  387. // socket.Connect(this.txtIP.Text, int.Parse(this.txtPort.Text));
  388. // socket.Send(Encoding.ASCII.GetBytes(s));
  389. //}
  390. //this.txtMessage.Text = "ok";
  391. //return;
  392. }
  393. this.txtMessage.Text = JsonHelper.FromObject(rr);
  394. }
  395. }
  396. catch (Exception ex)
  397. {
  398. this.txtMessage.Text = ex.ToString();
  399. _client?.Close();
  400. }
  401. }
  402. #endregion
  403. }
  404. }