1.보급형 모델 선택 파워 조정 시 db 업데이트

2.파워 음수 조정 가능
3.버전 1.1.1 -> 1.1.2
This commit is contained in:
hyelinjung 2026-01-13 10:10:47 +09:00
parent 58d3a55ed3
commit 798a96404a
2 changed files with 16 additions and 2 deletions

View File

@ -1272,6 +1272,7 @@ Partial Class frm_Freq_Reg
Me.nudPower.Font = New System.Drawing.Font("함초롬바탕", 50.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.nudPower.Location = New System.Drawing.Point(713, 179)
Me.nudPower.Maximum = New Decimal(New Integer() {50, 0, 0, 0})
Me.nudPower.Minimum = New Decimal(New Integer() {5, 0, 0, -2147483648})
Me.nudPower.Name = "nudPower"
Me.nudPower.Size = New System.Drawing.Size(285, 95)
Me.nudPower.TabIndex = 100
@ -4655,7 +4656,7 @@ Partial Class frm_Freq_Reg
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frm_Freq_Reg"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "DUALSONIC_MAXIMUM_FREQCONF_REGISTER_VER.1.1.1"
Me.Text = "DUALSONIC_MAXIMUM_FREQCONF_REGISTER_VER.1.1.2"
Me.gpbTime.ResumeLayout(False)
Me.gpbTime.PerformLayout()
Me.gbselect.ResumeLayout(False)

View File

@ -21,6 +21,7 @@ Public Class frm_Freq_Reg
Private cartridge_table As String = cartridge
Private NonCartridge_table As String = MainNonTDDB
Private ApplyModelInfoDB As String = mainModelInfoDB
Private lowPriceModel As Boolean = False '' 저가형 모델인 경우 무조건 db 저장
Public Enum PD1_ENUM
STANDBY = 0
@ -210,6 +211,18 @@ Public Class frm_Freq_Reg
comboBoxModel.Text = "MAXIMUM"
End Sub
Private Sub model_SelectedIndexChanged(sender As Object, e As EventArgs) Handles comboBoxModel.SelectedIndexChanged
If comboBoxModel.SelectedIndex <> -1 Then
Dim ModelCode = comboBoxModel.SelectedItem.value.ToString
If Mid(ModelCode, 1, 1) = "A" Then
lowPriceModel = True
Else
lowPriceModel = False
End If
End If
End Sub
Private Sub thread_func()
Do While thread_type
thread_play()
@ -3001,7 +3014,7 @@ SuccessExit:
Private Function td_serial_update(freq As String, power As String, td_serial As String) As Boolean
If ckb_db_use.Checked = True Then
If lowPriceModel = True Then
DBCmd = "UPDATE " & cartridge_table & " SET Ct_Frequency = '" & freq & "' , Ct_Power = '" & power & "' WHERE PV_SN = '" & td_serial & "'"