fixed spinedt width.Todo: modes usage in other units, add Data mode code

This commit is contained in:
OH1KH 2022-08-26 21:25:09 +03:00
parent 64146a66c1
commit d4b5189aa7
2 changed files with 8 additions and 12 deletions

View File

@ -5,8 +5,8 @@ object frmPreferences: TfrmPreferences
Width = 1131
HelpType = htKeyword
HelpKeyword = 'help/h1.html'
HorzScrollBar.Page = 1094
VertScrollBar.Page = 703
HorzScrollBar.Page = 794
VertScrollBar.Page = 432
ActiveControl = lbPreferences
AutoScroll = True
BorderIcons = [biSystemMenu]
@ -56,7 +56,7 @@ object frmPreferences: TfrmPreferences
BorderSpacing.Left = 6
BorderSpacing.Top = 3
Caption = ' Internet connection '
ClientHeight = 111
ClientHeight = 127
ClientWidth = 339
TabOrder = 0
object lblintProxy: TLabel
@ -248,7 +248,7 @@ object frmPreferences: TfrmPreferences
Width = 626
BorderSpacing.Top = 9
Caption = ' Offsets and colors'
ClientHeight = 185
ClientHeight = 201
ClientWidth = 624
TabOrder = 7
object lblUtc: TLabel
@ -2140,7 +2140,7 @@ object frmPreferences: TfrmPreferences
BorderSpacing.Left = 6
BorderSpacing.Top = 4
Caption = ' rigctld '
ClientHeight = 70
ClientHeight = 86
ClientWidth = 655
TabOrder = 0
object lblRigctdPath: TLabel
@ -2374,7 +2374,7 @@ object frmPreferences: TfrmPreferences
Width = 511
BorderSpacing.Top = 3
Caption = 'Radio one serial parameters'
ClientHeight = 130
ClientHeight = 146
ClientWidth = 509
TabOrder = 11
object lblSerialRSpd: TLabel

View File

@ -3186,11 +3186,7 @@ begin
fraExportPref1.LoadExportPref;
lbPreferences.Selected[pgPreferences.ActivePageIndex] := True;
edtCW.Width := 60;
edtSSB.Width := 60;
edtRTTY.Width := 60;
edtAM.Width := 60;
edtFM.Width := 60;
chkSysUTCClick(nil);
TRXChanged := False;
@ -3297,7 +3293,7 @@ Begin
end;
edtRDevice.Text := cqrini.ReadString('TRX'+nr, 'device', '');
edtPoll.Text := cqrini.ReadString('TRX'+nr, 'poll', '500');
edtRadioName.Text := cqrini.ReadString('TRX'+nr, 'Desc', 'Radio 1');
edtRadioName.Text := cqrini.ReadString('TRX'+nr, 'Desc', '');
chkRSendCWR.Checked := cqrini.ReadBool('TRX'+nr, 'CWR', False);
chkRVfo.Checked:= cqrini.ReadBool('TRX'+nr, 'ChkVfo', True);
edtRRigCtldPort.Text := cqrini.ReadString('TRX'+nr, 'RigCtldPort', '4532');