jvcllaz: Fix compilation of JvXPCtrls demos in Linux. Some layout adjustments.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6945 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2019-05-25 15:47:10 +00:00
parent 10b4c81546
commit bc9e8f14dc
5 changed files with 27 additions and 17 deletions

View File

@ -2,10 +2,10 @@ object frmMain: TfrmMain
Left = 309
Height = 370
Top = 130
Width = 500
Width = 626
Caption = 'JvXPBar Demo'
ClientHeight = 370
ClientWidth = 500
ClientWidth = 626
Color = clBtnFace
Constraints.MinHeight = 370
Constraints.MinWidth = 500
@ -52,7 +52,6 @@ object frmMain: TfrmMain
ClientHeight = 345
ClientWidth = 204
Font.Color = clWindowText
Font.Height = -11
ParentFont = False
TabOrder = 0
object JvXPContainer1: TJvXPContainer
@ -541,12 +540,14 @@ object frmMain: TfrmMain
Left = 210
Height = 347
Top = 0
Width = 290
Width = 416
BoundLines = [blLeft, blTop, blRight, blBottom]
Caption = 'cntDetails'
Color = clCream
ParentColor = False
Align = alClient
Font.Color = clWindowText
ParentFont = False
object lbWelcome: TLabel
AnchorSideLeft.Control = cntDetails
AnchorSideTop.Control = cntDetails
@ -555,7 +556,7 @@ object frmMain: TfrmMain
Left = 9
Height = 15
Top = 9
Width = 280
Width = 406
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 8
BorderSpacing.Top = 8
@ -573,7 +574,7 @@ object frmMain: TfrmMain
Left = 9
Height = 25
Top = 48
Width = 75
Width = 88
Caption = 'Collapse All'
TabOrder = 0
OnClick = btnCollapseAllClick
@ -582,10 +583,10 @@ object frmMain: TfrmMain
AnchorSideLeft.Control = btnCollapseAll
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = btnCollapseAll
Left = 92
Left = 105
Height = 25
Top = 48
Width = 75
Width = 88
Caption = 'Expand All'
TabOrder = 1
BorderSpacing.Left = 8
@ -600,7 +601,7 @@ object frmMain: TfrmMain
Left = 9
Height = 25
Top = 81
Width = 158
Width = 184
Caption = 'Toggle Enable Mode'
TabOrder = 2
Anchors = [akTop, akLeft, akRight]
@ -616,7 +617,7 @@ object frmMain: TfrmMain
Left = 9
Height = 25
Top = 114
Width = 158
Width = 184
Caption = 'Toggle Visible Mode'
TabOrder = 3
Anchors = [akTop, akLeft, akRight]
@ -628,7 +629,7 @@ object frmMain: TfrmMain
AnchorSideTop.Control = btnToggleVisibleMode
AnchorSideTop.Side = asrBottom
Left = 9
Height = 17
Height = 29
Top = 163
Width = 97
Caption = 'Grouped'
@ -641,7 +642,7 @@ object frmMain: TfrmMain
Left = 0
Height = 23
Top = 347
Width = 500
Width = 626
Panels = <
item
Width = 50

View File

@ -1,11 +1,13 @@
<?xml version="1.0" encoding="UTF-8"?>
<CONFIG>
<ProjectOptions>
<Version Value="11"/>
<Version Value="12"/>
<PathDelim Value="\"/>
<General>
<Flags>
<CompatibilityMode Value="True"/>
</Flags>
<SessionStorage Value="InProjectDir"/>
<MainUnit Value="0"/>
<Title Value="XPBarDemo"/>
<Scaled Value="True"/>
<ResourceType Value="res"/>

View File

@ -1,14 +1,20 @@
<?xml version="1.0" encoding="UTF-8"?>
<CONFIG>
<ProjectOptions>
<Version Value="11"/>
<Version Value="12"/>
<PathDelim Value="\"/>
<General>
<Flags>
<CompatibilityMode Value="True"/>
</Flags>
<SessionStorage Value="InProjectDir"/>
<MainUnit Value="0"/>
<Title Value="SimpleDemo"/>
<Scaled Value="True"/>
<ResourceType Value="res"/>
<UseXPManifest Value="True"/>
<XPManifest>
<DpiAware Value="True"/>
</XPManifest>
</General>
<BuildModes Count="1">
<Item1 Name="Default" Default="True"/>

View File

@ -7,6 +7,7 @@ uses
{$R *.res}
begin
Application.Scaled:=True;
Application.Initialize;
Application.CreateForm(TfrmMain, frmMain);
Application.Run;

View File

@ -338,7 +338,7 @@ type
implementation
{$R ../../resource/JvXPCore.res}
{$R ../../resource/jvxpcore.res}
//=== { TJvXPCustomControl } =================================================