david
78ab77cd4c
git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.jvcl@19 7f62d464-2af8-f54e-996c-e91b33f51cbe
413 lines
11 KiB
Plaintext
413 lines
11 KiB
Plaintext
object Form1: TForm1
|
|
Left = 0
|
|
Top = 0
|
|
Caption = 'Form1'
|
|
ClientHeight = 578
|
|
ClientWidth = 918
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object Panel1: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 918
|
|
Height = 41
|
|
Align = alTop
|
|
TabOrder = 0
|
|
ExplicitLeft = 235
|
|
ExplicitTop = 165
|
|
ExplicitWidth = 185
|
|
object Button1: TButton
|
|
Left = 10
|
|
Top = 10
|
|
Width = 75
|
|
Height = 25
|
|
Caption = 'Connect'
|
|
TabOrder = 0
|
|
OnClick = Button1Click
|
|
end
|
|
object Button2: TButton
|
|
Left = 91
|
|
Top = 10
|
|
Width = 75
|
|
Height = 25
|
|
Caption = 'Disonnect'
|
|
TabOrder = 1
|
|
OnClick = Button2Click
|
|
end
|
|
object Button3: TButton
|
|
Left = 205
|
|
Top = 10
|
|
Width = 75
|
|
Height = 25
|
|
Caption = 'Open Query'
|
|
TabOrder = 2
|
|
OnClick = Button3Click
|
|
end
|
|
object Button4: TButton
|
|
Left = 286
|
|
Top = 10
|
|
Width = 75
|
|
Height = 25
|
|
Caption = 'Close Query'
|
|
TabOrder = 3
|
|
OnClick = Button4Click
|
|
end
|
|
object Button5: TButton
|
|
Left = 485
|
|
Top = 10
|
|
Width = 91
|
|
Height = 25
|
|
Caption = 'Change Password'
|
|
TabOrder = 4
|
|
OnClick = Button5Click
|
|
end
|
|
end
|
|
object DBGrid1: TDBGrid
|
|
Left = 0
|
|
Top = 41
|
|
Width = 918
|
|
Height = 469
|
|
Align = alClient
|
|
DataSource = DataSource1
|
|
TabOrder = 1
|
|
TitleFont.Charset = DEFAULT_CHARSET
|
|
TitleFont.Color = clWindowText
|
|
TitleFont.Height = -11
|
|
TitleFont.Name = 'Tahoma'
|
|
TitleFont.Style = []
|
|
end
|
|
object Panel2: TPanel
|
|
Left = 0
|
|
Top = 510
|
|
Width = 918
|
|
Height = 68
|
|
Align = alBottom
|
|
TabOrder = 2
|
|
object BitBtn1: TBitBtn
|
|
Left = 5
|
|
Top = 6
|
|
Width = 121
|
|
Height = 25
|
|
Action = JvDatabaseFirstAction1
|
|
Caption = 'First Record'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 0
|
|
end
|
|
object BitBtn2: TBitBtn
|
|
Left = 123
|
|
Top = 6
|
|
Width = 121
|
|
Height = 25
|
|
Action = JvDatabasePriorAction1
|
|
Caption = 'Prior Record'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 1
|
|
end
|
|
object BitBtn3: TBitBtn
|
|
Left = 365
|
|
Top = 6
|
|
Width = 121
|
|
Height = 25
|
|
Action = JvDatabaseLastAction1
|
|
Caption = 'Last Record'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 2
|
|
end
|
|
object BitBtn4: TBitBtn
|
|
Left = 245
|
|
Top = 6
|
|
Width = 121
|
|
Height = 25
|
|
Action = JvDatabaseNextAction1
|
|
Caption = 'Next Record'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 3
|
|
end
|
|
object BitBtn5: TBitBtn
|
|
Left = 485
|
|
Top = 6
|
|
Width = 91
|
|
Height = 25
|
|
Action = JvDatabasePositionAction1
|
|
Caption = '0/0'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 4
|
|
end
|
|
object BitBtn6: TBitBtn
|
|
Left = 708
|
|
Top = 6
|
|
Width = 121
|
|
Height = 25
|
|
Action = JvDatabaseSingleRecordWindowAction1
|
|
Caption = 'Single Record Window'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 5
|
|
end
|
|
object BitBtn7: TBitBtn
|
|
Left = 588
|
|
Top = 37
|
|
Width = 121
|
|
Height = 25
|
|
Action = JvDatabaseOpenAction1
|
|
Caption = 'Open'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 6
|
|
end
|
|
object BitBtn8: TBitBtn
|
|
Left = 708
|
|
Top = 37
|
|
Width = 121
|
|
Height = 25
|
|
Action = JvDatabaseCloseAction1
|
|
Caption = 'Close'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 7
|
|
end
|
|
object BitBtn9: TBitBtn
|
|
Left = 365
|
|
Top = 37
|
|
Width = 121
|
|
Height = 25
|
|
Action = JvDatabaseModifyAllAction1
|
|
Caption = 'Modify All'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 8
|
|
end
|
|
object BitBtn10: TBitBtn
|
|
Left = 588
|
|
Top = 6
|
|
Width = 121
|
|
Height = 25
|
|
Action = JvDatabaseShowSQLStatementAction1
|
|
Caption = 'Show SQL'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 9
|
|
end
|
|
object BitBtn11: TBitBtn
|
|
Left = 245
|
|
Top = 37
|
|
Width = 121
|
|
Height = 25
|
|
Action = JvDatabaseEditAction1
|
|
Caption = 'Edit Record'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 10
|
|
end
|
|
object BitBtn12: TBitBtn
|
|
Left = 123
|
|
Top = 37
|
|
Width = 121
|
|
Height = 25
|
|
Action = JvDatabaseCopyAction1
|
|
Caption = 'Copy Record'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 11
|
|
end
|
|
object BitBtn13: TBitBtn
|
|
Left = 5
|
|
Top = 37
|
|
Width = 121
|
|
Height = 25
|
|
Action = JvDatabaseInsertAction1
|
|
Caption = 'Insert Record'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 12
|
|
end
|
|
end
|
|
object OraSession1: TOraSession
|
|
ConnectDialog = JvDBOdacConnectDialog1
|
|
Left = 205
|
|
Top = 120
|
|
end
|
|
object JvOdacSmartQuery1: TJvOdacSmartQuery
|
|
Session = OraSession1
|
|
SQL.Strings = (
|
|
'SELECT * FROM V$SESSION')
|
|
DialogOptions.FormStyle = fsNormal
|
|
DialogOptions.ShowDialog = True
|
|
EnhancedOptions.AllowedContinueRecordFetchOptions.All = True
|
|
ThreadOptions.LastInThread = True
|
|
ThreadOptions.OpenInThread = True
|
|
ThreadOptions.RefreshInThread = True
|
|
Left = 370
|
|
Top = 110
|
|
end
|
|
object JvDBOdacPasswordDialog1: TJvDBOdacPasswordDialog
|
|
Options.AllowedPasswordCharacters =
|
|
'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890_#' +
|
|
'$'
|
|
Session = OraSession1
|
|
Left = 250
|
|
Top = 250
|
|
end
|
|
object JvDBOdacConnectDialog1: TJvDBOdacConnectDialog
|
|
Options.AllowNullPasswords = True
|
|
Options.ShowOracleHome = True
|
|
Left = 120
|
|
Top = 200
|
|
end
|
|
object DataSource1: TDataSource
|
|
DataSet = JvOdacSmartQuery1
|
|
Left = 520
|
|
Top = 110
|
|
end
|
|
object JvDatabaseActionList1: TJvDatabaseActionList
|
|
DataComponent = DataSource1
|
|
Left = 285
|
|
Top = 170
|
|
object JvDatabaseSingleRecordWindowAction1: TJvDatabaseSingleRecordWindowAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Single Record Window'
|
|
ImageIndex = 0
|
|
DataComponent = DataSource1
|
|
Options.PostButtonCaption = '&Post'
|
|
Options.CancelButtonCaption = '&Cancel'
|
|
Options.CloseButtonCaption = 'C&lose'
|
|
Options.ArrangeConstraints.MaxHeight = 480
|
|
Options.ArrangeConstraints.MaxWidth = 640
|
|
Options.ArrangeSettings.BorderLeft = 3
|
|
Options.ArrangeSettings.BorderTop = 3
|
|
Options.ArrangeSettings.DistanceVertical = 3
|
|
Options.ArrangeSettings.DistanceHorizontal = 3
|
|
Options.ArrangeSettings.AutoSize = asBoth
|
|
Options.FieldCreateOptions.UseFieldSizeForWidth = False
|
|
end
|
|
object JvDatabaseFirstAction1: TJvDatabaseFirstAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'First Record'
|
|
ImageIndex = 8
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabaseLastAction1: TJvDatabaseLastAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Last Record'
|
|
ImageIndex = 12
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabaseNextAction1: TJvDatabaseNextAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Next Record'
|
|
ImageIndex = 13
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabasePriorAction1: TJvDatabasePriorAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Prior Record'
|
|
ImageIndex = 16
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabaseNextBlockAction1: TJvDatabaseNextBlockAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Next Record Block'
|
|
ImageIndex = 14
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabasePriorBlockAction1: TJvDatabasePriorBlockAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Prior Record Block'
|
|
ImageIndex = 17
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabasePositionAction1: TJvDatabasePositionAction
|
|
Category = 'JVCL-DB'
|
|
Caption = '0/0'
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabaseRefreshAction1: TJvDatabaseRefreshAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Refresh'
|
|
ImageIndex = 18
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabaseInsertAction1: TJvDatabaseInsertAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Insert Record'
|
|
DataComponent = DataSource1
|
|
SingleRecordWindowAction = JvDatabaseSingleRecordWindowAction1
|
|
end
|
|
object JvDatabaseCopyAction1: TJvDatabaseCopyAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Copy Record'
|
|
DataComponent = DataSource1
|
|
SingleRecordWindowAction = JvDatabaseSingleRecordWindowAction1
|
|
end
|
|
object JvDatabaseEditAction1: TJvDatabaseEditAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Edit Record'
|
|
DataComponent = DataSource1
|
|
SingleRecordWindowAction = JvDatabaseSingleRecordWindowAction1
|
|
end
|
|
object JvDatabaseDeleteAction1: TJvDatabaseDeleteAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Delete Record'
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabasePostAction1: TJvDatabasePostAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Post Changes'
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabaseCancelAction1: TJvDatabaseCancelAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Cancel Changes'
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabaseSimpleAction1: TJvDatabaseSimpleAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'JvDatabaseSimpleAction1'
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabaseOpenAction1: TJvDatabaseOpenAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Open'
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabaseCloseAction1: TJvDatabaseCloseAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Close'
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabaseModifyAllAction1: TJvDatabaseModifyAllAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Modify All'
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabaseShowSQLStatementAction1: TJvDatabaseShowSQLStatementAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'JvDatabaseShowSQLStatementAction1'
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabaseSimpleAction2: TJvDatabaseSimpleAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Age > 40'
|
|
Enabled = False
|
|
DataComponent = DataSource1
|
|
end
|
|
object JvDatabaseEditAction2: TJvDatabaseEditAction
|
|
Category = 'JVCL-DB'
|
|
Caption = 'Edit Record'
|
|
DataComponent = DataSource1
|
|
end
|
|
end
|
|
end
|