1] 상태정보 텍스트박스 Backgroud 컬러 설정

Ready(Gray), DOWNLOADING(ForestGreen), FINISHED(Blue), ERROR(Red)
2] 다운로드 중에는 버튼 비활성화처리
3] Clear 시레 포트도 초기화
This commit is contained in:
KwakJooYoung 2025-12-19 11:29:31 +09:00
parent 4632736eb4
commit ca7c8cd09d
5 changed files with 265 additions and 202 deletions

346
MainForm.Designer.vb generated
View File

@ -27,7 +27,7 @@ Partial Class MainForm
Me.groupBoxCommon = New System.Windows.Forms.GroupBox()
Me.buttonDownloader = New System.Windows.Forms.Button()
Me.Label32 = New System.Windows.Forms.Label()
Me.textDownloader = New System.Windows.Forms.TextBox()
Me.textBoxDownloader = New System.Windows.Forms.TextBox()
Me.buttonClean = New System.Windows.Forms.Button()
Me.buttonFileDefault = New System.Windows.Forms.Button()
Me.Label2 = New System.Windows.Forms.Label()
@ -36,6 +36,7 @@ Partial Class MainForm
Me.Label7 = New System.Windows.Forms.Label()
Me.buttonDownloadAll = New System.Windows.Forms.Button()
Me.groupBoxProcess01 = New System.Windows.Forms.GroupBox()
Me.textBoxInfo01 = New System.Windows.Forms.TextBox()
Me.buttonPortScan01 = New System.Windows.Forms.Button()
Me.buttonFile01 = New System.Windows.Forms.Button()
Me.comboBoxPort01 = New System.Windows.Forms.ComboBox()
@ -49,6 +50,7 @@ Partial Class MainForm
Me.SerialPort1 = New System.IO.Ports.SerialPort(Me.components)
Me.cmdTimer = New System.Windows.Forms.Timer(Me.components)
Me.groupBoxProcess02 = New System.Windows.Forms.GroupBox()
Me.textBoxInfo02 = New System.Windows.Forms.TextBox()
Me.buttonPortScan02 = New System.Windows.Forms.Button()
Me.buttonFile02 = New System.Windows.Forms.Button()
Me.comboBoxPort02 = New System.Windows.Forms.ComboBox()
@ -58,6 +60,7 @@ Partial Class MainForm
Me.textBoxBinary02 = New System.Windows.Forms.TextBox()
Me.buttonDownload02 = New System.Windows.Forms.Button()
Me.groupBoxProcess03 = New System.Windows.Forms.GroupBox()
Me.textBoxInfo03 = New System.Windows.Forms.TextBox()
Me.buttonPortScan03 = New System.Windows.Forms.Button()
Me.buttonFile03 = New System.Windows.Forms.Button()
Me.comboBoxPort03 = New System.Windows.Forms.ComboBox()
@ -67,6 +70,7 @@ Partial Class MainForm
Me.textBoxBinary03 = New System.Windows.Forms.TextBox()
Me.buttonDownload03 = New System.Windows.Forms.Button()
Me.groupBoxProcess04 = New System.Windows.Forms.GroupBox()
Me.textBoxInfo04 = New System.Windows.Forms.TextBox()
Me.buttonPortScan04 = New System.Windows.Forms.Button()
Me.buttonFile04 = New System.Windows.Forms.Button()
Me.comboBoxPort04 = New System.Windows.Forms.ComboBox()
@ -76,6 +80,7 @@ Partial Class MainForm
Me.textBoxBinary04 = New System.Windows.Forms.TextBox()
Me.buttonDownload04 = New System.Windows.Forms.Button()
Me.groupBoxProcess05 = New System.Windows.Forms.GroupBox()
Me.textBoxInfo05 = New System.Windows.Forms.TextBox()
Me.buttonPortScan05 = New System.Windows.Forms.Button()
Me.buttonFile05 = New System.Windows.Forms.Button()
Me.comboBoxPort05 = New System.Windows.Forms.ComboBox()
@ -85,6 +90,7 @@ Partial Class MainForm
Me.textBoxBinary05 = New System.Windows.Forms.TextBox()
Me.buttonDownload05 = New System.Windows.Forms.Button()
Me.groupBoxProcess06 = New System.Windows.Forms.GroupBox()
Me.textBoxInfo06 = New System.Windows.Forms.TextBox()
Me.buttonPortScan06 = New System.Windows.Forms.Button()
Me.buttonFile06 = New System.Windows.Forms.Button()
Me.comboBoxPort06 = New System.Windows.Forms.ComboBox()
@ -94,6 +100,7 @@ Partial Class MainForm
Me.textBoxBinary06 = New System.Windows.Forms.TextBox()
Me.buttonDownload06 = New System.Windows.Forms.Button()
Me.groupBoxProcess07 = New System.Windows.Forms.GroupBox()
Me.textBoxInfo07 = New System.Windows.Forms.TextBox()
Me.buttonPortScan07 = New System.Windows.Forms.Button()
Me.buttonFile07 = New System.Windows.Forms.Button()
Me.comboBoxPort07 = New System.Windows.Forms.ComboBox()
@ -103,6 +110,7 @@ Partial Class MainForm
Me.textBoxBinary07 = New System.Windows.Forms.TextBox()
Me.buttonDownload07 = New System.Windows.Forms.Button()
Me.groupBoxProcess08 = New System.Windows.Forms.GroupBox()
Me.textBoxInfo08 = New System.Windows.Forms.TextBox()
Me.buttonPortScan08 = New System.Windows.Forms.Button()
Me.buttonFile08 = New System.Windows.Forms.Button()
Me.comboBoxPort08 = New System.Windows.Forms.ComboBox()
@ -112,6 +120,7 @@ Partial Class MainForm
Me.textBoxBinary08 = New System.Windows.Forms.TextBox()
Me.buttonDownload08 = New System.Windows.Forms.Button()
Me.groupBoxProcess09 = New System.Windows.Forms.GroupBox()
Me.textBoxInfo09 = New System.Windows.Forms.TextBox()
Me.buttonPortScan09 = New System.Windows.Forms.Button()
Me.buttonFile09 = New System.Windows.Forms.Button()
Me.comboBoxPort09 = New System.Windows.Forms.ComboBox()
@ -121,6 +130,7 @@ Partial Class MainForm
Me.textBoxBinary09 = New System.Windows.Forms.TextBox()
Me.buttonDownload09 = New System.Windows.Forms.Button()
Me.groupBoxProcess10 = New System.Windows.Forms.GroupBox()
Me.textBoxInfo10 = New System.Windows.Forms.TextBox()
Me.buttonPortScan10 = New System.Windows.Forms.Button()
Me.buttonFile10 = New System.Windows.Forms.Button()
Me.comboBoxPort10 = New System.Windows.Forms.ComboBox()
@ -129,16 +139,6 @@ Partial Class MainForm
Me.Label27 = New System.Windows.Forms.Label()
Me.textBoxBinary10 = New System.Windows.Forms.TextBox()
Me.buttonDownload10 = New System.Windows.Forms.Button()
Me.textBoxInfo01 = New System.Windows.Forms.TextBox()
Me.textBoxInfo02 = New System.Windows.Forms.TextBox()
Me.textBoxInfo03 = New System.Windows.Forms.TextBox()
Me.textBoxInfo04 = New System.Windows.Forms.TextBox()
Me.textBoxInfo05 = New System.Windows.Forms.TextBox()
Me.textBoxInfo10 = New System.Windows.Forms.TextBox()
Me.textBoxInfo09 = New System.Windows.Forms.TextBox()
Me.textBoxInfo08 = New System.Windows.Forms.TextBox()
Me.textBoxInfo07 = New System.Windows.Forms.TextBox()
Me.textBoxInfo06 = New System.Windows.Forms.TextBox()
Me.groupBoxCommon.SuspendLayout()
Me.groupBoxProcess01.SuspendLayout()
Me.groupBoxProcess02.SuspendLayout()
@ -157,7 +157,7 @@ Partial Class MainForm
Me.groupBoxCommon.BackColor = System.Drawing.Color.Silver
Me.groupBoxCommon.Controls.Add(Me.buttonDownloader)
Me.groupBoxCommon.Controls.Add(Me.Label32)
Me.groupBoxCommon.Controls.Add(Me.textDownloader)
Me.groupBoxCommon.Controls.Add(Me.textBoxDownloader)
Me.groupBoxCommon.Controls.Add(Me.buttonClean)
Me.groupBoxCommon.Controls.Add(Me.buttonFileDefault)
Me.groupBoxCommon.Controls.Add(Me.Label2)
@ -194,17 +194,17 @@ Partial Class MainForm
Me.Label32.TabIndex = 96
Me.Label32.Text = "Downloader"
'
'textDownloader
'textBoxDownloader
'
Me.textDownloader.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer))
Me.textDownloader.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold)
Me.textDownloader.ForeColor = System.Drawing.Color.Blue
Me.textDownloader.Location = New System.Drawing.Point(974, 25)
Me.textDownloader.Name = "textDownloader"
Me.textDownloader.ReadOnly = True
Me.textDownloader.Size = New System.Drawing.Size(258, 32)
Me.textDownloader.TabIndex = 95
Me.textDownloader.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
Me.textBoxDownloader.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer))
Me.textBoxDownloader.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold)
Me.textBoxDownloader.ForeColor = System.Drawing.Color.Blue
Me.textBoxDownloader.Location = New System.Drawing.Point(974, 25)
Me.textBoxDownloader.Name = "textBoxDownloader"
Me.textBoxDownloader.ReadOnly = True
Me.textBoxDownloader.Size = New System.Drawing.Size(258, 32)
Me.textBoxDownloader.TabIndex = 95
Me.textBoxDownloader.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'buttonClean
'
@ -307,6 +307,21 @@ Partial Class MainForm
Me.groupBoxProcess01.TabStop = False
Me.groupBoxProcess01.Text = "Process 01"
'
'textBoxInfo01
'
Me.textBoxInfo01.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo01.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo01.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo01.ForeColor = System.Drawing.Color.White
Me.textBoxInfo01.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo01.Name = "textBoxInfo01"
Me.textBoxInfo01.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo01.TabIndex = 90
Me.textBoxInfo01.Text = "DOWNLOADING"
Me.textBoxInfo01.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'buttonPortScan01
'
Me.buttonPortScan01.Font = New System.Drawing.Font("굴림", 16.2!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
@ -434,6 +449,21 @@ Partial Class MainForm
Me.groupBoxProcess02.TabStop = False
Me.groupBoxProcess02.Text = "Process 02"
'
'textBoxInfo02
'
Me.textBoxInfo02.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo02.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo02.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo02.ForeColor = System.Drawing.Color.White
Me.textBoxInfo02.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo02.Name = "textBoxInfo02"
Me.textBoxInfo02.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo02.TabIndex = 91
Me.textBoxInfo02.Text = "READY"
Me.textBoxInfo02.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'buttonPortScan02
'
Me.buttonPortScan02.Font = New System.Drawing.Font("굴림", 16.2!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
@ -545,6 +575,21 @@ Partial Class MainForm
Me.groupBoxProcess03.TabStop = False
Me.groupBoxProcess03.Text = "Process 03"
'
'textBoxInfo03
'
Me.textBoxInfo03.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo03.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo03.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo03.ForeColor = System.Drawing.Color.White
Me.textBoxInfo03.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo03.Name = "textBoxInfo03"
Me.textBoxInfo03.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo03.TabIndex = 92
Me.textBoxInfo03.Text = "READY"
Me.textBoxInfo03.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'buttonPortScan03
'
Me.buttonPortScan03.Font = New System.Drawing.Font("굴림", 16.2!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
@ -656,6 +701,21 @@ Partial Class MainForm
Me.groupBoxProcess04.TabStop = False
Me.groupBoxProcess04.Text = "Process 04"
'
'textBoxInfo04
'
Me.textBoxInfo04.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo04.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo04.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo04.ForeColor = System.Drawing.Color.White
Me.textBoxInfo04.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo04.Name = "textBoxInfo04"
Me.textBoxInfo04.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo04.TabIndex = 92
Me.textBoxInfo04.Text = "READY"
Me.textBoxInfo04.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'buttonPortScan04
'
Me.buttonPortScan04.Font = New System.Drawing.Font("굴림", 16.2!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
@ -767,6 +827,21 @@ Partial Class MainForm
Me.groupBoxProcess05.TabStop = False
Me.groupBoxProcess05.Text = "Process 05"
'
'textBoxInfo05
'
Me.textBoxInfo05.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo05.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo05.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo05.ForeColor = System.Drawing.Color.White
Me.textBoxInfo05.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo05.Name = "textBoxInfo05"
Me.textBoxInfo05.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo05.TabIndex = 92
Me.textBoxInfo05.Text = "READY"
Me.textBoxInfo05.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'buttonPortScan05
'
Me.buttonPortScan05.Font = New System.Drawing.Font("굴림", 16.2!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
@ -878,6 +953,21 @@ Partial Class MainForm
Me.groupBoxProcess06.TabStop = False
Me.groupBoxProcess06.Text = "Process 06"
'
'textBoxInfo06
'
Me.textBoxInfo06.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo06.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo06.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo06.ForeColor = System.Drawing.Color.White
Me.textBoxInfo06.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo06.Name = "textBoxInfo06"
Me.textBoxInfo06.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo06.TabIndex = 92
Me.textBoxInfo06.Text = "READY"
Me.textBoxInfo06.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'buttonPortScan06
'
Me.buttonPortScan06.Font = New System.Drawing.Font("굴림", 16.2!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
@ -989,6 +1079,21 @@ Partial Class MainForm
Me.groupBoxProcess07.TabStop = False
Me.groupBoxProcess07.Text = "Process 07"
'
'textBoxInfo07
'
Me.textBoxInfo07.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo07.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo07.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo07.ForeColor = System.Drawing.Color.White
Me.textBoxInfo07.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo07.Name = "textBoxInfo07"
Me.textBoxInfo07.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo07.TabIndex = 92
Me.textBoxInfo07.Text = "READY"
Me.textBoxInfo07.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'buttonPortScan07
'
Me.buttonPortScan07.Font = New System.Drawing.Font("굴림", 16.2!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
@ -1100,6 +1205,21 @@ Partial Class MainForm
Me.groupBoxProcess08.TabStop = False
Me.groupBoxProcess08.Text = "Process 08"
'
'textBoxInfo08
'
Me.textBoxInfo08.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo08.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo08.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo08.ForeColor = System.Drawing.Color.White
Me.textBoxInfo08.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo08.Name = "textBoxInfo08"
Me.textBoxInfo08.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo08.TabIndex = 92
Me.textBoxInfo08.Text = "READY"
Me.textBoxInfo08.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'buttonPortScan08
'
Me.buttonPortScan08.Font = New System.Drawing.Font("굴림", 16.2!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
@ -1211,6 +1331,21 @@ Partial Class MainForm
Me.groupBoxProcess09.TabStop = False
Me.groupBoxProcess09.Text = "Process 09"
'
'textBoxInfo09
'
Me.textBoxInfo09.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo09.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo09.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo09.ForeColor = System.Drawing.Color.White
Me.textBoxInfo09.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo09.Name = "textBoxInfo09"
Me.textBoxInfo09.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo09.TabIndex = 92
Me.textBoxInfo09.Text = "READY"
Me.textBoxInfo09.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'buttonPortScan09
'
Me.buttonPortScan09.Font = New System.Drawing.Font("굴림", 16.2!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
@ -1322,6 +1457,21 @@ Partial Class MainForm
Me.groupBoxProcess10.TabStop = False
Me.groupBoxProcess10.Text = "Process 10"
'
'textBoxInfo10
'
Me.textBoxInfo10.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo10.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo10.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo10.ForeColor = System.Drawing.Color.White
Me.textBoxInfo10.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo10.Name = "textBoxInfo10"
Me.textBoxInfo10.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo10.TabIndex = 92
Me.textBoxInfo10.Text = "READY"
Me.textBoxInfo10.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'buttonPortScan10
'
Me.buttonPortScan10.Font = New System.Drawing.Font("굴림", 16.2!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
@ -1412,156 +1562,6 @@ Partial Class MainForm
Me.buttonDownload10.Text = "Download"
Me.buttonDownload10.UseVisualStyleBackColor = True
'
'textBoxInfo01
'
Me.textBoxInfo01.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo01.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo01.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo01.ForeColor = System.Drawing.Color.White
Me.textBoxInfo01.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo01.Name = "textBoxInfo01"
Me.textBoxInfo01.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo01.TabIndex = 90
Me.textBoxInfo01.Text = "DOWNLOADING"
Me.textBoxInfo01.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'textBoxInfo02
'
Me.textBoxInfo02.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo02.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo02.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo02.ForeColor = System.Drawing.Color.White
Me.textBoxInfo02.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo02.Name = "textBoxInfo02"
Me.textBoxInfo02.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo02.TabIndex = 91
Me.textBoxInfo02.Text = "READY"
Me.textBoxInfo02.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'textBoxInfo03
'
Me.textBoxInfo03.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo03.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo03.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo03.ForeColor = System.Drawing.Color.White
Me.textBoxInfo03.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo03.Name = "textBoxInfo03"
Me.textBoxInfo03.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo03.TabIndex = 92
Me.textBoxInfo03.Text = "READY"
Me.textBoxInfo03.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'textBoxInfo04
'
Me.textBoxInfo04.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo04.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo04.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo04.ForeColor = System.Drawing.Color.White
Me.textBoxInfo04.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo04.Name = "textBoxInfo04"
Me.textBoxInfo04.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo04.TabIndex = 92
Me.textBoxInfo04.Text = "READY"
Me.textBoxInfo04.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'textBoxInfo05
'
Me.textBoxInfo05.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo05.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo05.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo05.ForeColor = System.Drawing.Color.White
Me.textBoxInfo05.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo05.Name = "textBoxInfo05"
Me.textBoxInfo05.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo05.TabIndex = 92
Me.textBoxInfo05.Text = "READY"
Me.textBoxInfo05.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'textBoxInfo10
'
Me.textBoxInfo10.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo10.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo10.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo10.ForeColor = System.Drawing.Color.White
Me.textBoxInfo10.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo10.Name = "textBoxInfo10"
Me.textBoxInfo10.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo10.TabIndex = 92
Me.textBoxInfo10.Text = "READY"
Me.textBoxInfo10.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'textBoxInfo09
'
Me.textBoxInfo09.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo09.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo09.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo09.ForeColor = System.Drawing.Color.White
Me.textBoxInfo09.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo09.Name = "textBoxInfo09"
Me.textBoxInfo09.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo09.TabIndex = 92
Me.textBoxInfo09.Text = "READY"
Me.textBoxInfo09.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'textBoxInfo08
'
Me.textBoxInfo08.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo08.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo08.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo08.ForeColor = System.Drawing.Color.White
Me.textBoxInfo08.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo08.Name = "textBoxInfo08"
Me.textBoxInfo08.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo08.TabIndex = 92
Me.textBoxInfo08.Text = "READY"
Me.textBoxInfo08.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'textBoxInfo07
'
Me.textBoxInfo07.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo07.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo07.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo07.ForeColor = System.Drawing.Color.White
Me.textBoxInfo07.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo07.Name = "textBoxInfo07"
Me.textBoxInfo07.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo07.TabIndex = 92
Me.textBoxInfo07.Text = "READY"
Me.textBoxInfo07.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'textBoxInfo06
'
Me.textBoxInfo06.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.textBoxInfo06.BackColor = System.Drawing.Color.Gray
Me.textBoxInfo06.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.textBoxInfo06.ForeColor = System.Drawing.Color.White
Me.textBoxInfo06.Location = New System.Drawing.Point(6, 395)
Me.textBoxInfo06.Name = "textBoxInfo06"
Me.textBoxInfo06.Size = New System.Drawing.Size(172, 32)
Me.textBoxInfo06.TabIndex = 92
Me.textBoxInfo06.Text = "READY"
Me.textBoxInfo06.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'MainForm
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 12.0!)
@ -1713,7 +1713,7 @@ Partial Class MainForm
Friend WithEvents buttonClean As Button
Friend WithEvents buttonDownloader As Button
Friend WithEvents Label32 As Label
Friend WithEvents textDownloader As TextBox
Friend WithEvents textBoxDownloader As TextBox
Friend WithEvents textBoxInfo01 As TextBox
Friend WithEvents textBoxInfo02 As TextBox
Friend WithEvents textBoxInfo03 As TextBox

View File

@ -26,6 +26,7 @@ Public Class MainForm
Public baudRate As String
Public binaryFile As String = ""
Public downloaderFile As String = ""
Const SuccessMessage As String = "Read Out Protection has been set successfully"
Private Sub MainForm_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
SetGroupBoxProcessControls()
@ -134,7 +135,7 @@ Public Class MainForm
If My.Settings.DownloaderFile.Length <> 0 And File.Exists(My.Settings.DownloaderFile) Then
downloaderFile = My.Settings.DownloaderFile
textDownloader.Text = downloaderFile
textBoxDownloader.Text = downloaderFile
End If
End Sub
@ -153,11 +154,11 @@ Public Class MainForm
End Sub
Private Sub HandleButton(i As Int16)
buttonDownload(i).Enabled = False
UpdateButtonDownload(i, False)
If comboBoxPort(i).SelectedIndex > -1 And downloaderFile.Length <> 0 And comboBoxBaudRate.SelectedIndex > -1 And binaryFile.Length <> 0 Then
If textBoxInfo(i).Text = "READY" Or textBoxInfo(i).Text = "FINISHED" Then
buttonDownload(i).Enabled = True
If GetPort(i) <> Nothing And downloaderFile.Length <> 0 And GetBaudRate() > 0 And binaryFile.Length <> 0 Then
If GetTextBoxInfo(i) <> "DOWNLOADING" Then
UpdateButtonDownload(i, True)
End If
End If
End Sub
@ -209,8 +210,6 @@ Public Class MainForm
My.Settings.BinaryFile = binaryFile
My.Settings.Save()
End If
HandleButton()
End Sub
Private Sub TextBoxBinaryDefault_TextChanged(sender As Object, e As EventArgs) Handles textBoxBinaryDefault.TextChanged
@ -223,16 +222,18 @@ Public Class MainForm
HandleButton()
End Sub
Private Sub buttonDownloader_Click(sender As Object, e As EventArgs) Handles buttonDownloader.Click
Private Sub ButtonDownloader_Click(sender As Object, e As EventArgs) Handles buttonDownloader.Click
Dim fileAddress As String = Openfile("다운로드 파일 불러오기", downloaderFile, "다운로드 파일(*.exe) | *.exe")
If fileAddress <> "fail" Then
textDownloader.Text = fileAddress
textBoxDownloader.Text = fileAddress
downloaderFile = fileAddress
My.Settings.DownloaderFile = downloaderFile
My.Settings.Save()
End If
End Sub
Private Sub TextBoxDownloader_TextChanged(sender As Object, e As EventArgs) Handles textBoxDownloader.TextChanged
HandleButton()
End Sub
@ -335,7 +336,7 @@ Public Class MainForm
Private Sub RunDownload(i As Int16)
Dim port As String = GetPort(i)
Dim baudRate As String = GetBaudRate(i)
Dim baudRate As String = GetBaudRate()
Dim binary As String = getBinary(i)
Try
@ -361,6 +362,7 @@ Public Class MainForm
cmdProcess.StartInfo = startInfo
cmdProcess.Start()
UpdateTextBoxInfo(i, "DOWNLOADING")
HandleButton(i)
' 표준 출력 스트림 리더 가져오기
Dim reader As StreamReader = cmdProcess.StandardOutput
@ -372,7 +374,12 @@ Public Class MainForm
End While
cmdProcess.WaitForExit()
If getTextBoxCmdWindow(i).Contains(SuccessMessage) = True Then
UpdateTextBoxInfo(i, "FINISHED")
Else
UpdateTextBoxInfo(i, "ERROR")
End If
HandleButton(i)
Catch ex As Exception
MsgBox(ex.Message)
@ -380,25 +387,29 @@ Public Class MainForm
End Sub
Private Function GetPort(i As Int16) As String
Dim port As String
Dim port As String = Nothing
If comboBoxPort(i).InvokeRequired Then
comboBoxPort(i).Invoke(Sub()
If comboBoxPort(i).SelectedIndex <> -1 Then
port = comboBoxPort(i).Text
End If
End Sub)
Else
If comboBoxPort(i).SelectedIndex <> -1 Then
port = comboBoxPort(i).Text
End If
End If
Return port
End Function
Private Function GetBaudRate(i As Int16) As String
Private Function GetBaudRate() As String
Dim baudRate As String
If comboBoxBaudRate.InvokeRequired Then
comboBoxBaudRate.Invoke(Sub()
BaudRate = comboBoxBaudRate.Text
baudRate = comboBoxBaudRate.Text
End Sub)
Else
BaudRate = comboBoxBaudRate.Text
baudRate = comboBoxBaudRate.Text
End If
Return baudRate
End Function
@ -418,21 +429,25 @@ Public Class MainForm
Private Sub UpdateTextBoxCmdWindow(i As Int16, state As String)
If textBoxCmdWindow(i).InvokeRequired Then
textBoxCmdWindow(i).Invoke(Sub()
'처음 메시지 출력할 info textbox 업데이트
If textBoxCmdWindow(i).Text.Length = 0 Then
UpdateTextBoxInfo(i, "DOWNLOADING")
End If
textBoxCmdWindow(i).AppendText(state)
End Sub)
Else
'처음 메시지 출력할 info textbox 업데이트
If textBoxCmdWindow(i).Text.Length = 0 Then
UpdateTextBoxInfo(i, "DOWNLOADING")
End If
textBoxCmdWindow(i).AppendText(state)
End If
End Sub
Private Function getTextBoxCmdWindow(i As Int16) As String
Dim outputMessage As String
If textBoxCmdWindow(i).InvokeRequired Then
textBoxCmdWindow(i).Invoke(Sub()
outputMessage = textBoxCmdWindow(i).Text
End Sub)
Else
outputMessage = textBoxCmdWindow(i).Text
End If
Return outputMessage
End Function
Private Sub ClearTextBoxCmdWindow(i As Int16)
If textBoxCmdWindow(i).InvokeRequired Then
textBoxCmdWindow(i).Invoke(Sub()
@ -447,24 +462,72 @@ Public Class MainForm
If textBoxInfo(i).InvokeRequired Then
textBoxInfo(i).Invoke(Sub()
textBoxInfo(i).Text = state
If state = "DOWNLOADING" Then
textBoxInfo(i).BackColor = Color.ForestGreen
ElseIf state = "FINISHED" Then
textBoxInfo(i).BackColor = Color.Blue
ElseIf state = "ERROR" Then
textBoxInfo(i).BackColor = Color.Red
Else
textBoxInfo(i).BackColor = Color.Gray
End If
textBoxInfo(i).Refresh()
End Sub)
Else
textBoxInfo(i).Text = state
If state = "DOWNLOADING" Then
textBoxInfo(i).BackColor = Color.ForestGreen
ElseIf state = "FINISHED" Then
textBoxInfo(i).BackColor = Color.Blue
ElseIf state = "ERROR" Then
textBoxInfo(i).BackColor = Color.Red
Else
textBoxInfo(i).BackColor = Color.Gray
End If
textBoxInfo(i).Refresh()
End If
End Sub
Private Function GetTextBoxInfo(i As Int16) As String
Dim info As String
If textBoxInfo(i).InvokeRequired Then
textBoxInfo(i).Invoke(Sub()
info = textBoxInfo(i).Text
End Sub)
Else
info = textBoxInfo(i).Text
End If
Return info
End Function
Private Sub ClearTextBoxInfo(i As Int16)
If textBoxInfo(i).InvokeRequired Then
textBoxInfo(i).Invoke(Sub()
textBoxInfo(i).Text = "READY"
textBoxInfo(i).BackColor = Color.Gray
textBoxInfo(i).Refresh()
End Sub)
Else
textBoxInfo(i).Text = "READY"
textBoxInfo(i).BackColor = Color.Gray
textBoxInfo(i).Refresh()
End If
End Sub
Private Sub UpdateButtonDownload(i As Int16, enable As Boolean)
If buttonDownload(i).InvokeRequired Then
buttonDownload(i).Invoke(Sub()
buttonDownload(i).Enabled = enable
End Sub)
Else
buttonDownload(i).Enabled = enable
End If
End Sub
Private Sub buttonClean_Click(sender As Object, e As EventArgs) Handles buttonClean.Click
Initialize()
LoadComportName(0)
ClearComponent()
HandleButton()
End Sub
End Class

View File

@ -80,7 +80,7 @@ Namespace My
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("1.0.0")> _
Global.System.Configuration.DefaultSettingValueAttribute("1.0.1")> _
Public ReadOnly Property ProgramVersion() As String
Get
Return CType(Me("ProgramVersion"),String)

View File

@ -9,7 +9,7 @@
<Value Profile="(Default)">921600|460800|230400|115200</Value>
</Setting>
<Setting Name="ProgramVersion" Type="System.String" Scope="Application">
<Value Profile="(Default)">1.0.0</Value>
<Value Profile="(Default)">1.0.1</Value>
</Setting>
<Setting Name="DownloaderFile" Type="System.String" Scope="User">
<Value Profile="(Default)" />

View File

@ -60,7 +60,7 @@
<applicationSettings>
<FW_Multi_Downloader.My.MySettings>
<setting name="ProgramVersion" serializeAs="String">
<value>1.0.0</value>
<value>1.0.1</value>
</setting>
</FW_Multi_Downloader.My.MySettings>
</applicationSettings>