- Recompilación en Delphi10 de todos los paquetes de RO para generar las DCU's en Lib\D10 git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.RemObjects@7 b6239004-a887-0f4b-9937-50029ccdca16
167 lines
3.8 KiB
Plaintext
167 lines
3.8 KiB
Plaintext
object ConnectionPoolingMainForm: TConnectionPoolingMainForm
|
|
Left = 392
|
|
Top = 182
|
|
AutoScroll = False
|
|
BorderWidth = 5
|
|
Caption = 'Connection Pooling'
|
|
ClientHeight = 323
|
|
ClientWidth = 365
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
Position = poScreenCenter
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object Label1: TLabel
|
|
Left = 3
|
|
Top = 0
|
|
Width = 102
|
|
Height = 13
|
|
Caption = 'Selected Connection:'
|
|
end
|
|
object lPoolTimeoutSeconds: TLabel
|
|
Left = 3
|
|
Top = 48
|
|
Width = 113
|
|
Height = 13
|
|
Caption = 'PoolTimeoutSeconds: 5'
|
|
end
|
|
object Acquire1Button: TButton
|
|
Left = 208
|
|
Top = 0
|
|
Width = 75
|
|
Height = 25
|
|
Caption = '&Acquire #1'
|
|
TabOrder = 0
|
|
OnClick = Acquire1ButtonClick
|
|
end
|
|
object cbConnections: TComboBox
|
|
Left = 3
|
|
Top = 18
|
|
Width = 193
|
|
Height = 21
|
|
Style = csDropDownList
|
|
ItemHeight = 13
|
|
TabOrder = 1
|
|
end
|
|
object Release1Button: TButton
|
|
Left = 288
|
|
Top = 0
|
|
Width = 75
|
|
Height = 25
|
|
Caption = '&Release #1'
|
|
TabOrder = 2
|
|
OnClick = Release1ButtonClick
|
|
end
|
|
object Memo: TMemo
|
|
Left = 0
|
|
Top = 97
|
|
Width = 365
|
|
Height = 226
|
|
Anchors = [akLeft, akTop, akRight, akBottom]
|
|
ScrollBars = ssVertical
|
|
TabOrder = 3
|
|
end
|
|
object Acquire2Button: TButton
|
|
Left = 208
|
|
Top = 32
|
|
Width = 75
|
|
Height = 25
|
|
Caption = '&Acquire #2'
|
|
TabOrder = 4
|
|
OnClick = Acquire2ButtonClick
|
|
end
|
|
object Release2Button: TButton
|
|
Left = 288
|
|
Top = 32
|
|
Width = 75
|
|
Height = 25
|
|
Caption = '&Release #2'
|
|
TabOrder = 5
|
|
OnClick = Release2ButtonClick
|
|
end
|
|
object Acquire3Button: TButton
|
|
Left = 208
|
|
Top = 64
|
|
Width = 75
|
|
Height = 25
|
|
Caption = '&Acquire #3'
|
|
TabOrder = 6
|
|
OnClick = Acquire3ButtonClick
|
|
end
|
|
object Release3Button: TButton
|
|
Left = 288
|
|
Top = 64
|
|
Width = 75
|
|
Height = 25
|
|
Caption = '&Release #3'
|
|
TabOrder = 7
|
|
OnClick = Release3ButtonClick
|
|
end
|
|
object TrackBar: TTrackBar
|
|
Left = -4
|
|
Top = 64
|
|
Width = 208
|
|
Height = 30
|
|
Max = 20
|
|
Min = 1
|
|
Orientation = trHorizontal
|
|
ParentShowHint = False
|
|
PageSize = 1
|
|
Frequency = 1
|
|
Position = 5
|
|
SelEnd = 0
|
|
SelStart = 0
|
|
ShowHint = True
|
|
TabOrder = 8
|
|
TickMarks = tmBottomRight
|
|
TickStyle = tsAuto
|
|
OnChange = TrackBarChange
|
|
end
|
|
object DAConnectionManager: TDAConnectionManager
|
|
PoolTimeoutSeconds = 5
|
|
OnConnectionTimedOut = DAConnectionManagerConnectionTimedOut
|
|
OnConnectionCreated = DAConnectionManagerConnectionCreated
|
|
Connections = <
|
|
item
|
|
Name = 'MSSQL'
|
|
ConnectionString =
|
|
'ADO?AuxDriver=SQLOLEDB.1;Server=localhost;Database=Northwind;Int' +
|
|
'egrated Security=SSPI;'
|
|
Description = 'Microsoft SQL Server Northwind Connection'
|
|
Default = True
|
|
Tag = 0
|
|
end
|
|
item
|
|
Name = 'IBEmployees'
|
|
ConnectionString =
|
|
'IBX?Server=;UserID=sysdba;Password=masterkey;Database=C:\Program' +
|
|
' Files\Borland\InterBase\examples\Database\Employee.gdb'
|
|
Description = 'Borland Interbase Employee Connection'
|
|
Default = False
|
|
Tag = 0
|
|
end>
|
|
DriverManager = DADriverManager
|
|
PoolingEnabled = True
|
|
Left = 48
|
|
Top = 112
|
|
end
|
|
object DADriverManager: TDADriverManager
|
|
DriverDirectory = '%MODULE%\'
|
|
TraceActive = False
|
|
TraceFlags = []
|
|
Left = 16
|
|
Top = 112
|
|
end
|
|
object DAADODriver: TDAADODriver
|
|
Left = 16
|
|
Top = 144
|
|
end
|
|
end
|