paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-14 06:22:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Cosmetic changes: spinedits wider

Browse Source 
git-svn-id: trunk@63107 -
This commit is contained in:
michael 2020-05-01 14:06:02 +00:00
parent f213c8c84c
commit 11bcc95a26
1 changed files with 47 additions and 47 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

94
tools/lazdatadesktop/frmgeneratesql.lfm
View File

@ -8,7 +8,7 @@ object GenerateSQLForm: TGenerateSQLForm
ClientHeight = 395 ClientHeight = 395
ClientWidth = 812 ClientWidth = 812
OnCreate = FormCreate OnCreate = FormCreate
LCLVersion = '1.1' LCLVersion = '2.1.0.0'
object PCSQL: TPageControl object PCSQL: TPageControl
Left = 0 Left = 0
Height = 359 Height = 359
@ -25,17 +25,17 @@ object GenerateSQLForm: TGenerateSQLForm
ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.ControlsPerLine = 3 ChildSizing.ControlsPerLine = 3
ClientHeight = 325 ClientHeight = 328
ClientWidth = 804 ClientWidth = 802
OnResize = TSResize OnResize = TSResize
object POptions: TPanel object POptions: TPanel
Left = 0 Left = 0
Height = 325 Height = 328
Top = 0 Top = 0
Width = 254 Width = 254
Align = alLeft Align = alLeft
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 325 ClientHeight = 328
ClientWidth = 254 ClientWidth = 254
Constraints.MinWidth = 180 Constraints.MinWidth = 180
TabOrder = 0 TabOrder = 0
@ -53,8 +53,8 @@ object GenerateSQLForm: TGenerateSQLForm
object LSEIndent: TLabel object LSEIndent: TLabel
Left = 40 Left = 40
Height = 20 Height = 20
Top = 205 Top = 219
Width = 150 Width = 136
Alignment = taRightJustify Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
AutoSize = False AutoSize = False
@ -65,8 +65,8 @@ object GenerateSQLForm: TGenerateSQLForm
object LSELineLength: TLabel object LSELineLength: TLabel
Left = 36 Left = 36
Height = 20 Height = 20
Top = 234 Top = 248
Width = 154 Width = 138
Alignment = taRightJustify Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
AutoSize = False AutoSize = False
@ -76,7 +76,7 @@ object GenerateSQLForm: TGenerateSQLForm
end end
object CBTables: TComboBox object CBTables: TComboBox
Left = 4 Left = 4
Height = 24 Height = 31
Top = 26 Top = 26
Width = 238 Width = 238
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
@ -89,7 +89,7 @@ object GenerateSQLForm: TGenerateSQLForm
object BGenerate: TButton object BGenerate: TButton
Left = 4 Left = 4
Height = 25 Height = 25
Top = 296 Top = 299
Width = 238 Width = 238
Anchors = [akLeft, akRight, akBottom] Anchors = [akLeft, akRight, akBottom]
BorderSpacing.InnerBorder = 4 BorderSpacing.InnerBorder = 4
@ -99,27 +99,27 @@ object GenerateSQLForm: TGenerateSQLForm
TabOrder = 1 TabOrder = 1
end end
object SEindent: TTISpinEdit object SEindent: TTISpinEdit
Left = 204 Left = 184
Height = 18 Height = 29
Top = 202 Top = 216
Width = 34 Width = 56
Anchors = [akTop, akRight] Anchors = [akTop, akRight]
Link.TIPropertyName = 'Indent' Link.TIPropertyName = 'Indent'
TabOrder = 2 TabOrder = 2
end end
object SELineLength: TTISpinEdit object SELineLength: TTISpinEdit
Left = 205 Left = 184
Height = 18 Height = 29
Top = 231 Top = 245
Width = 34 Width = 56
Anchors = [akTop, akRight] Anchors = [akTop, akRight]
Link.TIPropertyName = 'LineLength' Link.TIPropertyName = 'LineLength'
TabOrder = 3 TabOrder = 3
end end
object CLBOptions: TTICheckGroup object CLBOptions: TTICheckGroup
Left = 6 Left = 6
Height = 144 Height = 152
Top = 50 Top = 61
Width = 234 Width = 234
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
Caption = 'Options' Caption = 'Options'
@ -134,10 +134,10 @@ object GenerateSQLForm: TGenerateSQLForm
) )
end end
object CBIgnoreSelection: TCheckBox object CBIgnoreSelection: TCheckBox
Left = 6 Left = 4
Height = 26 Height = 23
Top = 257 Top = 272
Width = 170 Width = 189
Caption = 'Create full table creation SQL' Caption = 'Create full table creation SQL'
TabOrder = 5 TabOrder = 5
end end
@ -147,19 +147,19 @@ object GenerateSQLForm: TGenerateSQLForm
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideRight.Control = PSelectFields AnchorSideRight.Control = PSelectFields
Left = 254 Left = 254
Height = 325 Height = 328
Top = 0 Top = 0
Width = 262 Width = 260
Align = alClient Align = alClient
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 325 ClientHeight = 328
ClientWidth = 262 ClientWidth = 260
TabOrder = 1 TabOrder = 1
object LLBKeyFields: TLabel object LLBKeyFields: TLabel
Left = 0 Left = 0
Height = 26 Height = 26
Top = 0 Top = 0
Width = 262 Width = 260
Align = alTop Align = alTop
Alignment = taCenter Alignment = taCenter
AutoSize = False AutoSize = False
@ -169,9 +169,9 @@ object GenerateSQLForm: TGenerateSQLForm
end end
object LBKeyFields: TListBox object LBKeyFields: TListBox
Left = 2 Left = 2
Height = 280 Height = 283
Top = 34 Top = 34
Width = 256 Width = 254
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
ItemHeight = 0 ItemHeight = 0
MultiSelect = True MultiSelect = True
@ -182,13 +182,13 @@ object GenerateSQLForm: TGenerateSQLForm
end end
end end
object PSelectFields: TPanel object PSelectFields: TPanel
Left = 516 Left = 514
Height = 325 Height = 328
Top = 0 Top = 0
Width = 288 Width = 288
Align = alRight Align = alRight
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 325 ClientHeight = 328
ClientWidth = 288 ClientWidth = 288
TabOrder = 2 TabOrder = 2
object Label2: TLabel object Label2: TLabel
@ -205,13 +205,13 @@ object GenerateSQLForm: TGenerateSQLForm
end end
object LBFields: TListBox object LBFields: TListBox
Left = 12 Left = 12
Height = 280 Height = 283
Top = 34 Top = 34
Width = 266 Width = 266
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
ItemHeight = 0 ItemHeight = 0
MultiSelect = True MultiSelect = True
ScrollWidth = 262 ScrollWidth = 264
Sorted = True Sorted = True
TabOrder = 0 TabOrder = 0
TopIndex = -1 TopIndex = -1
@ -220,8 +220,8 @@ object GenerateSQLForm: TGenerateSQLForm
end end
object TSSelect: TTabSheet object TSSelect: TTabSheet
Caption = '&Select' Caption = '&Select'
ClientHeight = 325 ClientHeight = 328
ClientWidth = 804 ClientWidth = 802
object MSelect: TMemo object MSelect: TMemo
Left = 8 Left = 8
Height = 317 Height = 317
@ -237,8 +237,8 @@ object GenerateSQLForm: TGenerateSQLForm
end end
object TSInsert: TTabSheet object TSInsert: TTabSheet
Caption = '&Insert' Caption = '&Insert'
ClientHeight = 325 ClientHeight = 328
ClientWidth = 804 ClientWidth = 802
object MInsert: TMemo object MInsert: TMemo
Left = 8 Left = 8
Height = 317 Height = 317
@ -254,8 +254,8 @@ object GenerateSQLForm: TGenerateSQLForm
end end
object TSUpdate: TTabSheet object TSUpdate: TTabSheet
Caption = '&Update' Caption = '&Update'
ClientHeight = 325 ClientHeight = 328
ClientWidth = 804 ClientWidth = 802
object MUpdate: TMemo object MUpdate: TMemo
Left = 8 Left = 8
Height = 317 Height = 317
@ -271,8 +271,8 @@ object GenerateSQLForm: TGenerateSQLForm
end end
object TSDelete: TTabSheet object TSDelete: TTabSheet
Caption = '&Delete' Caption = '&Delete'
ClientHeight = 325 ClientHeight = 328
ClientWidth = 804 ClientWidth = 802
object MDelete: TMemo object MDelete: TMemo
Left = 8 Left = 8
Height = 317 Height = 317
@ -288,8 +288,8 @@ object GenerateSQLForm: TGenerateSQLForm
end end
object TSCreate: TTabSheet object TSCreate: TTabSheet
Caption = 'Create table' Caption = 'Create table'
ClientHeight = 325 ClientHeight = 328
ClientWidth = 804 ClientWidth = 802
object MCreate: TMemo object MCreate: TMemo
Left = 8 Left = 8
Height = 317 Height = 317