📄 changenotification.lfm
字号:
object ChangeNotificationFrame: TChangeNotificationFrame
Height = 391
Width = 757
object Splitter1: TSplitter
Left = 289
Height = 274
Top = 25
Width = 3
Beveled = True
Color = 170
ParentColor = False
end
object Splitter2: TSplitter
Cursor = crVSplit
Height = 3
Top = 299
Width = 757
Align = alBottom
Beveled = True
Color = 170
ParentColor = False
ResizeAnchor = akBottom
end
object ToolBar: TPanel
Height = 25
Width = 757
Align = alTop
BevelOuter = bvNone
TabOrder = 0
end
object Panel1: TPanel
Height = 24
Width = 274
BevelOuter = bvNone
ClientHeight = 24
ClientWidth = 274
Color = 170
ParentColor = False
TabOrder = 1
object btOpen: TSpeedButton
Left = 1
Height = 22
Top = 1
Width = 70
Caption = 'Open'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btOpenClick
end
object btClose: TSpeedButton
Left = 72
Height = 22
Top = 1
Width = 69
Caption = 'Close'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btCloseClick
end
object Panel3: TPanel
Left = 142
Height = 22
Top = 1
Width = 131
BevelOuter = bvNone
ClientHeight = 22
ClientWidth = 131
ParentColor = False
TabOrder = 0
object cbReflect: TCheckBox
Left = 20
Height = 19
Top = 4
Width = 104
Caption = 'Reflect changes'
Checked = True
OnClick = cbReflectClick
State = cbChecked
TabOrder = 0
end
end
end
object Panel2: TPanel
Height = 274
Top = 25
Width = 289
Align = alLeft
BevelOuter = bvNone
ClientHeight = 274
ClientWidth = 289
TabOrder = 2
object DBGrid1: TDBGrid
Height = 227
Top = 47
Width = 289
Align = alClient
DataSource = DataSource1
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 ToolBar1: TPanel
Height = 47
Width = 289
Align = alTop
BevelOuter = bvNone
ClientHeight = 47
ClientWidth = 289
TabOrder = 1
object Label6: TLabel
Left = 6
Height = 16
Top = 4
Width = 69
Caption = 'Session 1'
Font.Color = clMaroon
Font.Height = -13
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentColor = False
end
object Panel8: TPanel
Left = 1
Height = 24
Top = 22
Width = 232
BevelOuter = bvNone
ClientHeight = 24
ClientWidth = 232
Color = 170
ParentColor = False
TabOrder = 0
object DBNavigator2: TDBNavigator
Left = 1
Height = 22
Top = 1
Width = 230
BevelOuter = bvNone
ClientHeight = 22
ClientWidth = 230
Color = clBtnFace
DataSource = DataSource1
Flat = True
ParentColor = False
TabOrder = 0
end
end
end
end
object Panel9: TPanel
Left = 292
Height = 274
Top = 25
Width = 465
Align = alClient
BevelOuter = bvNone
Caption = 'Panel2'
ClientHeight = 274
ClientWidth = 465
TabOrder = 3
object DBGrid2: TDBGrid
Height = 227
Top = 47
Width = 465
Align = alClient
DataSource = DataSource2
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 ToolBar2: TPanel
Height = 47
Width = 465
Align = alTop
BevelOuter = bvNone
ClientHeight = 47
ClientWidth = 465
TabOrder = 1
object Label7: TLabel
Left = 6
Height = 16
Top = 3
Width = 69
Caption = 'Session 2'
Font.Color = clMaroon
Font.Height = -13
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentColor = False
end
object Panel10: TPanel
Left = 1
Height = 24
Top = 22
Width = 232
BevelOuter = bvNone
ClientHeight = 24
ClientWidth = 232
Color = 170
ParentColor = False
TabOrder = 0
object DBNavigator3: TDBNavigator
Left = 1
Height = 22
Top = 1
Width = 230
BevelOuter = bvNone
ClientHeight = 22
ClientWidth = 230
Color = clBtnFace
DataSource = DataSource2
Flat = True
ParentColor = False
TabOrder = 0
end
end
end
end
object meLog: TMemo
Height = 89
Top = 302
Width = 757
Align = alBottom
ScrollBars = ssVertical
TabOrder = 4
end
object Query1: TOraQuery
SQL.Strings = (
'SELECT D.*, RowId FROM Scott.Dept D'
)
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
Options.ReflectChangeNotify = True
ChangeNotification = ChangeNotification
left = 24
top = 199
end
object DataSource1: TDatasource
DataSet = Query1
left = 56
top = 199
end
object OraSession2: TOraSession
LoginPrompt = False
left = 313
top = 200
end
object Query2: TOraQuery
Session = OraSession2
SQL.Strings = (
'SELECT D.*, RowId FROM Scott.Dept D'
)
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 = 352
top = 199
end
object DataSource2: TDatasource
DataSet = Query2
left = 384
top = 199
end
object ChangeNotification: TOraChangeNotification
OnChange = ChangeNotificationChange
left = 96
top = 200
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -