編集履歴

質問編集履歴

コードをさらに詳細に書き出しました。

2018/03/08 12:27

投稿

GrayWingAliance

スコア218

test CHANGED Viewed

File without changes

test CHANGED Viewed

@@ -69,3 +69,375 @@
 * C#
 => ver.7.0
+# 追記
+```csharp
+using System;
+using System.Net;
+using System.Threading;
+using Framework.TCP;
+using Common.Model;
+namespace TcpIp.Model
+{
+	public static class Tcp
+	{
+		private static MasterTCP _masterTcp;
+		private static IPAddress _ipAddress;
+		private static int _port;
+		private static ushort _address;
+		private static byte _unitId;
+		private static bool _updateFlag;
+		private static int _sleepTime;
+		public static void InitSettings(string ipAddr, int port, byte unitId, ushort address)
+		{
+			_ipAddress = IPAddress.Parse(ipAddr);
+			_port = port;
+			_address = address;
+			_unitId = unitId;
+			_updateFlag = true;
+			_sleepTime = 2500;
+			_masterTcp = new MasterTCP(_ipAddress.ToString(), _port);
+		}
+		public static void Connect()
+		{
+			if (_ipAddress == null && _port == 0)
+				throw new Exception("接続情報が初期化されていません。");
+			if (_masterTcp.Connected)
+				return;
+			_masterTcp.Connect();
+		}
+		public static void DisConnect()
+		{
+			if (!_masterTcp.Connected)
+				return;
+			_masterTcp.Disconnect();
+		}
+		public static void TryOpen()
+		{
+			try
+			{
+				_masterTcp.Connect();
+			}
+			catch (Exception ex)
+			{
+				throw new DeviceIoFailedException("");
+			}
+		}
+		private static void Execute(Command commandClass, TcpFunction function)
+		{
+			_updateFlag = !_updateFlag;
+			var command = new byte[2];
+			switch (function)
+			{
+				case TcpFunction.Read:
+					command = commandClass.CreateReadCommand();
+					break;
+				case TcpFunction.Write:
+					command = commandClass.CreateWriteCommand();
+					break;
+				default:
+					throw new Exception("[Tcp.Execute] 無効な操作です。");
+			}
+			var value = (ushort) ((_updateFlag ? 1 : 0 >> 15) + (command[0] >> 8) + command[1]);
+			_masterTcp.WriteSingleRegister(_unitId, (ushort)(1056 + _address), value);
+			Thread.Sleep(_sleepTime);
+		}
+		public static void Read(Command command)
+		{
+			Execute(command, TcpFunction.Read);
+		}
+		public static void Write(Command command)
+		{
+			Execute(command, TcpFunction.Write);
+		}
+	}
+	public enum TcpFunction
+	{
+		Read,
+		Write
+	}
+}
+```
+こちらが実際のTcpクラスになります。
+残念ながら、完全に同一ではなく、多少名前空間などを変えてあります。
+```csharp
+using System;
+using System.Collections.ObjectModel;
+using System.Windows.Media;
+using Common.Model;
+using TcpIp.Model;
+namespace TcpIp.Ui.ViewModels
+{
+    public class ItemViewModel<T> : ViewModel where T : Command , new()
+    {
+        protected Brush signal;
+        public string ItemName { get; protected set; }
+        public MainViewModel.Response Write()
+        {
+            var isWritten = false;
+            var isRead = false;
+            try
+            {
+                Tcp.Read(new T());
+                DoEvents();
+                isWritten = true;
+            }
+            catch (Exception)
+            {
+                DoEvents();
+                isWritten = false;
+            }
+            try
+            {
+                var bytes = Tcp.Read(new T());
+                Index = new T().CreateFromHid(bytes).UiValue;
+                Signal = new SolidColorBrush(Color.FromArgb(0xff, 0x00, 0xff, 0x00));
+                isRead = true;
+            }
+            catch (Exception)
+            {
+                DoEvents();
+                isRead = false;
+            }
+            if (!isWritten || !isRead)
+            {
+                Signal = Brushes.Red;
+            }
+            if (!isWritten && !isRead)
+            {
+                return new MainViewModel.Response()
+                {
+                    ItemName = ItemName,
+                    Exception = new ApiException("において、読み書きが失敗しました。")
+                };
+            }
+            if (isWritten && !isRead)
+            {
+                return new MainViewModel.Response()
+                {
+                    ItemName = ItemName,
+                    Exception = new ApiException("において、読込が失敗しました。")
+                };
+            }
+            if (!isWritten)
+            {
+                return new MainViewModel.Response()
+                {
+                    ItemName = ItemName,
+                    Exception = new ApiException("において、書き込みが失敗しました。")
+                };
+            }
+            return null;
+        }
+}
+```
+こちらが、ItemViewModelクラスになります。