📄 transaction.lfm
字号:
object TransactionFrame: TTransactionFrame
Height = 291
Width = 933
object Splitter1: TSplitter
Left = 289
Height = 242
Top = 49
Width = 3
Beveled = True
Color = 170
ParentColor = False
end
object ToolBar: TPanel
Height = 49
Width = 933
Align = alTop
BevelOuter = bvNone
TabOrder = 0
end
object Panel1: TPanel
Height = 47
Width = 860
BevelOuter = bvNone
ClientHeight = 47
ClientWidth = 860
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 btRefresh: TSpeedButton
Left = 142
Height = 22
Top = 1
Width = 69
Caption = 'Refresh'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btRefreshClick
end
object btStartTransaction: TSpeedButton
Left = 1
Height = 22
Top = 24
Width = 96
Caption = 'Start Transaction'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btStartTransactionClick
end
object btCommit: TSpeedButton
Left = 98
Height = 22
Top = 24
Width = 70
Caption = 'Commit'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btCommitClick
end
object btRollback: TSpeedButton
Left = 169
Height = 22
Top = 24
Width = 70
Caption = 'Rollback'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btRollbackClick
end
object btDetach: TSpeedButton
Left = 240
Height = 22
Top = 24
Width = 70
Caption = 'Detach'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btDetachClick
end
object btResume: TSpeedButton
Left = 311
Height = 22
Top = 24
Width = 70
Caption = 'Resume'
Color = clBtnFace
Flat = True
NumGlyphs = 0
Transparent = False
OnClick = btResumeClick
end
object Panel3: TPanel
Left = 212
Height = 22
Top = 1
Width = 208
BevelOuter = bvNone
ClientHeight = 22
ClientWidth = 208
ParentColor = False
TabOrder = 0
object Label1: TLabel
Left = 8
Height = 13
Top = 5
Width = 84
Caption = 'GlobalCoordinator'
ParentColor = False
end
object cbGlobalCoordinator: TComboBox
Left = 96
Height = 21
Top = 1
Width = 105
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
ItemHeight = 13
Items.Strings = (
'Internal'
'MTS'
)
OnChange = cbGlobalCoordinatorChange
Style = csDropDownList
TabOrder = 0
end
end
object Panel4: TPanel
Left = 421
Height = 22
Top = 1
Width = 208
BevelOuter = bvNone
ClientHeight = 22
ClientWidth = 208
ParentColor = False
TabOrder = 1
object Label2: TLabel
Left = 8
Height = 13
Top = 5
Width = 65
Caption = 'IsolationLevel'
ParentColor = False
end
object cbIsolationLevel: TComboBox
Left = 96
Height = 21
Top = 1
Width = 105
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
ItemHeight = 13
Items.Strings = (
'ReadCommited'
'Serializable'
'ReadOnly'
)
OnChange = cbIsolationLevelChange
Style = csDropDownList
TabOrder = 0
end
end
object Panel5: TPanel
Left = 382
Height = 22
Top = 24
Width = 477
BevelOuter = bvNone
ParentColor = False
TabOrder = 2
end
object Panel6: TPanel
Left = 630
Height = 22
Top = 1
Width = 229
BevelOuter = bvNone
ClientHeight = 22
ClientWidth = 229
ParentColor = False
TabOrder = 3
object Label3: TLabel
Left = 16
Height = 13
Top = 5
Width = 78
Caption = 'InactiveTimeOut'
ParentColor = False
end
object Label4: TLabel
Left = 206
Height = 13
Top = 5
Width = 17
Caption = 'sec'
ParentColor = False
end
end
object edtInactiveTimeOut: TEdit
Left = 748
Height = 21
Top = 1
Width = 81
TabOrder = 4
Text = '60'
end
end
object Panel2: TPanel
Height = 242
Top = 49
Width = 289
Align = alLeft
BevelOuter = bvNone
ClientHeight = 242
ClientWidth = 289
TabOrder = 2
object DBGrid1: TDBGrid
Height = 195
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 = 242
Top = 49
Width = 641
Align = alClient
BevelOuter = bvNone
Caption = 'Panel2'
ClientHeight = 242
ClientWidth = 641
TabOrder = 3
object DBGrid2: TDBGrid
Height = 195
Top = 47
Width = 641
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 = 641
Align = alTop
BevelOuter = bvNone
ClientHeight = 47
ClientWidth = 641
TabOrder = 1
object Label7: TLabel
Left = 6
Height = 17
Top = 3
Width = 62
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 Query1: TOraQuery
SQL.Strings = (
'SELECT D.*, RowId FROM 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 = 24
top = 199
end
object DataSource1: TDatasource
DataSet = Query1
left = 56
top = 199
end
object OraSession2: TOraSession
left = 313
top = 200
end
object Query2: TOraQuery
Session = OraSession2
SQL.Strings = (
'SELECT D.*, RowId FROM 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 OraTransaction: TOraTransaction
left = 24
top = 160
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -