FOME-Tech
/
openblt
mirror of https://github.com/FOME-Tech/openblt.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Refs #894. Limited the selectable RS232 baudrates in MicroBoot to those that are currently supported in LibOpenBLT. 

git-svn-id: https://svn.code.sf.net/p/openblt/code/trunk@724 5dc33758-31d5-4daf-9ae8-b24bf3d40d73
This commit is contained in:
Frank Voorburg 2019-11-06 17:15:50 +00:00
parent 8a63823005
commit fa59ddedfb
3 changed files with 20 additions and 26 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
Host/MicroBoot.exe
View File

Binary file not shown.

13
Host/Source/MicroBoot/MicroBoot.lps
View File

@ -47,7 +47,7 @@
<Filename Value="configgroups.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="ConfigGroups"/>
<EditorIndex Value="2"/>
<EditorIndex Value="3"/>
<TopLine Value="470"/>
<CursorPos X="37" Y="495"/>
<UsageCount Value="84"/>
@ -72,7 +72,7 @@
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="SessionXcpDialog"/>
<EditorIndex Value="3"/>
<EditorIndex Value="4"/>
<TopLine Value="226"/>
<CursorPos X="52" Y="230"/>
<UsageCount Value="76"/>
@ -95,10 +95,13 @@
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="TransportXcpRs232Dialog"/>
<EditorIndex Value="-1"/>
<IsVisibleTab Value="True"/>
<EditorIndex Value="2"/>
<TopLine Value="14"/>
<CursorPos X="47" Y="34"/>
<UsageCount Value="62"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
</Unit8>
<Unit9>
<Filename Value="transportxcpcandialog.pas"/>
@ -107,13 +110,11 @@
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="TransportXcpCanDialog"/>
<IsVisibleTab Value="True"/>
<EditorIndex Value="1"/>
<TopLine Value="212"/>
<CursorPos X="75" Y="239"/>
<UsageCount Value="62"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
</Unit9>
<Unit10>
<Filename Value="transportxcpusbdialog.pas"/>
@ -155,7 +156,7 @@
<Filename Value="firmwareupdate.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="FirmwareUpdate"/>
<EditorIndex Value="4"/>
<EditorIndex Value="5"/>
<TopLine Value="896"/>
<CursorPos Y="930"/>
<UsageCount Value="49"/>

33
Host/Source/MicroBoot/transportxcprs232dialog.lfm
View File

@ -8,12 +8,12 @@ object TransportXcpRs232Form: TTransportXcpRs232Form
ClientWidth = 407
OnCreate = FormCreate
OnDestroy = FormDestroy
LCLVersion = '1.6.2.0'
LCLVersion = '1.6.4.0'
object LlbCommunication: TLabel
Left = 8
Height = 17
Height = 15
Top = 8
Width = 96
Width = 87
Caption = 'Communication'
Font.Style = [fsBold]
ParentColor = False
@ -21,11 +21,11 @@ object TransportXcpRs232Form: TTransportXcpRs232Form
end
object CmbDevice: TComboBox
Left = 96
Height = 29
Height = 23
Hint = 'Name of the communication device'
Top = 35
Width = 192
ItemHeight = 0
ItemHeight = 15
ParentShowHint = False
ShowHint = True
TabOrder = 0
@ -33,45 +33,38 @@ object TransportXcpRs232Form: TTransportXcpRs232Form
end
object LblDevice: TLabel
Left = 24
Height = 17
Height = 15
Top = 38
Width = 41
Width = 38
Caption = 'Device:'
ParentColor = False
end
object CmbBaudrate: TComboBox
Left = 96
Height = 27
Height = 23
Hint = 'The communication speed in bits per second, as a 32-bit value (Default = 57600)'
Top = 75
Width = 192
ItemHeight = 0
ItemIndex = 0
ItemHeight = 15
ItemIndex = 3
Items.Strings = (
'1200'
'2400'
'4800'
'9600'
'14400'
'19200'
'38400'
'56000'
'57600'
'115200'
'128000'
'256000'
)
ParentShowHint = False
ShowHint = True
Style = csDropDownList
TabOrder = 1
Text = '1200'
Text = '57600'
end
object LblBaudrate: TLabel
Left = 24
Height = 17
Height = 15
Top = 78
Width = 55
Width = 50
Caption = 'Baudrate:'
ParentColor = False
end