📄 bdesess.nfm
字号:
inherited BDESessionFrame: TBDESessionFrame
object Splitter1: TSplitter
Left = 0
Top = 191
Width = 443
Height = 3
Cursor = crVSplit
Align = alTop
Beveled = True
Color = 170
ParentColor = False
end
object gdODAC: TDBGrid
Left = 0
Top = 24
Width = 443
Height = 167
Align = alTop
Anchors = []
DataSource = dsODAC
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
end
object DBGrid1: TDBGrid
Left = 0
Top = 218
Width = 443
Height = 59
Align = alClient
DataSource = dsBDE
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
end
object pnODAC: TPanel
Left = 0
Top = 0
Width = 443
Height = 24
Align = alTop
BevelOuter = bvNone
TabOrder = 2
object Label1: TLabel
Left = 7
Top = 3
Width = 43
Height = 16
Caption = 'ODAC'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = 170
Font.Height = -13
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Panel1: TPanel
Left = 60
Top = 0
Width = 345
Height = 24
BevelOuter = bvNone
Color = 170
TabOrder = 0
object btConnect: TSpeedButton
Left = 1
Top = 1
Width = 85
Height = 22
Caption = 'Connect'
Flat = True
Transparent = False
OnClick = btConnectClick
end
object btDisconnect: TSpeedButton
Left = 87
Top = 1
Width = 85
Height = 22
Caption = 'Disconnect'
Flat = True
Transparent = False
OnClick = btDisconnectClick
end
object btOpenODAC: TSpeedButton
Left = 173
Top = 1
Width = 85
Height = 22
Caption = 'Open'
Flat = True
Transparent = False
OnClick = btOpenODACClick
end
object btCloseODAC: TSpeedButton
Left = 259
Top = 1
Width = 85
Height = 22
Caption = 'Close'
Flat = True
Transparent = False
OnClick = btCloseODACClick
end
end
end
object pnBDE: TPanel
Left = 0
Top = 194
Width = 443
Height = 24
Align = alTop
BevelOuter = bvNone
TabOrder = 3
object Label2: TLabel
Left = 7
Top = 3
Width = 32
Height = 16
Caption = 'BDE'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = 170
Font.Height = -13
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Panel2: TPanel
Left = 60
Top = 0
Width = 345
Height = 24
BevelOuter = bvNone
Color = 170
TabOrder = 0
object btCloseBDE: TSpeedButton
Left = 259
Top = 1
Width = 85
Height = 22
Caption = 'Close'
Flat = True
Transparent = False
OnClick = btCloseBDEClick
end
object btOpenBDE: TSpeedButton
Left = 173
Top = 1
Width = 85
Height = 22
Caption = 'Open'
Flat = True
Transparent = False
OnClick = btOpenBDEClick
end
object btDisconnectBDE: TSpeedButton
Left = 87
Top = 1
Width = 85
Height = 22
Caption = 'Disconnect'
Flat = True
Transparent = False
OnClick = btDisconnectBDEClick
end
object btConnectBDE: TSpeedButton
Left = 1
Top = 1
Width = 85
Height = 22
Caption = 'Connect'
Flat = True
Transparent = False
OnClick = btConnectBDEClick
end
end
end
object Database: TDatabase
DatabaseName = 'dbOracle'
DriverName = 'ORACLE'
SessionName = 'Default'
Left = 56
Top = 88
end
object dsODAC: TDataSource
DataSet = OraQuery
Left = 176
Top = 56
end
object OraQuery: TOraQuery
Session = BDESession
SQL.Strings = (
'SELECT * FROM Scott.Dept')
FetchRows = 1
Left = 144
Top = 56
end
object Query: TQuery
DatabaseName = 'dbOracle'
SQL.Strings = (
'SELECT * FROM Scott.Dept')
Left = 144
Top = 88
end
object dsBDE: TDataSource
DataSet = Query
Left = 176
Top = 88
end
object ConnectDialog1: TConnectDialog
SavePassword = True
Caption = 'Connect'
UsernameLabel = 'User Name'
PasswordLabel = 'Password'
ServerLabel = 'Server'
ConnectButton = 'Connect'
CancelButton = 'Cancel'
Left = 88
Top = 56
end
object BDESession: TBDESession
Options.UseOCI7 = True
ConnectDialog = ConnectDialog1
OnConnectChange = BDESessionConnectChange
DatabaseName = 'dbOracle'
Left = 56
Top = 56
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -