mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-09 19:48:07 +02:00
80 lines
1.6 KiB
Plaintext
80 lines
1.6 KiB
Plaintext
object formSqlite: TformSqlite
|
|
Left = 154
|
|
Height = 240
|
|
Top = 362
|
|
Width = 257
|
|
Caption = 'formSqlite'
|
|
ClientHeight = 240
|
|
ClientWidth = 257
|
|
LCLVersion = '1.1'
|
|
object btnConnect: TButton
|
|
Left = 8
|
|
Height = 25
|
|
Top = 40
|
|
Width = 112
|
|
Caption = 'Connect'
|
|
OnClick = btnConnectClick
|
|
TabOrder = 0
|
|
end
|
|
object DBEdit1: TDBEdit
|
|
Left = 8
|
|
Height = 23
|
|
Top = 104
|
|
Width = 80
|
|
DataField = 'FirstFieldStr'
|
|
DataSource = SqliteDatasource
|
|
CharCase = ecNormal
|
|
MaxLength = 0
|
|
TabOrder = 1
|
|
end
|
|
object DBNavigator1: TDBNavigator
|
|
Left = 8
|
|
Height = 25
|
|
Top = 72
|
|
Width = 241
|
|
BevelOuter = bvNone
|
|
ChildSizing.EnlargeHorizontal = crsScaleChilds
|
|
ChildSizing.EnlargeVertical = crsScaleChilds
|
|
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
|
ChildSizing.ShrinkVertical = crsScaleChilds
|
|
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
|
ChildSizing.ControlsPerLine = 100
|
|
ClientHeight = 25
|
|
ClientWidth = 241
|
|
DataSource = SqliteDatasource
|
|
Options = []
|
|
TabOrder = 2
|
|
end
|
|
object btnCreateDB: TButton
|
|
Left = 136
|
|
Height = 25
|
|
Top = 8
|
|
Width = 113
|
|
Caption = 'Create DB'
|
|
OnClick = btnCreateDBClick
|
|
TabOrder = 3
|
|
end
|
|
object Edit1: TEdit
|
|
Left = 8
|
|
Height = 23
|
|
Top = 152
|
|
Width = 80
|
|
ReadOnly = True
|
|
TabOrder = 4
|
|
Text = 'Edit1'
|
|
end
|
|
object btnSaveDB: TButton
|
|
Left = 137
|
|
Height = 25
|
|
Top = 40
|
|
Width = 112
|
|
Caption = 'Save DB'
|
|
OnClick = btnSaveDBClick
|
|
TabOrder = 5
|
|
end
|
|
object SqliteDatasource: TDatasource
|
|
left = 136
|
|
top = 104
|
|
end
|
|
end
|