UTS/AUTS_OLD
Archived
5
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

合并修改

Browse Source
This commit is contained in:
Wen Momo
2025-04-14 20:25:51 +08:00
parent 5e7c9c7654 e82bfaaf20
commit 64ae1ae9bf
30 changed files with 1487 additions and 1241 deletions
Download Patch File Download Diff File Expand all files Collapse all files

183
AUTS_Win/bin/Debug/UTS_Core.xml
View File

@@ -1513,53 +1513,48 @@ UTS_Core
<param name="path"></param>
<returns></returns>
</member>
<member name="M:UTS_Core.Undo.ICommand.Execute">
<summary>
运行一条需要记录在撤销栈的命令
</summary>
</member>
<member name="M:UTS_Core.Undo.ICommand.Redo">
<member name="M:UTS_Core.ICommand.Redo">
<summary>
重做命令
</summary>
</member>
<member name="M:UTS_Core.Undo.ICommand.Undo">
<member name="M:UTS_Core.ICommand.Undo">
<summary>
撤销命令
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.RunCommand(UTS_Core.Undo.ICommand)">
<member name="M:UTS_Core.CommandManager.RunCommand(UTS_Core.ICommand)">
<summary>
运行命令，并将命令添加至撤销堆栈
</summary>
<param name="command"></param>
</member>
<member name="M:UTS_Core.Undo.CommandManager.AddUndoCommand(UTS_Core.Undo.ICommand)">
<member name="M:UTS_Core.CommandManager.AddUndoCommand(UTS_Core.ICommand)">
<summary>
将命令添加至撤销堆栈
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.ClearUndoCommands">
<member name="M:UTS_Core.CommandManager.ClearUndoCommands">
<summary>
清空撤销命令堆栈
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.ClearRedoCommands">
<member name="M:UTS_Core.CommandManager.ClearRedoCommands">
<summary>
清空重做命令堆栈
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.ClearCommands">
<member name="M:UTS_Core.CommandManager.ClearCommands">
<summary>
清空撤销与重做命令堆栈
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.Undo">
<member name="M:UTS_Core.CommandManager.Undo">
<summary>
执行撤销命令
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.Redo">
<member name="M:UTS_Core.CommandManager.Redo">
<summary>
执行重做命令
</summary>
@@ -6074,12 +6069,42 @@ UTS_Core
<member name="P:UTS_Core.UTSModule.Station.StationPlan.ParentPacket">
<summary>测试流程所关联的项目站包信息</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._grd">
<summary>表格控件对象</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._headNode">
<summary>表格树状目录起始节点</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._drawCol">
<summary>起始绘制列</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._drawStartRow">
<summary>起始绘制行</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._debugMode">
<summary>调试模式是否开启</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._showNodeIcon">
<summary>是否显示节点图标</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._uploading">
<summary>处于更新表格状态中,不触发表格单元格修改事件</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._paramChar">
<summary>多个参数间的分割符号</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._testCmdManager">
<summary>测试命令管理器</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._errCodeManager">
<summary>错误代码管理器</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._labelNames">
<summary>表格标签字段字典</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._recordNames">
<summary>表格记录名称字段字典</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid.ActiveNode">
<summary>当前活动节点</summary>
</member>
@@ -6089,11 +6114,8 @@ UTS_Core
<member name="E:UTS_Core.UTSModule.Station.StationPlanGrid.RowNodeTextChanged">
<summary>节点文本被修改事件</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._testCmdManager">
<summary>测试命令管理器</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._errCodeManager">
<summary>错误代码管理器</summary>
<member name="E:UTS_Core.UTSModule.Station.StationPlanGrid.PlanGridCommandChanged">
<summary>节点执行可撤销事件</summary>
</member>
<member name="P:UTS_Core.UTSModule.Station.StationPlanGrid.SkipEvent">
<summary>
@@ -6101,11 +6123,6 @@ UTS_Core
</summary>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.GridUpdateEventTrigger(FlexCell.Grid)">
<summary>
对第二行的Action执行一遍操作，以触发更新事件
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.BackwardNavigation">
<summary>
向后导航
@@ -6135,6 +6152,80 @@ UTS_Core
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.IsExistLabelName(System.String)">
<summary>
当前模块名是否已存在
</summary>
<param name="labelName"></param>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.IsExistRecordName(System.String)">
<summary>
当前字段名
</summary>
<param name="recordName"></param>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.ClearLabelNames">
<summary>
清空标签名称
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.ClearRecordNames">
<summary>
清空记录名称
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.AddLabelName(System.String,System.Int32)">
<summary>
添加标签名称
</summary>
<param name="labelName">标签名称</param>
<param name="row">行号</param>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.AddRecordName(System.String,System.Int32)">
<summary>
添加记录名称
</summary>
<param name="recordName">记录名</param>
<param name="row">行号</param>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.RemoveLabelName(System.String)">
<summary>
移出标签名称
</summary>
<param name="labelName">标签名称</param>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.RemoveRecordName(System.String)">
<summary>
移出记录名称
</summary>
<param name="recordName">记录名称</param>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.GetLabelNameGridRow(System.String)">
<summary>
获取标签名称行号
</summary>
<param name="labelName"></param>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.GetRecordNameGridRow(System.String)">
<summary>
获取记录名称行号
</summary>
<param name="recordName"></param>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.ReflushLabelNames">
<summary>
从表格中重载标签名称
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.ReflushRecordNames">
<summary>
从表格中重载记录名称
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.Grid_MouseLeave(System.Object,System.EventArgs)">
<summary>
光标离开grd表格时，黄色底色切换到选中行
@@ -6145,38 +6236,16 @@ UTS_Core
光标进入grd表格时，原底色切换到选中行
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.setRowTextForeColor(System.String,System.Boolean,UTS_Core.UTSModule.Station.RowNode.RowTypeEnum)">
<summary>
根据CmdType 和 isAction 返回该行字体颜色
</summary>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.Mouse_MoveOnNode_BackColorRepain(FlexCell.Grid,System.Int32,System.Int32,System.Drawing.Color)">
<summary>
鼠标移动到节点位置时所有子节点背景着色
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.getRowActionEn(FlexCell.Grid,System.Int32)">
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.NodeRowTypeChanged(UTS_Core.UTSModule.Station.RowNode)">
<summary>
FixModule节点Action变化时子节点字体重新着色
节点类型变更，修改节点行样式
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.NodeAction_Change(FlexCell.Grid,System.Int32,System.Int32,System.Boolean)">
<summary>
FixModule节点Action变化时子节点字体重新着色
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.Grid_Repain_By_ActionEn(FlexCell.Grid)">
<summary>
根据总表状态对单元格字体重新着色
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.UpdateGridInfo(FlexCell.Grid)">
<summary>
遍历表格，并更新到全局数组
</summary>
<param name="node"></param>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.NodeActionChanged(UTS_Core.UTSModule.Station.RowNode)">
<summary>
@@ -6195,16 +6264,6 @@ UTS_Core
选定行使能或清除Action选项
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.Call_UpdateGridActionInfo">
<summary>
更新表格内容到缓存，但是并不重新着色
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.UpdateGridActionInfo(FlexCell.Grid)">
<summary>
更新ActionEn信息
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.Grid_MouseMove(System.Object,System.Windows.Forms.MouseEventArgs)">
<summary>
光标移动时，所在行底色高亮
@@ -6251,6 +6310,12 @@ UTS_Core
初始化测试站表格
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.UpdateGrid">
<summary>
加载测试文件后更新表格
</summary>
<remarks></remarks>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.ExpandRows(UTS_Core.UTSModule.Station.RowNode)">
<summary>
展开行节点

174
UTS_Core/UTSModule/Station/FrmStationPlan.Designer.vb generated
View File

