📄 long.lfm
字号:
object LongFrame: TLongFrame
Height = 311
Width = 527
object Splitter1: TSplitter
Cursor = crVSplit
Height = 3
Top = 189
Width = 527
Align = alTop
Beveled = True
Color = 170
ParentColor = False
ResizeAnchor = akTop
end
object DBGrid: TDBGrid
Height = 163
Top = 26
Width = 527
Align = alTop
DataSource = DataSource
FixedColor = clBtnFace
FixedHotColor = cl3DLight
Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColumnMove, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
OptionsExtra = [dgeAutoColumns, dgeCheckboxColumn]
ParentColor = False
TabOrder = 0
TabStop = True
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
end
object ToolBar: TPanel
Height = 26
Width = 527
Align = alTop
BevelOuter = bvNone
ClientHeight = 26
ClientWidth = 527
TabOrder = 1
object Panel1: TPanel
Left = 1
Height = 24
Top = 1
Width = 428
BevelOuter = bvNone
ClientHeight = 24
ClientWidth = 428
Color = 170
ParentColor = False
TabOrder = 0
object btOpen: TSpeedButton
Left = 1
Height = 22
Top = 1
Width = 82
Caption = 'Open'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btOpenClick
end
object btClose: TSpeedButton
Left = 84
Height = 22
Top = 1
Width = 82
Caption = 'Close'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btCloseClick
end
object DBNavigator: TDBNavigator
Left = 167
Height = 22
Top = 1
Width = 260
BevelOuter = bvNone
ClientHeight = 22
ClientWidth = 260
Color = clBtnFace
DataSource = DataSource
Flat = True
ParentColor = False
TabOrder = 0
end
end
end
object meComments: TDBMemo
Height = 93
Top = 218
Width = 527
Align = alClient
DataField = 'VALUE'
DataSource = DataSource
Lines.Strings = (
'meComments'
)
ScrollBars = ssVertical
TabOrder = 2
end
object ToolBar1: TPanel
Height = 26
Top = 192
Width = 527
Align = alTop
BevelOuter = bvNone
ClientHeight = 26
ClientWidth = 527
TabOrder = 3
object Panel2: TPanel
Left = 1
Height = 24
Top = 1
Width = 250
BevelOuter = bvNone
ClientHeight = 24
ClientWidth = 250
Color = 170
ParentColor = False
TabOrder = 0
object btSave: TSpeedButton
Left = 84
Height = 22
Top = 1
Width = 82
Caption = 'Save to file'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btSaveClick
end
object btLoad: TSpeedButton
Left = 1
Height = 22
Top = 1
Width = 82
Caption = 'Load from file'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btLoadClick
end
object btClear: TSpeedButton
Left = 167
Height = 22
Top = 1
Width = 82
Caption = 'Clear'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btClearClick
end
end
end
object DataSource: TDatasource
DataSet = Query
left = 440
top = 32
end
object Query: TSmartQuery
SQL.Strings = (
'SELECT L.*, RowId FROM ODAC_Long L'
)
Debug = True
Options.AutoClose = False
Options.FieldsAsString = False
Options.DeferredLobRead = False
Options.ScrollableCursor = False
Options.FieldsOrigin = False
Options.DefaultValues = False
Options.NumberRange = False
Options.QueryRecCount = False
Options.AutoPrepare = False
Options.ReturnParams = False
Options.FlatBuffers = False
Options.DetailDelay = 0
left = 408
top = 32
end
object OpenDialog: TOpenDialog
Title = 'Open'
InitialDir = '.'
left = 240
top = 259
end
object SaveDialog: TSaveDialog
Title = 'Save As'
InitialDir = '.'
left = 272
top = 259
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -