hamradio/cqrlog
1
0
Fork 0
mirror of https://github.com/ok2cqr/cqrlog.git synced 2024-09-21 10:27:17 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fixes to preferences layout

Browse Source 
Squashed commit of the following:

commit 5556ee564c6077c42dc75ef127183488f04648a3
Author: OH1KH <oh1kh@sral.fi>
Date:   Fri Jul 1 10:57:31 2022 +0300

    Fixed anchor

commit d8de2a29f24215204a9b86587d47e63bbc0364b6
Author: OH1KH <oh1kh@sral.fi>
Date:   Thu Jun 30 16:22:34 2022 +0300

    fixed preferences/modes layout

commit 627e6b2a3e398d102439f6ea68d56a32fb265790
Author: OH1KH <oh1kh@sral.fi>
Date:   Thu Jun 30 15:45:38 2022 +0300

    Fix preferences/ROTcontrol

    	Cleared ROT ID model(1,2) default text "cmbModelRot"
This commit is contained in:
OH1KH 2022-07-01 11:00:11 +03:00
parent f4d5d1e48d
commit 24d58a11de
2 changed files with 289 additions and 107 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

394
src/fPreferences.lfm
View File

@ -3828,7 +3828,7 @@ object frmPreferences: TfrmPreferences
ItemHeight = 0
OnChange = cmbModelRot1Change
TabOrder = 6
Text = 'cmbModelRot1'
Text = ''
end
object chkRot1AzMinMax: TCheckBox
AnchorSideLeft.Control = chkRot1RunRotCtld
@ -4276,7 +4276,7 @@ object frmPreferences: TfrmPreferences
ItemHeight = 0
OnChange = cmbModelRot2Change
TabOrder = 6
Text = 'cmbModelRot2'
Text = ''
end
object chkRot2AzMinMax: TCheckBox
AnchorSideLeft.Control = chkRot2RunRotCtld
@ -4335,61 +4335,94 @@ object frmPreferences: TfrmPreferences
end
object tabModes: TTabSheet
Caption = 'Modes'
ClientHeight = 672
ClientWidth = 836
ClientHeight = 621
ClientWidth = 845
object GroupBox35: TGroupBox
Left = 14
AnchorSideLeft.Control = tabModes
AnchorSideTop.Control = GroupBox39
AnchorSideTop.Side = asrBottom
Left = 12
Height = 73
Top = 267
Top = 266
Width = 561
BorderSpacing.Left = 12
BorderSpacing.Top = 24
Caption = ' User defined digital modes (use , as delimitter)'
ClientHeight = 55
ClientWidth = 559
TabOrder = 0
object edtDigiModes: TEdit
Left = 7
AnchorSideLeft.Control = GroupBox35
AnchorSideTop.Control = GroupBox35
Left = 6
Height = 34
Top = 15
Top = 6
Width = 536
BorderSpacing.Left = 6
BorderSpacing.Top = 6
CharCase = ecUppercase
TabOrder = 0
end
end
object GroupBox37: TGroupBox
Left = 14
Height = 224
Top = 11
AnchorSideLeft.Control = tabModes
AnchorSideTop.Control = tabModes
Left = 12
Height = 230
Top = 12
Width = 208
BorderSpacing.Left = 12
BorderSpacing.Top = 12
Caption = ' Radio one '
ClientHeight = 222
ClientHeight = 212
ClientWidth = 206
TabOrder = 1
object Label28: TLabel
Left = 13
AnchorSideLeft.Control = GroupBox37
AnchorSideTop.Control = GroupBox37
Left = 12
Height = 17
Top = 18
Width = 39
Top = 12
Width = 36
BorderSpacing.Left = 12
BorderSpacing.Top = 12
Caption = 'Mode'
ParentColor = False
end
object Label29: TLabel
Left = 77
AnchorSideLeft.Control = Label28
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Label28
Left = 81
Height = 17
Top = 18
Width = 72
Top = 12
Width = 69
BorderSpacing.Left = 33
Caption = 'Bandwidth'
ParentColor = False
end
object Label30: TLabel
Left = 11
AnchorSideLeft.Control = Label28
AnchorSideTop.Control = edtCW1
AnchorSideTop.Side = asrCenter
Left = 12
Height = 17
Top = 43
Width = 23
Top = 45
Width = 22
Caption = 'CW'
ParentColor = False
end
object edtCW1: TSpinEdit
Left = 77
AnchorSideLeft.Control = Label29
AnchorSideTop.Control = Label29
AnchorSideRight.Control = Label29
AnchorSideRight.Side = asrBottom
Left = 81
Height = 34
Top = 39
Width = 81
Top = 36
Width = 69
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 24
Increment = 50
MaxValue = 3000
MinValue = -1
@ -4397,24 +4430,40 @@ object frmPreferences: TfrmPreferences
Value = 500
end
object Label35: TLabel
Left = 169
AnchorSideLeft.Control = edtCW1
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtCW1
AnchorSideTop.Side = asrCenter
Left = 156
Height = 17
Top = 43
Top = 45
Width = 17
BorderSpacing.Left = 6
Caption = 'Hz'
ParentColor = False
end
object Label36: TLabel
Left = 169
AnchorSideLeft.Control = Label35
AnchorSideTop.Control = edtSSB1
AnchorSideTop.Side = asrCenter
Left = 156
Height = 17
Top = 75
Top = 79
Width = 17
Caption = 'Hz'
ParentColor = False
end
object edtSSB1: TSpinEdit
Left = 77
AnchorSideLeft.Control = edtCW1
AnchorSideTop.Control = edtCW1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = edtCW1
AnchorSideRight.Side = asrBottom
Left = 81
Height = 34
Top = 71
Width = 81
Top = 70
Width = 69
Anchors = [akTop, akLeft, akRight]
Increment = 50
MaxValue = 3000
MinValue = -1
@ -4422,24 +4471,38 @@ object frmPreferences: TfrmPreferences
Value = 1800
end
object Label31: TLabel
Left = 10
AnchorSideLeft.Control = Label28
AnchorSideTop.Control = edtSSB1
AnchorSideTop.Side = asrCenter
Left = 12
Height = 17
Top = 75
Top = 79
Width = 25
Caption = 'SSB'
ParentColor = False
end
object Label32: TLabel
Left = 11
AnchorSideLeft.Control = Label28
AnchorSideTop.Control = edtRTTY1
AnchorSideTop.Side = asrCenter
Left = 12
Height = 17
Top = 106
Width = 36
Top = 113
Width = 33
Caption = 'RTTY'
ParentColor = False
end
object edtRTTY1: TSpinEdit
Left = 77
AnchorSideLeft.Control = edtCW1
AnchorSideTop.Control = edtSSB1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = edtCW1
AnchorSideRight.Side = asrBottom
Left = 81
Height = 34
Top = 102
Width = 81
Top = 104
Width = 69
Anchors = [akTop, akLeft, akRight]
Increment = 50
MaxValue = 3000
MinValue = -1
@ -4447,24 +4510,38 @@ object frmPreferences: TfrmPreferences
Value = 500
end
object Label37: TLabel
Left = 169
AnchorSideLeft.Control = Label35
AnchorSideTop.Control = edtRTTY1
AnchorSideTop.Side = asrCenter
Left = 156
Height = 17
Top = 106
Top = 104
Width = 17
Caption = 'Hz'
ParentColor = False
end
object Label38: TLabel
Left = 169
AnchorSideLeft.Control = Label35
AnchorSideTop.Control = edtAM1
AnchorSideTop.Side = asrCenter
Left = 156
Height = 17
Top = 139
Top = 147
Width = 17
Caption = 'Hz'
ParentColor = False
end
object edtAM1: TSpinEdit
Left = 77
AnchorSideLeft.Control = edtCW1
AnchorSideTop.Control = edtRTTY1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = edtCW1
AnchorSideRight.Side = asrBottom
Left = 81
Height = 34
Top = 133
Width = 81
Top = 138
Width = 69
Anchors = [akTop, akLeft, akRight]
Increment = 100
MaxValue = 6000
MinValue = -1
@ -4472,24 +4549,38 @@ object frmPreferences: TfrmPreferences
Value = 3000
end
object Label33: TLabel
Left = 11
AnchorSideLeft.Control = Label28
AnchorSideTop.Control = edtAM1
AnchorSideTop.Side = asrCenter
Left = 12
Height = 17
Top = 139
Width = 23
Top = 147
Width = 21
Caption = 'AM'
ParentColor = False
end
object Label34: TLabel
Left = 11
AnchorSideLeft.Control = Label28
AnchorSideTop.Control = edtFM1
AnchorSideTop.Side = asrCenter
Left = 12
Height = 17
Top = 170
Width = 21
Top = 181
Width = 20
Caption = 'FM'
ParentColor = False
end
object edtFM1: TSpinEdit
Left = 77
AnchorSideLeft.Control = edtCW1
AnchorSideTop.Control = edtAM1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = edtCW1
AnchorSideRight.Side = asrBottom
Left = 81
Height = 34
Top = 166
Width = 81
Top = 172
Width = 69
Anchors = [akTop, akLeft, akRight]
Increment = 100
MaxValue = 6000
MinValue = -1
@ -4497,48 +4588,77 @@ object frmPreferences: TfrmPreferences
Value = 2500
end
object Label39: TLabel
Left = 169
AnchorSideLeft.Control = Label35
AnchorSideTop.Control = edtFM1
AnchorSideTop.Side = asrCenter
Left = 156
Height = 17
Top = 170
Top = 181
Width = 17
Caption = 'Hz'
ParentColor = False
end
end
object GroupBox39: TGroupBox
Left = 246
Height = 224
Top = 11
AnchorSideLeft.Control = GroupBox37
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = tabModes
Left = 232
Height = 230
Top = 12
Width = 208
BorderSpacing.Left = 12
BorderSpacing.Top = 12
Caption = ' Radio two '
ClientHeight = 222
ClientHeight = 212
ClientWidth = 206
TabOrder = 2
object Label110: TLabel
Left = 13
AnchorSideLeft.Control = GroupBox39
AnchorSideTop.Control = GroupBox39
Left = 12
Height = 17
Top = 18
Width = 39
Top = 12
Width = 36
BorderSpacing.Left = 12
BorderSpacing.Top = 12
Caption = 'Mode'
ParentColor = False
end
object Label113: TLabel
Left = 77
AnchorSideLeft.Control = Label110
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Label110
Left = 81
Height = 17
Top = 18
Width = 72
Top = 12
Width = 69
BorderSpacing.Left = 33
Caption = 'Bandwidth'
ParentColor = False
end
object Label114: TLabel
Left = 11
AnchorSideLeft.Control = Label110
AnchorSideTop.Control = edtCW2
AnchorSideTop.Side = asrCenter
Left = 12
Height = 17
Top = 43
Width = 23
Top = 45
Width = 22
Caption = 'CW'
ParentColor = False
end
object edtCW2: TSpinEdit
Left = 77
AnchorSideLeft.Control = Label113
AnchorSideTop.Control = Label113
AnchorSideRight.Control = Label113
AnchorSideRight.Side = asrBottom
Left = 81
Height = 34
Top = 39
Width = 81
Top = 36
Width = 69
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 24
Increment = 50
MaxValue = 3000
MinValue = -1
@ -4546,24 +4666,40 @@ object frmPreferences: TfrmPreferences
Value = 500
end
object Label115: TLabel
Left = 169
AnchorSideLeft.Control = edtCW2
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = edtCW2
AnchorSideTop.Side = asrCenter
Left = 156
Height = 17
Top = 43
Top = 45
Width = 17
BorderSpacing.Left = 6
Caption = 'Hz'
ParentColor = False
end
object Label116: TLabel
Left = 169
AnchorSideLeft.Control = Label115
AnchorSideTop.Control = edtSSB2
AnchorSideTop.Side = asrCenter
Left = 156
Height = 17
Top = 75
Top = 79
Width = 17
Caption = 'Hz'
ParentColor = False
end
object edtSSB2: TSpinEdit
Left = 77
AnchorSideLeft.Control = Label113
AnchorSideTop.Control = edtCW2
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Label113
AnchorSideRight.Side = asrBottom
Left = 81
Height = 34
Top = 71
Width = 81
Top = 70
Width = 69
Anchors = [akTop, akLeft, akRight]
Increment = 50
MaxValue = 3000
MinValue = -1
@ -4571,24 +4707,38 @@ object frmPreferences: TfrmPreferences
Value = 1800
end
object Label117: TLabel
Left = 10
AnchorSideLeft.Control = Label110
AnchorSideTop.Control = edtSSB2
AnchorSideTop.Side = asrCenter
Left = 12
Height = 17
Top = 75
Top = 79
Width = 25
Caption = 'SSB'
ParentColor = False
end
object Label118: TLabel
Left = 11
AnchorSideLeft.Control = Label110
AnchorSideTop.Control = edtRTTY2
AnchorSideTop.Side = asrCenter
Left = 12
Height = 17
Top = 106
Width = 36
Top = 113
Width = 33
Caption = 'RTTY'
ParentColor = False
end
object edtRTTY2: TSpinEdit
Left = 77
AnchorSideLeft.Control = Label113
AnchorSideTop.Control = edtSSB2
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Label113
AnchorSideRight.Side = asrBottom
Left = 81
Height = 34
Top = 102
Width = 81
Top = 104
Width = 69
Anchors = [akTop, akLeft, akRight]
Increment = 50
MaxValue = 3000
MinValue = -1
@ -4596,24 +4746,38 @@ object frmPreferences: TfrmPreferences
Value = 500
end
object Label119: TLabel
Left = 169
AnchorSideLeft.Control = Label115
AnchorSideTop.Control = edtRTTY2
AnchorSideTop.Side = asrCenter
Left = 156
Height = 17
Top = 106
Top = 113
Width = 17
Caption = 'Hz'
ParentColor = False
end
object Label120: TLabel
Left = 169
AnchorSideLeft.Control = Label115
AnchorSideTop.Control = edtAM2
AnchorSideTop.Side = asrCenter
Left = 156
Height = 17
Top = 139
Top = 147
Width = 17
Caption = 'Hz'
ParentColor = False
end
object edtAM2: TSpinEdit
Left = 77
AnchorSideLeft.Control = Label113
AnchorSideTop.Control = edtRTTY2
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Label113
AnchorSideRight.Side = asrBottom
Left = 81
Height = 34
Top = 133
Width = 81
Top = 138
Width = 69
Anchors = [akTop, akLeft, akRight]
Increment = 100
MaxValue = 6000
MinValue = -1
@ -4621,24 +4785,38 @@ object frmPreferences: TfrmPreferences
Value = 3000
end
object Label121: TLabel
Left = 11
AnchorSideLeft.Control = Label110
AnchorSideTop.Control = edtAM2
AnchorSideTop.Side = asrCenter
Left = 12
Height = 17
Top = 139
Width = 23
Top = 147
Width = 21
Caption = 'AM'
ParentColor = False
end
object Label122: TLabel
Left = 11
AnchorSideLeft.Control = Label110
AnchorSideTop.Control = edtFM2
AnchorSideTop.Side = asrCenter
Left = 12
Height = 17
Top = 170
Width = 21
Top = 181
Width = 20
Caption = 'FM'
ParentColor = False
end
object edtFM2: TSpinEdit
Left = 77
AnchorSideLeft.Control = Label113
AnchorSideTop.Control = edtAM2
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Label113
AnchorSideRight.Side = asrBottom
Left = 81
Height = 34
Top = 166
Width = 81
Top = 172
Width = 69
Anchors = [akTop, akLeft, akRight]
Increment = 100
MaxValue = 6000
MinValue = -1
@ -4646,11 +4824,15 @@ object frmPreferences: TfrmPreferences
Value = 2500
end
object Label123: TLabel
Left = 169
AnchorSideLeft.Control = Label115
AnchorSideTop.Control = edtFM2
AnchorSideTop.Side = asrCenter
Left = 156
Height = 17
Top = 170
Top = 181
Width = 17
Caption = 'Hz'
ParentColor = False
end
end
end

2
src/uVersion.pas
View File

@ -21,7 +21,7 @@ const
cRELEAS = 0;
cBUILD = 1;
cBUILD_DATE = '2022-06-08';
cBUILD_DATE = '2022-06-30';
implementation