📄 trace.lfm
字号:
object TraceFrame: TTraceFrame
Height = 279
Width = 492
object Splitter1: TSplitter
Cursor = crVSplit
Height = 3
Top = 162
Width = 492
Align = alTop
Beveled = True
ResizeAnchor = akTop
end
object DBGrid: TDBGrid
Height = 89
Top = 190
Width = 492
Align = alClient
DataSource = DataSource
FixedColor = clBtnFace
FixedHotColor = cl3DLight
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColumnMove, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
OptionsExtra = [dgeAutoColumns, dgeCheckboxColumn]
ParentColor = False
TabOrder = 1
TabStop = True
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
end
object meSQL: TMemo
Height = 91
Top = 71
Width = 492
Align = alTop
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
OnExit = meSQLExit
ScrollBars = ssVertical
TabOrder = 0
end
object Panel4: TPanel
Height = 71
Width = 492
Align = alTop
BevelOuter = bvNone
ClientHeight = 71
ClientWidth = 492
TabOrder = 2
object ToolBar: TPanel
Height = 70
Width = 411
BevelOuter = bvNone
ClientHeight = 70
ClientWidth = 411
Color = 170
ParentColor = False
TabOrder = 0
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 btOpen: TSpeedButton
Left = 1
Height = 22
Top = 1
Width = 70
Caption = 'Open'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btOpenClick
end
object btTraceFileName: TSpeedButton
Left = 290
Height = 22
Top = 24
Width = 120
Caption = 'Show Trace File Name'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btTraceFileNameClick
end
object btPlSqlTracePause: TSpeedButton
Left = 148
Height = 22
Top = 47
Width = 70
Caption = 'Pause'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btPlSqlTracePauseClick
end
object btPlSqlTraceResume: TSpeedButton
Left = 219
Height = 22
Top = 47
Width = 70
Caption = 'Resume'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btPlSqlTraceResumeClick
end
object btShowTraceEvents: TSpeedButton
Left = 290
Height = 22
Top = 47
Width = 120
Caption = 'Show Trace Events'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btShowTraceEventsClick
end
object btExecute: TSpeedButton
Left = 142
Height = 22
Top = 1
Width = 70
Caption = 'Execute'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btExecuteClick
end
object Panel3: TPanel
Left = 1
Height = 22
Top = 24
Width = 288
BevelOuter = bvNone
ClientHeight = 22
ClientWidth = 288
ParentColor = False
TabOrder = 0
object cbSQLTrace: TCheckBox
Left = 8
Height = 19
Top = 2
Width = 78
Caption = 'SQL Trace'
Checked = True
OnClick = cbSQLTraceClick
State = cbChecked
TabOrder = 0
end
object cbBindVariables: TCheckBox
Left = 102
Height = 19
Top = 2
Width = 93
Caption = 'Bind Variables'
OnClick = cbBindVariablesClick
TabOrder = 1
end
object cbWaitEvents: TCheckBox
Left = 203
Height = 19
Top = 2
Width = 84
Caption = 'Wait Events'
OnClick = cbWaitEventsClick
TabOrder = 2
end
end
object Panel5: TPanel
Left = 213
Height = 22
Top = 1
Width = 197
BevelOuter = bvNone
ClientHeight = 22
ClientWidth = 197
ParentColor = False
TabOrder = 1
object cbTraceEnabled: TCheckBox
Left = 24
Height = 19
Top = 2
Width = 96
Caption = 'Trace Enabled'
OnClick = cbTraceEnabledClick
TabOrder = 0
end
end
object Panel6: TPanel
Left = 1
Height = 22
Top = 47
Width = 146
BevelOuter = bvNone
ClientHeight = 22
ClientWidth = 146
ParentColor = False
TabOrder = 2
object cbPlSqlTrace: TCheckBox
Left = 8
Height = 19
Top = 2
Width = 96
Caption = 'PL/SQL Trace'
OnClick = cbPlSqlTraceClick
TabOrder = 0
end
end
end
end
object Panel2: TPanel
Height = 25
Top = 165
Width = 492
Align = alTop
BevelOuter = bvNone
ClientHeight = 25
ClientWidth = 492
TabOrder = 3
object Panel1: TPanel
Height = 24
Width = 222
BevelOuter = bvNone
ClientHeight = 24
ClientWidth = 222
Color = 170
ParentColor = False
TabOrder = 0
object DBNavigator1: TDBNavigator
Left = 1
Height = 22
Top = 1
Width = 220
BevelOuter = bvNone
ClientHeight = 22
ClientWidth = 220
Color = clBtnFace
DataSource = DataSource
Flat = True
ParentColor = False
TabOrder = 0
end
end
end
object OraQuery: TOraQuery
SQL.Strings = (
'SELECT D1.*,D2.DName'
'FROM'
' Scott.Dept D1, Scott.Dept D2'
'WHERE'
' D1.DeptNo = D2.DeptNo'
)
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 = 16
top = 87
end
object DataSource: TDatasource
DataSet = OraQuery
left = 48
top = 87
end
object OraTrace: TOraTrace
Enabled = False
left = 104
top = 88
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -