237 lines
7.2 KiB
Plaintext
237 lines
7.2 KiB
Plaintext
|
object fEditorTiendaWeb: TfEditorTiendaWeb
|
||
|
|
Left = 195
|
||
|
|
Top = 108
|
||
|
|
BorderStyle = bsDialog
|
||
|
|
Caption = 'Tienda web'
|
||
|
|
ClientHeight = 356
|
||
|
|
ClientWidth = 367
|
||
|
|
Color = clBtnFace
|
||
|
|
ParentFont = True
|
||
|
|
OldCreateOrder = True
|
||
|
|
Position = poScreenCenter
|
||
|
|
OnShow = FormShow
|
||
|
|
PixelsPerInch = 96
|
||
|
|
TextHeight = 13
|
||
|
|
object Panel1: TPanel
|
||
|
|
Left = 0
|
||
|
|
Top = 0
|
||
|
|
Width = 367
|
||
|
|
Height = 322
|
||
|
|
Align = alClient
|
||
|
|
BevelOuter = bvNone
|
||
|
|
BorderWidth = 5
|
||
|
|
ParentColor = True
|
||
|
|
TabOrder = 0
|
||
|
|
object PageControl1: TPageControl
|
||
|
|
Left = 5
|
||
|
|
Top = 5
|
||
|
|
Width = 357
|
||
|
|
Height = 312
|
||
|
|
ActivePage = TabSheet1
|
||
|
|
Align = alClient
|
||
|
|
TabOrder = 0
|
||
|
|
object TabSheet1: TTabSheet
|
||
|
|
Caption = 'Tienda web'
|
||
|
|
DesignSize = (
|
||
|
|
349
|
||
|
|
284)
|
||
|
|
object cbActivo: TcxDBCheckBox
|
||
|
|
Left = 3
|
||
|
|
Top = 16
|
||
|
|
Caption = 'Habilitar la tienda web para esta empresa'
|
||
|
|
DataBinding.DataField = 'TIENDA_ACTIVA'
|
||
|
|
DataBinding.DataSource = dsTiendaWeb
|
||
|
|
Properties.ImmediatePost = True
|
||
|
|
Properties.NullStyle = nssUnchecked
|
||
|
|
Properties.ValueChecked = 1
|
||
|
|
Properties.ValueUnchecked = 0
|
||
|
|
Properties.OnEditValueChanged = cbActivoPropertiesEditValueChanged
|
||
|
|
Style.LookAndFeel.Kind = lfStandard
|
||
|
|
Style.LookAndFeel.NativeStyle = True
|
||
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
||
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
||
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
||
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
||
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
||
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
||
|
|
TabOrder = 0
|
||
|
|
Width = 377
|
||
|
|
end
|
||
|
|
object GroupBox1: TGroupBox
|
||
|
|
Left = 8
|
||
|
|
Top = 43
|
||
|
|
Width = 333
|
||
|
|
Height = 198
|
||
|
|
Anchors = [akLeft, akTop, akRight, akBottom]
|
||
|
|
Caption = 'Probar conexi'#243'n con la tienda'
|
||
|
|
TabOrder = 1
|
||
|
|
DesignSize = (
|
||
|
|
333
|
||
|
|
198)
|
||
|
|
object Label1: TLabel
|
||
|
|
Left = 54
|
||
|
|
Top = 36
|
||
|
|
Width = 44
|
||
|
|
Height = 13
|
||
|
|
Alignment = taRightJustify
|
||
|
|
Caption = 'Servidor:'
|
||
|
|
end
|
||
|
|
object Label3: TLabel
|
||
|
|
Left = 26
|
||
|
|
Top = 62
|
||
|
|
Width = 72
|
||
|
|
Height = 13
|
||
|
|
Alignment = taRightJustify
|
||
|
|
Caption = 'Base de datos:'
|
||
|
|
end
|
||
|
|
object Label4: TLabel
|
||
|
|
Left = 58
|
||
|
|
Top = 102
|
||
|
|
Width = 40
|
||
|
|
Height = 13
|
||
|
|
Alignment = taRightJustify
|
||
|
|
Caption = 'Usuario:'
|
||
|
|
end
|
||
|
|
object Label5: TLabel
|
||
|
|
Left = 38
|
||
|
|
Top = 129
|
||
|
|
Width = 60
|
||
|
|
Height = 13
|
||
|
|
Alignment = taRightJustify
|
||
|
|
Caption = 'Contrase'#241'a:'
|
||
|
|
end
|
||
|
|
object edtBDSERVER: TcxDBTextEdit
|
||
|
|
Left = 104
|
||
|
|
Top = 32
|
||
|
|
DataBinding.DataField = 'BDSERVER'
|
||
|
|
DataBinding.DataSource = dsTiendaWeb
|
||
|
|
Style.LookAndFeel.Kind = lfStandard
|
||
|
|
Style.LookAndFeel.NativeStyle = True
|
||
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
||
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
||
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
||
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
||
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
||
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
||
|
|
TabOrder = 0
|
||
|
|
Width = 209
|
||
|
|
end
|
||
|
|
object edtBDUSER: TcxDBTextEdit
|
||
|
|
Left = 104
|
||
|
|
Top = 99
|
||
|
|
DataBinding.DataField = 'BDUSER'
|
||
|
|
DataBinding.DataSource = dsTiendaWeb
|
||
|
|
Style.LookAndFeel.Kind = lfStandard
|
||
|
|
Style.LookAndFeel.NativeStyle = True
|
||
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
||
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
||
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
||
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
||
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
||
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
||
|
|
TabOrder = 2
|
||
|
|
Width = 209
|
||
|
|
end
|
||
|
|
object edtBDPASS: TcxDBTextEdit
|
||
|
|
Left = 104
|
||
|
|
Top = 126
|
||
|
|
DataBinding.DataField = 'BDPASS'
|
||
|
|
DataBinding.DataSource = dsTiendaWeb
|
||
|
|
Properties.EchoMode = eemPassword
|
||
|
|
Properties.PasswordChar = '*'
|
||
|
|
Style.LookAndFeel.Kind = lfStandard
|
||
|
|
Style.LookAndFeel.NativeStyle = True
|
||
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
||
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
||
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
||
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
||
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
||
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
||
|
|
TabOrder = 3
|
||
|
|
Width = 209
|
||
|
|
end
|
||
|
|
object edtBDNAME: TcxDBTextEdit
|
||
|
|
Left = 104
|
||
|
|
Top = 59
|
||
|
|
DataBinding.DataField = 'BDNAME'
|
||
|
|
DataBinding.DataSource = dsTiendaWeb
|
||
|
|
Style.LookAndFeel.Kind = lfStandard
|
||
|
|
Style.LookAndFeel.NativeStyle = True
|
||
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
||
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
||
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
||
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
||
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
||
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
||
|
|
TabOrder = 1
|
||
|
|
Width = 209
|
||
|
|
end
|
||
|
|
object bComprobar: TButton
|
||
|
|
Left = 104
|
||
|
|
Top = 155
|
||
|
|
Width = 161
|
||
|
|
Height = 25
|
||
|
|
Action = actComprobar
|
||
|
|
Anchors = [akTop, akRight]
|
||
|
|
Caption = 'Probar la conexi'#243'n'
|
||
|
|
TabOrder = 4
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object Panel2: TPanel
|
||
|
|
Left = 0
|
||
|
|
Top = 322
|
||
|
|
Width = 367
|
||
|
|
Height = 34
|
||
|
|
Align = alBottom
|
||
|
|
BevelOuter = bvNone
|
||
|
|
ParentColor = True
|
||
|
|
TabOrder = 1
|
||
|
|
DesignSize = (
|
||
|
|
367
|
||
|
|
34)
|
||
|
|
object OKBtn: TButton
|
||
|
|
Left = 207
|
||
|
|
Top = 2
|
||
|
|
Width = 75
|
||
|
|
Height = 25
|
||
|
|
Action = actAceptar
|
||
|
|
Anchors = [akTop, akRight]
|
||
|
|
TabOrder = 0
|
||
|
|
end
|
||
|
|
object CancelBtn: TButton
|
||
|
|
Left = 286
|
||
|
|
Top = 2
|
||
|
|
Width = 75
|
||
|
|
Height = 25
|
||
|
|
Action = actCancelar
|
||
|
|
Anchors = [akTop, akRight]
|
||
|
|
Cancel = True
|
||
|
|
TabOrder = 1
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object ActionList1: TActionList
|
||
|
|
Left = 40
|
||
|
|
Top = 264
|
||
|
|
object actAceptar: TAction
|
||
|
|
Caption = '&Aceptar'
|
||
|
|
OnExecute = actAceptarExecute
|
||
|
|
end
|
||
|
|
object actCancelar: TAction
|
||
|
|
Caption = '&Cancelar'
|
||
|
|
OnExecute = actCancelarExecute
|
||
|
|
end
|
||
|
|
object actComprobar: TAction
|
||
|
|
Caption = 'Comprobar la conexi'#243'n'
|
||
|
|
OnExecute = actComprobarExecute
|
||
|
|
OnUpdate = actComprobarUpdate
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object dsTiendaWeb: TDADataSource
|
||
|
|
Left = 80
|
||
|
|
Top = 264
|
||
|
|
end
|
||
|
|
end
|