@@ -35,11 +35,14 @@ Namespace UTSModule.Station
Me.TsBtnLoad = New System.Windows.Forms.ToolStripButton()
Me.TsBtnSaveAs = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
Me.tsBtnInsertRow = New System.Windows.Forms.ToolStripButton()
Me.tsBtnRemoveRow = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator13 = New System.Windows.Forms.ToolStripSeparator()
Me.TsBtnBackward = New System.Windows.Forms.ToolStripButton()
Me.TsBtnForward = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
Me.TsBtnUndo = New System.Windows.Forms.ToolStripButton()
Me.TsBtnRedo = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator13 = New System.Windows.Forms.ToolStripSeparator()
Me.tsBtnInsertRow = New System.Windows.Forms.ToolStripButton()
Me.tsBtnRemoveRow = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator14 = New System.Windows.Forms.ToolStripSeparator()
Me.TsBtnMoveUp = New System.Windows.Forms.ToolStripButton()
Me.TsBtnMoveDown = New System.Windows.Forms.ToolStripButton()
@@ -76,8 +79,8 @@ Namespace UTSModule.Station
Me.ToolStripSeparator11 = New System.Windows.Forms.ToolStripSeparator()
Me.TsmiDebugStart = New System.Windows.Forms.ToolStripMenuItem()
Me.TsmiDebugEnd = New System.Windows.Forms.ToolStripMenuItem()
Me.TsmiDebugStep = New System.Windows.Forms.ToolStripMenuItem()
Me.TsmiDebugContinue = New System.Windows.Forms.ToolStripMenuItem()
Me.TsmiDebugStep = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripSeparator8 = New System.Windows.Forms.ToolStripSeparator()
Me.TsmiDebugSetup = New System.Windows.Forms.ToolStripMenuItem()
Me.TsmiDebugMain = New System.Windows.Forms.ToolStripMenuItem()
@@ -95,6 +98,7 @@ Namespace UTSModule.Station
Me.TabControl1 = New System.Windows.Forms.TabControl()
Me.TpOutputInfo = New System.Windows.Forms.TabPage()
Me.RtxOutputInfo = New System.Windows.Forms.RichTextBox()
Me.TsmiJumpCall = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStrip1.SuspendLayout()
Me.StuMain.SuspendLayout()
CType(Me.SplStationPlan, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -119,7 +123,7 @@ Namespace UTSModule.Station
'
'ToolStrip1
'
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.TsBtnOpen, Me.TsBtnSave, Me.ToolStripSeparator4, Me.TsBtnLoad, Me.TsBtnSaveAs, Me.ToolStripSeparator3, Me.TsBtnBackward, Me.TsBtnForward, Me.ToolStripSeparator13, Me.tsBtnInsertRow, Me.tsBtnRemoveRow, Me.ToolStripSeparator14, Me.TsBtnMoveUp, Me.TsBtnMoveDown, Me.TsBtnMoveLeft, Me.TsBtnMoveRight, Me.ToolStripSeparator2, Me.TsBtnDebugMode, Me.TsBtnDebugStart, Me.TsBtnFailMode, Me.ToolStripSeparator10, Me.tslBtn_ActionOnly, Me.TsBtn_Record, Me.TsBtn_ExpandNode})
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.TsBtnOpen, Me.TsBtnSave, Me.ToolStripSeparator4, Me.TsBtnLoad, Me.TsBtnSaveAs, Me.ToolStripSeparator3, Me.TsBtnBackward, Me.TsBtnForward, Me.ToolStripSeparator1, Me.TsBtnUndo, Me.TsBtnRedo, Me.ToolStripSeparator13, Me.tsBtnInsertRow, Me.tsBtnRemoveRow, Me.ToolStripSeparator14, Me.TsBtnMoveUp, Me.TsBtnMoveDown, Me.TsBtnMoveLeft, Me.TsBtnMoveRight, Me.ToolStripSeparator2, Me.TsBtnDebugMode, Me.TsBtnDebugStart, Me.TsBtnFailMode, Me.ToolStripSeparator10, Me.tslBtn_ActionOnly, Me.TsBtn_Record, Me.TsBtn_ExpandNode})
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
Me.ToolStrip1.Name = "ToolStrip1"
Me.ToolStrip1.Size = New System.Drawing.Size(977, 40)
@@ -176,6 +180,58 @@ Namespace UTSModule.Station
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 40)
'
'TsBtnBackward
'
Me.TsBtnBackward.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.TsBtnBackward.Image = CType(resources.GetObject("TsBtnBackward.Image"), System.Drawing.Image)
Me.TsBtnBackward.ImageTransparentColor = System.Drawing.Color.Magenta
Me.TsBtnBackward.Name = "TsBtnBackward"
Me.TsBtnBackward.Size = New System.Drawing.Size(47, 37)
Me.TsBtnBackward.Text = "上一步"
Me.TsBtnBackward.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
'
'TsBtnForward
'
Me.TsBtnForward.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.TsBtnForward.Image = CType(resources.GetObject("TsBtnForward.Image"), System.Drawing.Image)
Me.TsBtnForward.ImageTransparentColor = System.Drawing.Color.Magenta
Me.TsBtnForward.Name = "TsBtnForward"
Me.TsBtnForward.Size = New System.Drawing.Size(47, 37)
Me.TsBtnForward.Text = "下一步"
Me.TsBtnForward.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
Me.TsBtnForward.ToolTipText = "下一步"
'
'ToolStripSeparator1
'
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 40)
'
'TsBtnUndo
'
Me.TsBtnUndo.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.TsBtnUndo.Image = CType(resources.GetObject("TsBtnUndo.Image"), System.Drawing.Image)
Me.TsBtnUndo.ImageTransparentColor = System.Drawing.Color.Magenta
Me.TsBtnUndo.Name = "TsBtnUndo"
Me.TsBtnUndo.Size = New System.Drawing.Size(35, 37)
Me.TsBtnUndo.Text = "撤销"
Me.TsBtnUndo.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
'
'TsBtnRedo
'
Me.TsBtnRedo.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.TsBtnRedo.Image = CType(resources.GetObject("TsBtnRedo.Image"), System.Drawing.Image)
Me.TsBtnRedo.ImageTransparentColor = System.Drawing.Color.Magenta
Me.TsBtnRedo.Name = "TsBtnRedo"
Me.TsBtnRedo.Size = New System.Drawing.Size(35, 37)
Me.TsBtnRedo.Text = "重做"
Me.TsBtnRedo.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
Me.TsBtnRedo.ToolTipText = "撤销"
'
'ToolStripSeparator13
'
Me.ToolStripSeparator13.Name = "ToolStripSeparator13"
Me.ToolStripSeparator13.Size = New System.Drawing.Size(6, 40)
'
'tsBtnInsertRow
'
Me.tsBtnInsertRow.Image = CType(resources.GetObject("tsBtnInsertRow.Image"), System.Drawing.Image)
@@ -194,32 +250,6 @@ Namespace UTSModule.Station
Me.tsBtnRemoveRow.Text = "移除行"
Me.tsBtnRemoveRow.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
'
'ToolStripSeparator13
'
Me.ToolStripSeparator13.Name = "ToolStripSeparator13"
Me.ToolStripSeparator13.Size = New System.Drawing.Size(6, 40)
'
'TsBtnBackward
'
Me.TsBtnBackward.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.TsBtnBackward.Image = CType(resources.GetObject("TsBtnBackward.Image"), System.Drawing.Image)
Me.TsBtnBackward.ImageTransparentColor = System.Drawing.Color.Magenta
Me.TsBtnBackward.Name = "TsBtnBackward"
Me.TsBtnBackward.Size = New System.Drawing.Size(59, 37)
Me.TsBtnBackward.Text = "向后导航"
Me.TsBtnBackward.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
'
'TsBtnForward
'
Me.TsBtnForward.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.TsBtnForward.Image = CType(resources.GetObject("TsBtnForward.Image"), System.Drawing.Image)
Me.TsBtnForward.ImageTransparentColor = System.Drawing.Color.Magenta
Me.TsBtnForward.Name = "TsBtnForward"
Me.TsBtnForward.Size = New System.Drawing.Size(59, 37)
Me.TsBtnForward.Text = "向前导航"
Me.TsBtnForward.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
Me.TsBtnForward.ToolTipText = "向前导航"
'
'ToolStripSeparator14
'
Me.ToolStripSeparator14.Name = "ToolStripSeparator14"
@@ -421,9 +451,9 @@ Namespace UTSModule.Station
'
'CmsPlanGrid
'
Me.CmsPlanGrid.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.MsiGridRowBlockInsert, Me.MsiGridRowBlockDelete, Me.ToolStripSeparator7, Me.tsBtn_CheckAction, Me.tsBtn_UncheckAction, Me.ToolStripSeparator15, Me.MsiUndo, Me.MsiRedo, Me.ToolStripSeparator6, Me.MsiSaveNodeFile, Me.MsiLoadNodeFile, Me.ToolStripSeparator11, Me.TsmiDebugStart, Me.TsmiDebugEnd, Me.TsmiDebugContinue, Me.TsmiDebugStep, Me.ToolStripSeparator8, Me.TsmiDebugSetup, Me.TsmiDebugMain, Me.TsmiDebugPass, Me.TsmiDebugFail, Me.TsmiDebugCleanup, Me.ToolStripSeparator9, Me.TsmiDebugNode, Me.TsmiDebugNodeBegin})
Me.CmsPlanGrid.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.MsiGridRowBlockInsert, Me.MsiGridRowBlockDelete, Me.ToolStripSeparator7, Me.tsBtn_CheckAction, Me.tsBtn_UncheckAction, Me.ToolStripSeparator15, Me.MsiUndo, Me.MsiRedo, Me.ToolStripSeparator6, Me.MsiSaveNodeFile, Me.MsiLoadNodeFile, Me.ToolStripSeparator11, Me.TsmiDebugStart, Me.TsmiDebugEnd, Me.TsmiDebugContinue, Me.TsmiDebugStep, Me.ToolStripSeparator8, Me.TsmiDebugSetup, Me.TsmiDebugMain, Me.TsmiDebugPass, Me.TsmiDebugFail, Me.TsmiDebugCleanup, Me.ToolStripSeparator9, Me.TsmiDebugNode, Me.TsmiDebugNodeBegin, Me.TsmiJumpCall})
Me.CmsPlanGrid.Name = "CmsMain"
Me.CmsPlanGrid.Size = New System.Drawing.Size(222, 458)
Me.CmsPlanGrid.Size = New System.Drawing.Size(222, 502)
'
'MsiGridRowBlockInsert
'
@@ -431,7 +461,7 @@ Namespace UTSModule.Station
Me.MsiGridRowBlockInsert.Name = "MsiGridRowBlockInsert"
Me.MsiGridRowBlockInsert.ShortcutKeyDisplayString = "Ctr+I"
Me.MsiGridRowBlockInsert.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.I), System.Windows.Forms.Keys)
Me.MsiGridRowBlockInsert.Size = New System.Drawing.Size(192, 22)
Me.MsiGridRowBlockInsert.Size = New System.Drawing.Size(221, 22)
Me.MsiGridRowBlockInsert.Text = "插入"
'
'MsiGridRowBlockDelete
@@ -440,75 +470,75 @@ Namespace UTSModule.Station
Me.MsiGridRowBlockDelete.Name = "MsiGridRowBlockDelete"
Me.MsiGridRowBlockDelete.ShortcutKeyDisplayString = "Ctr+D"
Me.MsiGridRowBlockDelete.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.D), System.Windows.Forms.Keys)
Me.MsiGridRowBlockDelete.Size = New System.Drawing.Size(192, 22)
Me.MsiGridRowBlockDelete.Size = New System.Drawing.Size(221, 22)
Me.MsiGridRowBlockDelete.Text = "删除"
'
'ToolStripSeparator7
'
Me.ToolStripSeparator7.Name = "ToolStripSeparator7"
Me.ToolStripSeparator7.Size = New System.Drawing.Size(189, 6)
Me.ToolStripSeparator7.Size = New System.Drawing.Size(218, 6)
'
'tsBtn_CheckAction
'
Me.tsBtn_CheckAction.Image = CType(resources.GetObject("tsBtn_CheckAction.Image"), System.Drawing.Image)
Me.tsBtn_CheckAction.Name = "tsBtn_CheckAction"
Me.tsBtn_CheckAction.Size = New System.Drawing.Size(192, 22)
Me.tsBtn_CheckAction.Size = New System.Drawing.Size(221, 22)
Me.tsBtn_CheckAction.Text = "勾选测试"
'
'tsBtn_UncheckAction
'
Me.tsBtn_UncheckAction.Image = CType(resources.GetObject("tsBtn_UncheckAction.Image"), System.Drawing.Image)
Me.tsBtn_UncheckAction.Name = "tsBtn_UncheckAction"
Me.tsBtn_UncheckAction.Size = New System.Drawing.Size(192, 22)
Me.tsBtn_UncheckAction.Size = New System.Drawing.Size(221, 22)
Me.tsBtn_UncheckAction.Text = "取消勾选测试"
'
'ToolStripSeparator15
'
Me.ToolStripSeparator15.Name = "ToolStripSeparator15"
Me.ToolStripSeparator15.Size = New System.Drawing.Size(189, 6)
Me.ToolStripSeparator15.Size = New System.Drawing.Size(218, 6)
'
'MsiUndo
'
Me.MsiUndo.Enabled = False
Me.MsiUndo.Name = "MsiUndo"
Me.MsiUndo.Size = New System.Drawing.Size(192, 22)
Me.MsiUndo.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.Z), System.Windows.Forms.Keys)
Me.MsiUndo.Size = New System.Drawing.Size(221, 22)
Me.MsiUndo.Text = "撤销"
'
'MsiRedo
'
Me.MsiRedo.Enabled = False
Me.MsiRedo.Name = "MsiRedo"
Me.MsiRedo.Size = New System.Drawing.Size(192, 22)
Me.MsiRedo.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.Y), System.Windows.Forms.Keys)
Me.MsiRedo.Size = New System.Drawing.Size(221, 22)
Me.MsiRedo.Text = "重做"
'
'ToolStripSeparator6
'
Me.ToolStripSeparator6.Name = "ToolStripSeparator6"
Me.ToolStripSeparator6.Size = New System.Drawing.Size(189, 6)
Me.ToolStripSeparator6.Size = New System.Drawing.Size(218, 6)
'
'MsiSaveNodeFile
'
Me.MsiSaveNodeFile.Name = "MsiSaveNodeFile"
Me.MsiSaveNodeFile.Size = New System.Drawing.Size(192, 22)
Me.MsiSaveNodeFile.Size = New System.Drawing.Size(221, 22)
Me.MsiSaveNodeFile.Text = "另存为节点文件"
'
'MsiLoadNodeFile
'
Me.MsiLoadNodeFile.Name = "MsiLoadNodeFile"
Me.MsiLoadNodeFile.Size = New System.Drawing.Size(192, 22)
Me.MsiLoadNodeFile.Size = New System.Drawing.Size(221, 22)
Me.MsiLoadNodeFile.Text = "加载节点文件"
'
'ToolStripSeparator11
'
Me.ToolStripSeparator11.Name = "ToolStripSeparator11"
Me.ToolStripSeparator11.Size = New System.Drawing.Size(189, 6)
Me.ToolStripSeparator11.Size = New System.Drawing.Size(218, 6)
'
'TsmiDebugStart
'
Me.TsmiDebugStart.Image = CType(resources.GetObject("TsmiDebugStart.Image"), System.Drawing.Image)
Me.TsmiDebugStart.Name = "TsmiDebugStart"
Me.TsmiDebugStart.ShortcutKeys = System.Windows.Forms.Keys.F5
Me.TsmiDebugStart.Size = New System.Drawing.Size(207, 22)
Me.TsmiDebugStart.Size = New System.Drawing.Size(221, 22)
Me.TsmiDebugStart.Text = "开始执行"
'
'TsmiDebugEnd
@@ -516,42 +546,42 @@ Namespace UTSModule.Station
Me.TsmiDebugEnd.Image = CType(resources.GetObject("TsmiDebugEnd.Image"), System.Drawing.Image)
Me.TsmiDebugEnd.Name = "TsmiDebugEnd"
Me.TsmiDebugEnd.ShortcutKeys = CType((System.Windows.Forms.Keys.Shift Or System.Windows.Forms.Keys.F5), System.Windows.Forms.Keys)
Me.TsmiDebugEnd.Size = New System.Drawing.Size(207, 22)
Me.TsmiDebugEnd.Size = New System.Drawing.Size(221, 22)
Me.TsmiDebugEnd.Text = "退出执行"
'
'TsmiDebugStep
'
Me.TsmiDebugStep.Image = CType(resources.GetObject("TsmiDebugStep.Image"), System.Drawing.Image)
Me.TsmiDebugStep.Name = "TsmiDebugStep"
Me.TsmiDebugStep.ShortcutKeys = System.Windows.Forms.Keys.F11
Me.TsmiDebugStep.Size = New System.Drawing.Size(207, 22)
Me.TsmiDebugStep.Text = "单步执行"
'
'TsmiDebugContinue
'
Me.TsmiDebugContinue.Image = CType(resources.GetObject("TsmiDebugContinue.Image"), System.Drawing.Image)
Me.TsmiDebugContinue.Name = "TsmiDebugContinue"
Me.TsmiDebugContinue.ShortcutKeys = CType((System.Windows.Forms.Keys.Alt Or System.Windows.Forms.Keys.F5), System.Windows.Forms.Keys)
Me.TsmiDebugContinue.Size = New System.Drawing.Size(207, 22)
Me.TsmiDebugContinue.Size = New System.Drawing.Size(221, 22)
Me.TsmiDebugContinue.Text = "继续执行"
'
'TsmiDebugStep
'
Me.TsmiDebugStep.Image = CType(resources.GetObject("TsmiDebugStep.Image"), System.Drawing.Image)
Me.TsmiDebugStep.Name = "TsmiDebugStep"
Me.TsmiDebugStep.ShortcutKeys = System.Windows.Forms.Keys.F11
Me.TsmiDebugStep.Size = New System.Drawing.Size(221, 22)
Me.TsmiDebugStep.Text = "单步执行"
'
'ToolStripSeparator8
'
Me.ToolStripSeparator8.Name = "ToolStripSeparator8"
Me.ToolStripSeparator8.Size = New System.Drawing.Size(189, 6)
Me.ToolStripSeparator8.Size = New System.Drawing.Size(218, 6)
'
'TsmiDebugSetup
'
Me.TsmiDebugSetup.Name = "TsmiDebugSetup"
Me.TsmiDebugSetup.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.F1), System.Windows.Forms.Keys)
Me.TsmiDebugSetup.Size = New System.Drawing.Size(207, 22)
Me.TsmiDebugSetup.Size = New System.Drawing.Size(221, 22)
Me.TsmiDebugSetup.Text = "Setup模块执行"
'
'TsmiDebugMain
'
Me.TsmiDebugMain.Name = "TsmiDebugMain"
Me.TsmiDebugMain.ShortcutKeys = CType((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.F2), System.Windows.Forms.Keys)
Me.TsmiDebugMain.Size = New System.Drawing.Size(207, 22)
Me.TsmiDebugMain.Size = New System.Drawing.Size(221, 22)
Me.TsmiDebugMain.Text = "Main模块执行"
'
'TsmiDebugPass
@@ -578,7 +608,7 @@ Namespace UTSModule.Station
'ToolStripSeparator9
'
Me.ToolStripSeparator9.Name = "ToolStripSeparator9"
Me.ToolStripSeparator9.Size = New System.Drawing.Size(189, 6)
Me.ToolStripSeparator9.Size = New System.Drawing.Size(218, 6)
'
'TsmiDebugNode
'
@@ -655,7 +685,7 @@ Namespace UTSModule.Station
Me.GrpOutputInfo.Name = "GrpOutputInfo"
Me.GrpOutputInfo.Size = New System.Drawing.Size(977, 166)
Me.GrpOutputInfo.TabIndex = 0
Me.GrpOutputInfo.TabStop = false
Me.GrpOutputInfo.TabStop = False
Me.GrpOutputInfo.Text = "输出内容"
'
'TabControl1
@@ -677,7 +707,7 @@ Namespace UTSModule.Station
Me.TpOutputInfo.Size = New System.Drawing.Size(963, 120)
Me.TpOutputInfo.TabIndex = 0
Me.TpOutputInfo.Text = "输出信息"
Me.TpOutputInfo.UseVisualStyleBackColor = true
Me.TpOutputInfo.UseVisualStyleBackColor = True
'
'RtxOutputInfo
'
@@ -689,15 +719,23 @@ Namespace UTSModule.Station
Me.RtxOutputInfo.TabIndex = 0
Me.RtxOutputInfo.Text = ""
'
'TsmiJumpCall
'
Me.TsmiJumpCall.Name = "TsmiJumpCall"
Me.TsmiJumpCall.ShortcutKeys = System.Windows.Forms.Keys.F12
Me.TsmiJumpCall.Size = New System.Drawing.Size(221, 22)
Me.TsmiJumpCall.Text = "函数跳转"
Me.TsmiJumpCall.Visible = False
'
'FrmStationPlan
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6!, 12!)
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(977, 580)
Me.Controls.Add(Me.SplStationPlan)
Me.Controls.Add(Me.StuMain)
Me.Controls.Add(Me.ToolStrip1)
Me.KeyPreview = true
Me.KeyPreview = True
Me.Name = "FrmStationPlan"
Me.Text = "Form1"
Me.ToolStrip1.ResumeLayout(false)
@@ -794,5 +832,9 @@ End Sub
Friend WithEvents tsBtn_CheckAction As ToolStripMenuItem
Friend WithEvents tsBtn_UncheckAction As ToolStripMenuItem
Friend WithEvents ToolStripSeparator15 As ToolStripSeparator
Friend WithEvents ToolStripSeparator1 As ToolStripSeparator
Friend WithEvents TsBtnUndo As ToolStripButton
Friend WithEvents TsBtnRedo As ToolStripButton
Friend WithEvents TsmiJumpCall As ToolStripMenuItem
End Class
End Namespace

63
UTS_Core/UTSModule/Station/FrmStationPlan.resx
View File

@@ -170,26 +170,6 @@
UQwy2qIWr4A5OaxVi0fATrsJPfFVQR7m/pGA42eBmARc8yrgpMxj38aewhjuEbNg/LgMLUEfVe01jGmu
4CpO4hz7JfYUxrgFGzER09jXsacwxi34/WdggZgE7MwCMQk8aYbA8tHPYe5Hgfe35R2spYRwB61XwcSY
NxMjAAAAAElFTkSuQmCC
</value>
</data>
<data name="tsBtnInsertRow.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAADTSURBVDhPvVKrDoNAEOSX+gt1tfxBg6psUNjmFJKcQjY5
gyQ5gyXBVDbBVFYgKitWVEzZ43qpoDwC6SSjZmc2uxlvMXRRQ+UVVNZRnjVEomHlceAL9OooEjUzwBrp
CTQtw0hOD/hsZaPhA/APYnrAZhegj1ZeDzLVYPJ/RCwRHIWhlX/CDbCZz6vvQHUD9IWgChoMYNGRNxvj
FVAlQWSEIBkOYLiB8CSNUeaEMCX4MWEbNaMBDnxv77N1WUMXbQttG7smzi2SxWpNDBY3cf+3JnreG12r
GpgvtOAmAAAAAElFTkSuQmCC
</value>
</data>
<data name="tsBtnRemoveRow.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAADdSURBVDhPY6AK2Hbwwv+1O0/9X7zh0P+Zy3b9nzBv8//e
2ev/Q6UJg3W7Tv8HgS/f//1//PbP/0uPfv039Uwm3oD5a/ajaD5+6+d/p7B84g2YMG8j2EYQBmmcsXA1
HE+es/x/19SF/5t6ZqEYyMLEgtsCkMbDN/7833bu5/+lB7/9n7T5E9hwkCZ0DNWCCkA2rjvx43/7sgf/
S2fe/Z/ScwcjTFA0o8dCZesUsFdg3oJhqHJMgC0WIrKbcGtAB9hiAa+N6ABkALpzSTKAJgmJJAOQExIy
hkoPasDAAACBjwD6rwhXUgAAAABJRU5ErkJggg==
</value>
</data>
<data name="TsBtnBackward.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -213,6 +193,49 @@
MMZLXiK1d5zSLwohxBwZ+9IGEBc6sd6JjYXBNO8XOOfG9Kx3xF4GJIOF3hP7M6BGM6CXrgCi0aUzYIiW
MOcgUa2BJcy3bb1DWg34RkafGwF2A+hlg/vnJThAGkAI0WDRU9HAV/6tHp9FdAB/QLi4qrG0hAAAAABJ
RU5ErkJggg==
</value>
</data>
<data name="TsBtnUndo.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHJSURBVDhPvZHdK4NhGMb3pzAt4dgfIPmMosgBB8pHjnbA
kSMhijSa2pgJ89U23jEJExpmvhq2+ZoMxVZD78vYxjsue5+NMTVK+dV18jxdv7v7eXh/Rrt8BC7UkpVE
OWvCoHYdoeuf4cqRKCaNqGwY/p1Es2gN1YL4X14hGZmHzmBFcXX7zxLl3A4p6mwAtQuY7Qw6FTOgVhmo
l2mo9DT652iIJ25JQrUwg1ojEXA8PfvB3PvgcLmJIJKm0WskVxi+SuRqPbnsMzxDNMugnrpCzYAdIws3
5Pwz1TIXtBsMkoomwxJpYF9u70cPi2vag3PHHQ7sN5BPO0mplfKTmE/uUCpyIrFoCgkFY4jPGwpKuH29
PvZjslBuQ5V0Hx2qcyJ4h3lgcXLphcFyDxm1DUFub1jAuH04PHNh59gBo/kCS1unaOgLfm/dqBtCqRMl
bTbkN+6RyKhNCLK7woLkrLJvqRHvEQEbWM9Fs7DYH7FoYqBZuUX3mBFxGeKvjxlJedMGEXye/J4u9Rr4
aaLogsJaPTxPL5BPmNCj2YZsfJNM5spS5SpiU1uiCzKEusBrq0ji8xQQ5PQgLlMCfnp7oNyKmJTm6IJ/
gsd7A8Wc0VfbPf1MAAAAAElFTkSuQmCC
</value>
</data>
<data name="TsBtnRedo.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAACMSURBVDhPtZDRDYAgDET7wazu5AIOY/x2BX/dAHO2KNQW
MMZLXiK1d5zSLwohxBwZ+9IGEBc6sd6JjYXBNO8XOOfG9Kx3xF4GJIOF3hP7M6BGM6CXrgCi0aUzYIiW
MOcgUa2BJcy3bb1DWg34RkafGwF2A+hlg/vnJThAGkAI0WDRU9HAV/6tHp9FdAB/QLi4qrG0hAAAAABJ
RU5ErkJggg==
</value>
</data>
<data name="tsBtnInsertRow.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAADTSURBVDhPvVKrDoNAEOSX+gt1tfxBg6psUNjmFJKcQjY5
gyQ5gyXBVDbBVFYgKitWVEzZ43qpoDwC6SSjZmc2uxlvMXRRQ+UVVNZRnjVEomHlceAL9OooEjUzwBrp
CTQtw0hOD/hsZaPhA/APYnrAZhegj1ZeDzLVYPJ/RCwRHIWhlX/CDbCZz6vvQHUD9IWgChoMYNGRNxvj
FVAlQWSEIBkOYLiB8CSNUeaEMCX4MWEbNaMBDnxv77N1WUMXbQttG7smzi2SxWpNDBY3cf+3JnreG12r
GpgvtOAmAAAAAElFTkSuQmCC
</value>
</data>
<data name="tsBtnRemoveRow.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAADdSURBVDhPY6AK2Hbwwv+1O0/9X7zh0P+Zy3b9nzBv8//e
2ev/Q6UJg3W7Tv8HgS/f//1//PbP/0uPfv039Uwm3oD5a/ajaD5+6+d/p7B84g2YMG8j2EYQBmmcsXA1
HE+es/x/19SF/5t6ZqEYyMLEgtsCkMbDN/7833bu5/+lB7/9n7T5E9hwkCZ0DNWCCkA2rjvx43/7sgf/
S2fe/Z/ScwcjTFA0o8dCZesUsFdg3oJhqHJMgC0WIrKbcGtAB9hiAa+N6ABkALpzSTKAJgmJJAOQExIy
hkoPasDAAACBjwD6rwhXUgAAAABJRU5ErkJggg==
</value>
</data>
<data name="TsBtnMoveUp.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">

42
UTS_Core/UTSModule/Station/FrmStationPlan.vb
View File

@@ -60,7 +60,7 @@ Namespace UTSModule.Station
If StationPlan IsNot Nothing Then
_planGrid.HeadNode = StationPlan.HeadNode
_planGrid.UpdateGrid()
_planGrid.GridUpdateEventTrigger(GrdStationPlan) '笨方法，开始就触发一次刷新
StationEditStatusMonitor.StationEditStatus = StationEditStatusMonitor.StationEditStatusEnum.None
_tester.ProcessStation = _utsApp.ProcessStation
@@ -94,6 +94,9 @@ Namespace UTSModule.Station
.RtxColTip = RtxColTip}
AddHandler _planGrid.PlanNodeSelectChanged, AddressOf PlanGridSelectChanged
AddHandler _planGrid.PlanGridCommandChanged, AddressOf PlanGridCommandChanged
'todo:检测撤销队列的变化
AddHandler _planGrid.PlanNodeSelectChanged, AddressOf _nodeGrid.Grid_PlanNodeSelectChanged
AddHandler _planGrid.RowNodeTextChanged, AddressOf _nodeGrid.Grid_RowNodeTextChanged
@@ -117,6 +120,15 @@ Namespace UTSModule.Station
TsBtnForward.Enabled = _planGrid.CanForward
End Sub
Public Sub PlanGridCommandChanged(sender As Object, e As EventArgs)
TsBtnUndo.Enabled = _planGrid.CanUndo
TsBtnRedo.Enabled = _planGrid.CanRedo
MsiUndo.Enabled = _planGrid.CanUndo
MsiRedo.Enabled = _planGrid.CanRedo
End Sub
Private Function InitializeUtsApp() As Boolean
_utsApp = UtsAppForm.CreateSingleton()
_utsApp.AddStatisticsObserver(Me)
@@ -206,7 +218,7 @@ Namespace UTSModule.Station
Try
StationPlan.LoadFile(revStationPlanPath)
_planGrid.UpdateGrid()
_planGrid.GridUpdateEventTrigger(GrdStationPlan) '笨方法，开始就触发一次刷新
' _planGrid.GridUpdateEventTrigger(GrdStationPlan) '笨方法，开始就触发一次刷新
StationEditStatusMonitor.StationEditStatus = StationEditStatusMonitor.StationEditStatusEnum.None
If StationEditStatusMonitor.StationEditStatus <> StationEditStatusMonitor.StationEditStatusEnum.Saved Then
@@ -226,7 +238,7 @@ Namespace UTSModule.Station
Try
StationPlan.LoadFile(revStationPlanPath)
_planGrid.UpdateGrid()
_planGrid.GridUpdateEventTrigger(GrdStationPlan) '笨方法，开始就触发一次刷新
StationEditStatusMonitor.StationEditStatus = StationEditStatusMonitor.StationEditStatusEnum.None
If StationEditStatusMonitor.StationEditStatus <> StationEditStatusMonitor.StationEditStatusEnum.Saved Then
@@ -300,8 +312,10 @@ Namespace UTSModule.Station
End Using
_planGrid.ClearNavigation()
TsBtnBackward.Enabled = _planGrid.CanBackward
TsBtnForward.Enabled = _planGrid.CanForward
_planGrid.ClearCommand()
PlanGridSelectChanged(Nothing, Nothing)
PlanGridCommandChanged(Nothing, Nothing)
End Sub
Private Sub TsBtnLoad_Click(sender As Object, e As EventArgs) Handles TsBtnLoad.Click
@@ -309,8 +323,10 @@ Namespace UTSModule.Station
ApplicationLog.WriteInfoLog($"编辑页面执行流程重载中。")
LoadTreeViewFormXml()
_planGrid.ClearNavigation()
TsBtnBackward.Enabled = _planGrid.CanBackward
TsBtnForward.Enabled = _planGrid.CanForward
_planGrid.ClearCommand()
PlanGridSelectChanged(Nothing, Nothing)
PlanGridCommandChanged(Nothing, Nothing)
ApplicationLog.WriteInfoLog($"编辑页面执行流程重载完成。")
End If
End Sub
@@ -802,6 +818,18 @@ Namespace UTSModule.Station
_planGrid.Check_Uncheck_Action(GrdStationPlan, tmpFrisRow, tmpLastRow, False)
End Sub
Private Sub MsiUndo_Click(sender As Object, e As EventArgs) Handles MsiUndo.Click, TsBtnUndo.Click
_planGrid.UndoCommand()
End Sub
Private Sub MsiRedo_Click(sender As Object, e As EventArgs) Handles MsiRedo.Click, TsBtnRedo.Click
_planGrid.RedoCommand()
End Sub
Private Sub TsmiJumpCall_Click(sender As Object, e As EventArgs) Handles TsmiJumpCall.Click
_planGrid.JumpCall()
End Sub
#End Region

94
UTS_Core/UTSModule/Station/GridNodeCommands/CommandManager.vb Normal file
View File

@@ -0,0 +1,94 @@
Public Module CommandManager
Private Property UndoCommands As New Stack(Of ICommand)
Private Property RedoCommands As New Stack(Of ICommand)
Private _isRunning As Boolean = False
''' <summary>
''' 运行命令，并将命令添加至撤销堆栈
''' </summary>
''' <param name="command"></param>
Public Sub RunCommand(command As ICommand)
command.Redo()
AddUndoCommand(command)
End Sub
Public ReadOnly Property IsRuning() As Boolean
Get
Return _isRunning
End Get
End Property
Public Function CanUndo() As Boolean
Return UndoCommands.Count > 0
End Function
Public Function CanRedo() As Boolean
Return RedoCommands.Count > 0
End Function
''' <summary>
''' 将命令添加至撤销堆栈
''' </summary>
Public Sub AddUndoCommand(command As ICommand)
UndoCommands.Push(command)
If RedoCommands.Count > 0 Then
ClearRedoCommands()
End If
End Sub
''' <summary>
''' 清空撤销命令堆栈
''' </summary>
Public Sub ClearUndoCommands()
UndoCommands.Clear()
End Sub
''' <summary>
''' 清空重做命令堆栈
''' </summary>
Public Sub ClearRedoCommands()
RedoCommands.Clear()
End Sub
''' <summary>
''' 清空撤销与重做命令堆栈
''' </summary>
Public Sub ClearCommands()
ClearUndoCommands()
ClearRedoCommands()
End Sub
''' <summary>
''' 执行撤销命令
''' </summary>
Public Sub Undo()
If UndoCommands.Count <= 0 Then Return
_isRunning = True
Dim command As ICommand = UndoCommands.Pop()
command.Undo()
RedoCommands.Push(command)
_isRunning = False
End Sub
''' <summary>
''' 执行重做命令
''' </summary>
Public Sub Redo()
If RedoCommands.Count <= 0 Then Return
_isRunning = True
Dim command As ICommand = RedoCommands.Pop()
command.Redo()
UndoCommands.Push(command)
_isRunning = False
End Sub
End Module

22
UTS_Core/UTSModule/Station/GridNodeCommands/GridNodeAddCommand.vb Normal file
View File

@@ -0,0 +1,22 @@
Imports UTS_Core.UTSModule.Station
Public Class GridNodeAddCommand : Implements ICommand
Private ReadOnly grd As StationPlanGrid
Private ReadOnly startMoveRow As Integer
Private ReadOnly moveRows As Integer
Sub New(grd As StationPlanGrid, startMoveRow As Integer, moveRows As Integer)
Me.grd = grd
Me.startMoveRow = startMoveRow
Me.moveRows = moveRows
End Sub
Public Sub Redo() Implements ICommand.Redo
grd.NodeAddCommand(startMoveRow, moveRows)
End Sub
Public Sub Undo() Implements ICommand.Undo
grd.NodeDeleteCommand(startMoveRow, moveRows)
End Sub
End Class

12
UTS_Core/UTSModule/Station/GridNodeCommands/GridNodeCopyPasteCommand.vb Normal file
View File

@@ -0,0 +1,12 @@
Public Class GridNodeCopyPasteCommand : Implements ICommand
Public Sub New()
End Sub
Public Sub Redo() Implements ICommand.Redo
Throw New NotImplementedException()
End Sub
Public Sub Undo() Implements ICommand.Undo
Throw New NotImplementedException()
End Sub
End Class

10
UTS_Core/UTSModule/Station/GridNodeCommands/GridNodeCutPasteCommand.vb Normal file
View File

@@ -0,0 +1,10 @@
Public Class GridNodeCutPasteCommand : Implements ICommand
Public Sub Redo() Implements ICommand.Redo
Throw New NotImplementedException()
End Sub
Public Sub Undo() Implements ICommand.Undo
Throw New NotImplementedException()
End Sub
End Class

23
UTS_Core/UTSModule/Station/GridNodeCommands/GridNodeDeleteCommand.vb Normal file
View File

@@ -0,0 +1,23 @@
Imports UTS_Core.UTSModule.Station
Public Class GridNodeDeleteCommand : Implements ICommand
Private ReadOnly grd As StationPlanGrid
Private ReadOnly startMoveRow As Integer
Private ReadOnly moveRows As Integer
Private ReadOnly nodes As List(Of RowNode)
Sub New(grd As StationPlanGrid, startMoveRow As Integer, moveRows As Integer, nodes As List(Of RowNode))
Me.grd = grd
Me.startMoveRow = startMoveRow
Me.moveRows = moveRows
Me.nodes = nodes
End Sub
Public Sub Redo() Implements ICommand.Redo
grd.NodeDeleteCommand(startMoveRow, moveRows)
End Sub
Public Sub Undo() Implements ICommand.Undo
grd.NodeAddCommand(startMoveRow, moveRows, nodes)
End Sub
End Class

23
UTS_Core/UTSModule/Station/GridNodeCommands/GridNodeMoveDownCommand.vb Normal file
View File

@@ -0,0 +1,23 @@
Imports UTS_Core.UTSModule.Station
Public Class GridNodeMoveDownCommand : Implements ICommand
Private ReadOnly grd As StationPlanGrid
Private ReadOnly startMoveRow As Integer
Private ReadOnly moveRows As Integer
Private ReadOnly moveEndRow As Integer
Sub New(grd As StationPlanGrid, startMoveRow As Integer, moveRows As Integer, moveEndRow As Integer)
Me.grd = grd
Me.startMoveRow = startMoveRow
Me.moveRows = moveRows
Me.moveEndRow = moveEndRow
End Sub
Public Sub Redo() Implements ICommand.Redo
grd.NodeMoveDownCommand(startMoveRow, moveRows)
End Sub
Public Sub Undo() Implements ICommand.Undo
grd.NodeMoveUpCommand(moveEndRow, moveRows)
End Sub
End Class

25
UTS_Core/UTSModule/Station/GridNodeCommands/GridNodeMoveLeftCommand.vb Normal file
View File

@@ -0,0 +1,25 @@
Imports UTS_Core.UTSModule.Station
Public Class GridNodeMoveLeftCommand : Implements ICommand
Private ReadOnly grd As StationPlanGrid
Private ReadOnly startMoveRow As Integer
Private ReadOnly moveRows As Integer
Private ReadOnly moveEndRow As Integer
Private ReadOnly moveRightNodeIndex As Integer
Sub New(grd As StationPlanGrid, startMoveRow As Integer, moveRows As Integer, moveEndRow As Integer, moveRightNodeIndex As Integer)
Me.grd = grd
Me.startMoveRow = startMoveRow
Me.moveRows = moveRows
Me.moveEndRow = moveEndRow
Me.moveRightNodeIndex = moveRightNodeIndex
End Sub
Public Sub Redo() Implements ICommand.Redo
grd.NodeMoveLeftCommand(startMoveRow, moveRows)
End Sub
Public Sub Undo() Implements ICommand.Undo
grd.NodeMoveRightCommand(moveEndRow, moveRows, moveRightNodeIndex)
End Sub
End Class

25
UTS_Core/UTSModule/Station/GridNodeCommands/GridNodeMoveRightCommand.vb Normal file
View File

@@ -0,0 +1,25 @@
Imports UTS_Core.UTSModule.Station
Public Class GridNodeMoveRightCommand : Implements ICommand
Private ReadOnly grd As StationPlanGrid
Private ReadOnly startMoveRow As Integer
Private ReadOnly moveRows As Integer
Private ReadOnly moveEndRow As Integer
Private ReadOnly moveRightNodeIndex As Integer
Sub New(grd As StationPlanGrid, startMoveRow As Integer, moveRows As Integer, moveEndRow As Integer, moveRightNodeIndex As Integer)
Me.grd = grd
Me.startMoveRow = startMoveRow
Me.moveRows = moveRows
Me.moveEndRow = moveEndRow
Me.moveRightNodeIndex = moveRightNodeIndex
End Sub
Public Sub Redo() Implements ICommand.Redo
grd.NodeMoveRightCommand(startMoveRow, moveRows, moveRightNodeIndex)
End Sub
Public Sub Undo() Implements ICommand.Undo
grd.NodeMoveLeftCommand(moveEndRow, moveRows)
End Sub
End Class

17
UTS_Core/UTSModule/Station/GridNodeMoveUpCommand.vb → UTS_Core/UTSModule/Station/GridNodeCommands/GridNodeMoveUpCommand.vb
View File

@@ -1,28 +1,25 @@
Imports UTS_Core.Undo
Imports UTS_Core.UTSModule.Station
Imports UTS_Core.UTSModule.Station
Public Class GridNodeMoveUpCommand : Implements ICommand
Private ReadOnly grd As StationPlanGrid
Private ReadOnly startMoveRow As Integer
Private ReadOnly moveRows As Integer
Private ReadOnly moveEndRow As Integer
Sub New(grd As StationPlanGrid, startMoveRow As Integer, moveRows As Integer)
Sub New(grd As StationPlanGrid, startMoveRow As Integer, moveRows As Integer, moveEndRow As Integer)
Me.grd = grd
Me.startMoveRow = startMoveRow
Me.moveRows = moveRows
End Sub
Public Sub Execute() Implements ICommand.Execute
grd.NodeMoveUp(startMoveRow, moveRows)
Me.moveEndRow = moveEndRow
End Sub
Public Sub Redo() Implements ICommand.Redo
grd.NodeMoveUp(startMoveRow, moveRows)
grd.NodeMoveUpCommand(startMoveRow, moveRows)
End Sub
Public Sub Undo() Implements ICommand.Undo
grd.NodeMoveDown(startMoveRow, moveRows)
grd.NodeMoveDownCommand(moveEndRow, moveRows)
End Sub
End Class

24
UTS_Core/UTSModule/Station/GridNodeCommands/GridNodeTextChangedCommand.vb Normal file
View File

@@ -0,0 +1,24 @@
Public Class GridNodeTextChangedCommand : Implements ICommand
Private ReadOnly grd As FlexCell.Grid
Private ReadOnly row As Integer
Private ReadOnly col As Integer
Private ReadOnly beforeText As String
Private ReadOnly afterText As String
Sub New(grd As FlexCell.Grid, row As Integer, col As Integer, beforeText As String, afterText As String)
Me.grd = grd
Me.row = row
Me.col = col
Me.beforeText = beforeText
Me.afterText = afterText
End Sub
Public Sub Redo() Implements ICommand.Redo
grd.Cell(row, col).Text = afterText
End Sub
Public Sub Undo() Implements ICommand.Undo
grd.Cell(row, col).Text = beforeText
End Sub
End Class

11
UTS_Core/UTSModule/Station/GridNodeCommands/ICommand.vb Normal file
View File

@@ -0,0 +1,11 @@
Public Interface ICommand
''' <summary>
''' 重做命令
''' </summary>
Sub Redo()
''' <summary>
''' 撤销命令
''' </summary>
Sub Undo()
End Interface

0
UTS_Core/UTSModule/Station/GridNavigation.vb → UTS_Core/UTSModule/Station/GridNodeNavigation/GridNavigation.vb
View File

0
UTS_Core/UTSModule/Station/GridNavigationManager.vb → UTS_Core/UTSModule/Station/GridNodeNavigation/GridNavigationManager.vb
View File

0
UTS_Core/UTSModule/Station/INavigation.vb → UTS_Core/UTSModule/Station/GridNodeNavigation/INavigation.vb
View File

136
UTS_Core/UTSModule/Station/RowNodeCommand.vb
View File

@@ -1,136 +0,0 @@
Imports UTS_Core.Undo
Namespace UTSModule.Station
Public Class RowNodeCommand
Implements ICommand
Private ReadOnly _row As Integer
Private ReadOnly _rowNode As RowNode
Sub New(rowNode As RowNode, row As Integer, redoString As String)
_row = row
_rowNode = rowNode
End Sub
Public Sub Redo() Implements ICommand.Redo
End Sub
Public Sub Undo() Implements ICommand.Undo
End Sub
Public Sub Execute() Implements ICommand.Execute
Redo()
End Sub
End Class
Public Class RowNodeCommand2
Implements ICommand
Enum ChangeType
Add
Remove
Insert
RemoveChildAt
RemoveChildNode
MoveUp
MoveDown
MoveLeft
MoveRight
TextChanged
End Enum
Private _parentNode As RowNode
Private _rowNode As RowNode
Private _index As Integer '增加节点的位置
Private _type As ChangeType '当前操作的类型
Sub New(parentNode As RowNode, rowNode As RowNode, type As ChangeType, Optional index As Integer = 0)
_parentNode = parentNode
_rowNode = rowNode
_index = index
_type = type
End Sub
Public Sub Execute() Implements ICommand.Execute
Redo()
End Sub
Public Sub Redo() Implements ICommand.Redo
Select Case _type
Case ChangeType.Add
_parentNode.AddNode(_rowNode)
_index = _rowNode.RowIndex
Case ChangeType.Insert
_parentNode.InsertNode(_index, _rowNode)
Case ChangeType.Remove
_index = _rowNode.RowIndex
_parentNode.RemoveChildNode(_rowNode)
Case ChangeType.RemoveChildAt
_index = _rowNode.RowIndex
_parentNode.RemoveChildAt(_index)
Case ChangeType.RemoveChildNode
_index = _rowNode.RowIndex
_parentNode.RemoveChildNode(_rowNode)
Case ChangeType.MoveUp
_rowNode.MoveUp()
Case ChangeType.MoveDown
_rowNode.MoveDown()
Case ChangeType.MoveLeft
_rowNode.MoveLeft()
Case ChangeType.MoveRight
_rowNode.MoveRight()
Case ChangeType.TextChanged
End Select
End Sub
Public Sub Undo() Implements ICommand.Undo
Select Case _type
Case ChangeType.Add
_parentNode.RemoveChildNode(_rowNode)
Case ChangeType.Insert
_parentNode.RemoveChildAt(_index)
Case ChangeType.Remove
_parentNode.InsertNode(_index, _rowNode)
Case ChangeType.RemoveChildAt
_parentNode.InsertNode(_index, _rowNode)
Case ChangeType.RemoveChildNode
_parentNode.InsertNode(_index, _rowNode)
Case ChangeType.MoveUp
_rowNode.MoveDown()
Case ChangeType.MoveDown
_rowNode.MoveUp()
Case ChangeType.MoveLeft
_rowNode.MoveRight()
Case ChangeType.MoveRight
_rowNode.MoveLeft()
Case ChangeType.TextChanged
End Select
End Sub
End Class
End Namespace

1
UTS_Core/UTSModule/Station/RowNodeGrid.vb
View File

@@ -38,6 +38,7 @@ Namespace UTSModule.Station
Public Event RowNodeTextChanged(ByVal sender As Object, ByVal e As RowNodeChangedEventArgs) '自定义事件
Public Sub New()
_errCodeManager = ErrCodeManager.CreateManager()
_testCmdManager = TestCmdManager.CreateManager()

1232
UTS_Core/UTSModule/Station/StationPlanGrid.vb
View File

File diff suppressed because it is too large Load Diff

3
UTS_Core/UTSModule/Test/UtsTester.vb
View File

@@ -446,9 +446,6 @@ Namespace UTSModule.Test
_customModules.Clear()
GetTestModule(_customModules, node.RowNodes)
End If
'If node.RowNodes.Count > 0 Then
' GetTestModule(modules, node.RowNodes)
'End If
Next
End Sub

26
UTS_Core/UTS_Core.vbproj
View File

@@ -200,8 +200,16 @@
<Compile Include="Security\Aes128.vb" />
<Compile Include="Security\MD5.vb" />
<Compile Include="Serialize\Serializer.vb" />
<Compile Include="Undo\ICommand.vb" />
<Compile Include="Undo\CommandManager.vb" />
<Compile Include="UTSModule\Station\GridNodeCommands\GridNodeAddCommand.vb" />
<Compile Include="UTSModule\Station\GridNodeCommands\GridNodeCopyPasteCommand.vb" />
<Compile Include="UTSModule\Station\GridNodeCommands\GridNodeCutPasteCommand.vb" />
<Compile Include="UTSModule\Station\GridNodeCommands\GridNodeDeleteCommand.vb" />
<Compile Include="UTSModule\Station\GridNodeCommands\GridNodeMoveDownCommand.vb" />
<Compile Include="UTSModule\Station\GridNodeCommands\GridNodeMoveLeftCommand.vb" />
<Compile Include="UTSModule\Station\GridNodeCommands\GridNodeMoveRightCommand.vb" />
<Compile Include="UTSModule\Station\GridNodeCommands\GridNodeTextChangedCommand.vb" />
<Compile Include="UTSModule\Station\GridNodeCommands\ICommand.vb" />
<Compile Include="UTSModule\Station\GridNodeCommands\CommandManager.vb" />
<Compile Include="UTSModule\DbConnect\DbConnector.vb" />
<Compile Include="UTSModule\DbTableModel\Customer\FolwCtrTable.vb" />
<Compile Include="UTSModule\DbTableModel\Customer\ImportInfoTable.vb" />
@@ -298,10 +306,10 @@
<Compile Include="UTSModule\Service\AppRegister.vb" />
<Compile Include="UTSModule\Service\AutsTcpClient.vb" />
<Compile Include="UTSModule\Service\ServiceTask.vb" />
<Compile Include="UTSModule\Station\GridNavigationManager.vb" />
<Compile Include="UTSModule\Station\GridNavigation.vb" />
<Compile Include="UTSModule\Station\GridNodeMoveUpCommand.vb" />
<Compile Include="UTSModule\Station\INavigation.vb" />
<Compile Include="UTSModule\Station\GridNodeNavigation\GridNavigationManager.vb" />
<Compile Include="UTSModule\Station\GridNodeNavigation\GridNavigation.vb" />
<Compile Include="UTSModule\Station\GridNodeCommands\GridNodeMoveUpCommand.vb" />
<Compile Include="UTSModule\Station\GridNodeNavigation\INavigation.vb" />
<Compile Include="UTSModule\Station\IStationPlan.vb" />
<Compile Include="UTSModule\Station\StationPackagePlan.vb" />
<Compile Include="UTSModule\Station\PlanNodeSelectChangedEventArgs.vb" />
@@ -354,7 +362,6 @@
<Compile Include="UTSModule\Service\TaskJsonParam.vb" />
<Compile Include="UTSModule\Service\TaskJsonSettings.vb" />
<Compile Include="UTSModule\Production\TestCmdManager.vb" />
<Compile Include="UTSModule\Station\RowNodeCommand.vb" />
<Compile Include="UTSModule\Test\Command\CompareFunction.vb" />
<Compile Include="UTSModule\Test\Command\ITestExecutor.vb" />
<Compile Include="UTSModule\Test\Command\SystemCommand\CheckUtsPlatformExecutor.vb" />
@@ -506,10 +513,7 @@
</None>
<None Include="packages.config" />
</ItemGroup>
<ItemGroup>
<Folder Include="UTSModule\About\" />
<Folder Include="UTSModule\Help\" />
</ItemGroup>
<ItemGroup />
<ItemGroup>
<Content Include="Document\Version.txt" />
<Content Include="模块说明.txt" />

77
UTS_Core/Undo/CommandManager.vb
View File

@@ -1,77 +0,0 @@
Namespace Undo
Public Class CommandManager
Protected Property UndoCommands As New Stack(Of ICommand)
Protected Property RedoCommands As New Stack(Of ICommand)
''' <summary>
''' 运行命令，并将命令添加至撤销堆栈
''' </summary>
''' <param name="command"></param>
Public Sub RunCommand(command As ICommand)
command.Execute()
AddUndoCommand(command)
End Sub
''' <summary>
''' 将命令添加至撤销堆栈
''' </summary>
Public Sub AddUndoCommand(command As ICommand)
UndoCommands.Push(command)
If RedoCommands.Count > 0 Then
ClearRedoCommands()
End If
End Sub
''' <summary>
''' 清空撤销命令堆栈
''' </summary>
Public Sub ClearUndoCommands()
UndoCommands.Clear()
End Sub
''' <summary>
''' 清空重做命令堆栈
''' </summary>
Public Sub ClearRedoCommands()
RedoCommands.Clear()
End Sub
''' <summary>
''' 清空撤销与重做命令堆栈
''' </summary>
Public Sub ClearCommands()
ClearUndoCommands()
ClearRedoCommands()
End Sub
''' <summary>
''' 执行撤销命令
''' </summary>
Public Sub Undo()
If UndoCommands.Count <= 0 Then Return
Dim command As ICommand = UndoCommands.Pop()
command.Undo()
RedoCommands.Push(command)
End Sub
''' <summary>
''' 执行重做命令
''' </summary>
Public Sub Redo()
If RedoCommands.Count <= 0 Then Return
Dim command As ICommand = RedoCommands.Pop()
command.Redo()
UndoCommands.Push(command)
End Sub
End Class
End Namespace

19
UTS_Core/Undo/ICommand.vb
View File

@@ -1,19 +0,0 @@
Namespace Undo
Public Interface ICommand
''' <summary>
''' 运行一条需要记录在撤销栈的命令
''' </summary>
Sub Execute()
''' <summary>
''' 重做命令
''' </summary>
Sub Redo()
''' <summary>
''' 撤销命令
''' </summary>
Sub Undo()
End Interface
End NameSpace

183
UTS_Core/bin/Debug/UTS_Core.xml
View File

@@ -1513,53 +1513,48 @@ UTS_Core
<param name="path"></param>
<returns></returns>
</member>
<member name="M:UTS_Core.Undo.ICommand.Execute">
<summary>
运行一条需要记录在撤销栈的命令
</summary>
</member>
<member name="M:UTS_Core.Undo.ICommand.Redo">
<member name="M:UTS_Core.ICommand.Redo">
<summary>
重做命令
</summary>
</member>
<member name="M:UTS_Core.Undo.ICommand.Undo">
<member name="M:UTS_Core.ICommand.Undo">
<summary>
撤销命令
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.RunCommand(UTS_Core.Undo.ICommand)">
<member name="M:UTS_Core.CommandManager.RunCommand(UTS_Core.ICommand)">
<summary>
运行命令，并将命令添加至撤销堆栈
</summary>
<param name="command"></param>
</member>
<member name="M:UTS_Core.Undo.CommandManager.AddUndoCommand(UTS_Core.Undo.ICommand)">
<member name="M:UTS_Core.CommandManager.AddUndoCommand(UTS_Core.ICommand)">
<summary>
将命令添加至撤销堆栈
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.ClearUndoCommands">
<member name="M:UTS_Core.CommandManager.ClearUndoCommands">
<summary>
清空撤销命令堆栈
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.ClearRedoCommands">
<member name="M:UTS_Core.CommandManager.ClearRedoCommands">
<summary>
清空重做命令堆栈
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.ClearCommands">
<member name="M:UTS_Core.CommandManager.ClearCommands">
<summary>
清空撤销与重做命令堆栈
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.Undo">
<member name="M:UTS_Core.CommandManager.Undo">
<summary>
执行撤销命令
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.Redo">
<member name="M:UTS_Core.CommandManager.Redo">
<summary>
执行重做命令
</summary>
@@ -6074,12 +6069,42 @@ UTS_Core
<member name="P:UTS_Core.UTSModule.Station.StationPlan.ParentPacket">
<summary>测试流程所关联的项目站包信息</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._grd">
<summary>表格控件对象</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._headNode">
<summary>表格树状目录起始节点</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._drawCol">
<summary>起始绘制列</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._drawStartRow">
<summary>起始绘制行</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._debugMode">
<summary>调试模式是否开启</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._showNodeIcon">
<summary>是否显示节点图标</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._uploading">
<summary>处于更新表格状态中,不触发表格单元格修改事件</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._paramChar">
<summary>多个参数间的分割符号</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._testCmdManager">
<summary>测试命令管理器</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._errCodeManager">
<summary>错误代码管理器</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._labelNames">
<summary>表格标签字段字典</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._recordNames">
<summary>表格记录名称字段字典</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid.ActiveNode">
<summary>当前活动节点</summary>
</member>
@@ -6089,11 +6114,8 @@ UTS_Core
<member name="E:UTS_Core.UTSModule.Station.StationPlanGrid.RowNodeTextChanged">
<summary>节点文本被修改事件</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._testCmdManager">
<summary>测试命令管理器</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._errCodeManager">
<summary>错误代码管理器</summary>
<member name="E:UTS_Core.UTSModule.Station.StationPlanGrid.PlanGridCommandChanged">
<summary>节点执行可撤销事件</summary>
</member>
<member name="P:UTS_Core.UTSModule.Station.StationPlanGrid.SkipEvent">
<summary>
@@ -6101,11 +6123,6 @@ UTS_Core
</summary>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.GridUpdateEventTrigger(FlexCell.Grid)">
<summary>
对第二行的Action执行一遍操作，以触发更新事件
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.BackwardNavigation">
<summary>
向后导航
@@ -6135,6 +6152,80 @@ UTS_Core
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.IsExistLabelName(System.String)">
<summary>
当前模块名是否已存在
</summary>
<param name="labelName"></param>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.IsExistRecordName(System.String)">
<summary>
当前字段名
</summary>
<param name="recordName"></param>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.ClearLabelNames">
<summary>
清空标签名称
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.ClearRecordNames">
<summary>
清空记录名称
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.AddLabelName(System.String,System.Int32)">
<summary>
添加标签名称
</summary>
<param name="labelName">标签名称</param>
<param name="row">行号</param>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.AddRecordName(System.String,System.Int32)">
<summary>
添加记录名称
</summary>
<param name="recordName">记录名</param>
<param name="row">行号</param>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.RemoveLabelName(System.String)">
<summary>
移出标签名称
</summary>
<param name="labelName">标签名称</param>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.RemoveRecordName(System.String)">
<summary>
移出记录名称
</summary>
<param name="recordName">记录名称</param>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.GetLabelNameGridRow(System.String)">
<summary>
获取标签名称行号
</summary>
<param name="labelName"></param>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.GetRecordNameGridRow(System.String)">
<summary>
获取记录名称行号
</summary>
<param name="recordName"></param>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.ReflushLabelNames">
<summary>
从表格中重载标签名称
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.ReflushRecordNames">
<summary>
从表格中重载记录名称
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.Grid_MouseLeave(System.Object,System.EventArgs)">
<summary>
光标离开grd表格时，黄色底色切换到选中行
@@ -6145,38 +6236,16 @@ UTS_Core
光标进入grd表格时，原底色切换到选中行
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.setRowTextForeColor(System.String,System.Boolean,UTS_Core.UTSModule.Station.RowNode.RowTypeEnum)">
<summary>
根据CmdType 和 isAction 返回该行字体颜色
</summary>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.Mouse_MoveOnNode_BackColorRepain(FlexCell.Grid,System.Int32,System.Int32,System.Drawing.Color)">
<summary>
鼠标移动到节点位置时所有子节点背景着色
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.getRowActionEn(FlexCell.Grid,System.Int32)">
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.NodeRowTypeChanged(UTS_Core.UTSModule.Station.RowNode)">
<summary>
FixModule节点Action变化时子节点字体重新着色
节点类型变更，修改节点行样式
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.NodeAction_Change(FlexCell.Grid,System.Int32,System.Int32,System.Boolean)">
<summary>
FixModule节点Action变化时子节点字体重新着色
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.Grid_Repain_By_ActionEn(FlexCell.Grid)">
<summary>
根据总表状态对单元格字体重新着色
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.UpdateGridInfo(FlexCell.Grid)">
<summary>
遍历表格，并更新到全局数组
</summary>
<param name="node"></param>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.NodeActionChanged(UTS_Core.UTSModule.Station.RowNode)">
<summary>
@@ -6195,16 +6264,6 @@ UTS_Core
选定行使能或清除Action选项
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.Call_UpdateGridActionInfo">
<summary>
更新表格内容到缓存，但是并不重新着色
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.UpdateGridActionInfo(FlexCell.Grid)">
<summary>
更新ActionEn信息
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.Grid_MouseMove(System.Object,System.Windows.Forms.MouseEventArgs)">
<summary>
光标移动时，所在行底色高亮
@@ -6251,6 +6310,12 @@ UTS_Core
初始化测试站表格
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.UpdateGrid">
<summary>
加载测试文件后更新表格
</summary>
<remarks></remarks>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.ExpandRows(UTS_Core.UTSModule.Station.RowNode)">
<summary>
展开行节点

BIN
UTS_Core/obj/Debug/UTS_Core.UTSModule.Station.FrmStationPlan.resources
View File

Binary file not shown.

BIN
UTS_Core/obj/Debug/UTS_Core.vbproj.AssemblyReference.cache
View File

Binary file not shown.

4
UTS_Core/obj/Debug/UTS_Core.vbproj.CoreCompileInputs.cache
View File

@@ -1 +1,5 @@
<<<<<<< HEAD
8992de695cb4747f2d61d8ca9c137991718f6aad703974b1d98d7b62777d4093
=======
123841b57461e4faf5bdd4496fa809c8ea3dfc46239271d30d61e3bd64bcde7d
>>>>>>> e82bfaaf20ab8230c1840fbb0068ce2e7d5fd4ec

183
UTS_Core/obj/Debug/UTS_Core.xml
View File

@@ -1513,53 +1513,48 @@ UTS_Core
<param name="path"></param>
<returns></returns>
</member>
<member name="M:UTS_Core.Undo.ICommand.Execute">
<summary>
运行一条需要记录在撤销栈的命令
</summary>
</member>
<member name="M:UTS_Core.Undo.ICommand.Redo">
<member name="M:UTS_Core.ICommand.Redo">
<summary>
重做命令
</summary>
</member>
<member name="M:UTS_Core.Undo.ICommand.Undo">
<member name="M:UTS_Core.ICommand.Undo">
<summary>
撤销命令
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.RunCommand(UTS_Core.Undo.ICommand)">
<member name="M:UTS_Core.CommandManager.RunCommand(UTS_Core.ICommand)">
<summary>
运行命令，并将命令添加至撤销堆栈
</summary>
<param name="command"></param>
</member>
<member name="M:UTS_Core.Undo.CommandManager.AddUndoCommand(UTS_Core.Undo.ICommand)">
<member name="M:UTS_Core.CommandManager.AddUndoCommand(UTS_Core.ICommand)">
<summary>
将命令添加至撤销堆栈
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.ClearUndoCommands">
<member name="M:UTS_Core.CommandManager.ClearUndoCommands">
<summary>
清空撤销命令堆栈
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.ClearRedoCommands">
<member name="M:UTS_Core.CommandManager.ClearRedoCommands">
<summary>
清空重做命令堆栈
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.ClearCommands">
<member name="M:UTS_Core.CommandManager.ClearCommands">
<summary>
清空撤销与重做命令堆栈
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.Undo">
<member name="M:UTS_Core.CommandManager.Undo">
<summary>
执行撤销命令
</summary>
</member>
<member name="M:UTS_Core.Undo.CommandManager.Redo">
<member name="M:UTS_Core.CommandManager.Redo">
<summary>
执行重做命令
</summary>
@@ -6074,12 +6069,42 @@ UTS_Core
<member name="P:UTS_Core.UTSModule.Station.StationPlan.ParentPacket">
<summary>测试流程所关联的项目站包信息</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._grd">
<summary>表格控件对象</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._headNode">
<summary>表格树状目录起始节点</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._drawCol">
<summary>起始绘制列</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._drawStartRow">
<summary>起始绘制行</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._debugMode">
<summary>调试模式是否开启</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._showNodeIcon">
<summary>是否显示节点图标</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._uploading">
<summary>处于更新表格状态中,不触发表格单元格修改事件</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._paramChar">
<summary>多个参数间的分割符号</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._testCmdManager">
<summary>测试命令管理器</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._errCodeManager">
<summary>错误代码管理器</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._labelNames">
<summary>表格标签字段字典</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._recordNames">
<summary>表格记录名称字段字典</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid.ActiveNode">
<summary>当前活动节点</summary>
</member>
@@ -6089,11 +6114,8 @@ UTS_Core
<member name="E:UTS_Core.UTSModule.Station.StationPlanGrid.RowNodeTextChanged">
<summary>节点文本被修改事件</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._testCmdManager">
<summary>测试命令管理器</summary>
</member>
<member name="F:UTS_Core.UTSModule.Station.StationPlanGrid._errCodeManager">
<summary>错误代码管理器</summary>
<member name="E:UTS_Core.UTSModule.Station.StationPlanGrid.PlanGridCommandChanged">
<summary>节点执行可撤销事件</summary>
</member>
<member name="P:UTS_Core.UTSModule.Station.StationPlanGrid.SkipEvent">
<summary>
@@ -6101,11 +6123,6 @@ UTS_Core
</summary>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.GridUpdateEventTrigger(FlexCell.Grid)">
<summary>
对第二行的Action执行一遍操作，以触发更新事件
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.BackwardNavigation">
<summary>
向后导航
@@ -6135,6 +6152,80 @@ UTS_Core
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.IsExistLabelName(System.String)">
<summary>
当前模块名是否已存在
</summary>
<param name="labelName"></param>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.IsExistRecordName(System.String)">
<summary>
当前字段名
</summary>
<param name="recordName"></param>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.ClearLabelNames">
<summary>
清空标签名称
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.ClearRecordNames">
<summary>
清空记录名称
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.AddLabelName(System.String,System.Int32)">
<summary>
添加标签名称
</summary>
<param name="labelName">标签名称</param>
<param name="row">行号</param>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.AddRecordName(System.String,System.Int32)">
<summary>
添加记录名称
</summary>
<param name="recordName">记录名</param>
<param name="row">行号</param>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.RemoveLabelName(System.String)">
<summary>
移出标签名称
</summary>
<param name="labelName">标签名称</param>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.RemoveRecordName(System.String)">
<summary>
移出记录名称
</summary>
<param name="recordName">记录名称</param>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.GetLabelNameGridRow(System.String)">
<summary>
获取标签名称行号
</summary>
<param name="labelName"></param>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.GetRecordNameGridRow(System.String)">
<summary>
获取记录名称行号
</summary>
<param name="recordName"></param>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.ReflushLabelNames">
<summary>
从表格中重载标签名称
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.ReflushRecordNames">
<summary>
从表格中重载记录名称
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.Grid_MouseLeave(System.Object,System.EventArgs)">
<summary>
光标离开grd表格时，黄色底色切换到选中行
@@ -6145,38 +6236,16 @@ UTS_Core
光标进入grd表格时，原底色切换到选中行
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.setRowTextForeColor(System.String,System.Boolean,UTS_Core.UTSModule.Station.RowNode.RowTypeEnum)">
<summary>
根据CmdType 和 isAction 返回该行字体颜色
</summary>
<returns></returns>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.Mouse_MoveOnNode_BackColorRepain(FlexCell.Grid,System.Int32,System.Int32,System.Drawing.Color)">
<summary>
鼠标移动到节点位置时所有子节点背景着色
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.getRowActionEn(FlexCell.Grid,System.Int32)">
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.NodeRowTypeChanged(UTS_Core.UTSModule.Station.RowNode)">
<summary>
FixModule节点Action变化时子节点字体重新着色
节点类型变更，修改节点行样式
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.NodeAction_Change(FlexCell.Grid,System.Int32,System.Int32,System.Boolean)">
<summary>
FixModule节点Action变化时子节点字体重新着色
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.Grid_Repain_By_ActionEn(FlexCell.Grid)">
<summary>
根据总表状态对单元格字体重新着色
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.UpdateGridInfo(FlexCell.Grid)">
<summary>
遍历表格，并更新到全局数组
</summary>
<param name="node"></param>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.NodeActionChanged(UTS_Core.UTSModule.Station.RowNode)">
<summary>
@@ -6195,16 +6264,6 @@ UTS_Core
选定行使能或清除Action选项
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.Call_UpdateGridActionInfo">
<summary>
更新表格内容到缓存，但是并不重新着色
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.UpdateGridActionInfo(FlexCell.Grid)">
<summary>
更新ActionEn信息
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.Grid_MouseMove(System.Object,System.Windows.Forms.MouseEventArgs)">
<summary>
光标移动时，所在行底色高亮
@@ -6251,6 +6310,12 @@ UTS_Core
初始化测试站表格
</summary>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.UpdateGrid">
<summary>
加载测试文件后更新表格
</summary>
<remarks></remarks>
</member>
<member name="M:UTS_Core.UTSModule.Station.StationPlanGrid.ExpandRows(UTS_Core.UTSModule.Station.RowNode)">
<summary>
展开行节点