📄 smartrefresh.nfm
字号:
inherited SmartRefreshFrame: TSmartRefreshFrame
object Splitter1: TSplitter
Left = 377
Top = 57
Width = 3
Height = 220
Cursor = crHSplit
Beveled = True
Color = 170
ParentColor = False
end
object Panel1: TPanel
Left = 0
Top = 57
Width = 377
Height = 220
Align = alLeft
BevelOuter = bvNone
TabOrder = 0
object DBGrid1: TDBGrid
Left = 0
Top = 47
Width = 377
Height = 173
Align = alClient
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
end
object ToolBar1: TPanel
Left = 0
Top = 0
Width = 377
Height = 47
Align = alTop
BevelOuter = bvNone
TabOrder = 1
object Label1: TLabel
Left = 6
Top = 4
Width = 69
Height = 16
Caption = 'Session 1'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -13
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
end
object Panel4: TPanel
Left = 1
Top = 22
Width = 232
Height = 24
BevelOuter = bvNone
Color = 170
TabOrder = 0
object DBNavigator1: TDBNavigator
Left = 1
Top = 1
Width = 230
Height = 22
DataSource = DataSource1
Flat = True
TabOrder = 0
end
end
end
end
object ToolBar: TPanel
Left = 0
Top = 0
Width = 443
Height = 57
Align = alTop
BevelOuter = bvNone
TabOrder = 1
object Panel3: TPanel
Left = 1
Top = 1
Width = 357
Height = 47
BevelOuter = bvNone
Color = 170
TabOrder = 0
object btOpen: TSpeedButton
Left = 1
Top = 1
Width = 118
Height = 22
Caption = 'Open'
Flat = True
Transparent = False
OnClick = btOpenClick
end
object btClose: TSpeedButton
Left = 120
Top = 1
Width = 118
Height = 22
Caption = 'Close'
Flat = True
Transparent = False
OnClick = btCloseClick
end
object btCommit: TSpeedButton
Left = 239
Top = 1
Width = 117
Height = 22
Caption = 'Commit'
Flat = True
Transparent = False
OnClick = btCommitClick
end
object Panel5: TPanel
Left = 1
Top = 24
Width = 118
Height = 22
BevelOuter = bvNone
TabOrder = 0
object Label3: TLabel
Left = 0
Top = 3
Width = 44
Height = 15
Alignment = taCenter
AutoSize = False
Caption = 'Interval'
Layout = tlCenter
end
object edInterval: TEdit
Left = 44
Top = 2
Width = 69
Height = 21
TabOrder = 0
Text = 'edInterval'
OnExit = edIntervalExit
end
end
object cbAutoCommit: TCheckBox
Left = 239
Top = 24
Width = 117
Height = 22
Caption = 'AutoCommit'
Color = clBtnFace
ParentColor = False
TabOrder = 1
OnClick = cbAutoCommitClick
end
object cbUseSameEvent: TCheckBox
Left = 120
Top = 24
Width = 118
Height = 22
Caption = 'Use Same Event'
Color = clBtnFace
ParentColor = False
TabOrder = 2
OnClick = cbUseSameEventClick
end
end
end
object Panel2: TPanel
Left = 380
Top = 57
Width = 63
Height = 220
Align = alClient
BevelOuter = bvNone
Caption = 'Panel2'
TabOrder = 2
object DBGrid2: TDBGrid
Left = 0
Top = 47
Width = 63
Height = 173
Align = alClient
DataSource = DataSource2
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
end
object ToolBar2: TPanel
Left = 0
Top = 0
Width = 63
Height = 47
Align = alTop
BevelOuter = bvNone
TabOrder = 1
object Label2: TLabel
Left = 6
Top = 3
Width = 69
Height = 16
Caption = 'Session 2'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -13
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
end
object Panel6: TPanel
Left = 1
Top = 22
Width = 232
Height = 24
BevelOuter = bvNone
Color = 170
TabOrder = 0
object DBNavigator2: TDBNavigator
Left = 1
Top = 1
Width = 230
Height = 22
DataSource = DataSource1
Flat = True
TabOrder = 0
end
end
end
end
object Query1: TSmartQuery
SmartRefresh = True
AfterSmartRefresh = Query1AfterSmartRefresh
Session = ODACForm.OraSession
SQL.Strings = (
'SELECT D.*, RowId FROM Scott.Dept D'
'')
LockMode = lmNone
Left = 504
Top = 8
end
object DataSource1: TDataSource
DataSet = Query1
Left = 24
Top = 80
end
object DataSource2: TDataSource
DataSet = Query2
Left = 424
Top = 20
end
object OraSession2: TOraSession
ConnectPrompt = False
BeforeConnect = OraSession2BeforeConnect
Left = 625
Top = 32
end
object Query2: TSmartQuery
SmartRefresh = True
AfterSmartRefresh = Query2AfterSmartRefresh
Session = OraSession2
SQL.Strings = (
'SELECT D.*, RowId FROM Scott.Dept D')
LockMode = lmNone
Left = 657
Top = 32
end
object OraSQLMonitor1: TOraSQLMonitor
Options = [moDialog, moSQLMonitor, moCustom]
Left = 688
Top = 34
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -