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

View File

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

View File

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

View File

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

View File

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