This repository has been archived on 2024-11-28. You can view files and clone it, but cannot push or open issues or pull requests.
Miguelo_FactuGES/Clientes/ElegirDireccionCliente.dfm
2007-06-25 15:19:31 +00:00

221 lines
7.3 KiB
Plaintext

object frElegirDireccionCliente: TfrElegirDireccionCliente
Left = 532
Top = 333
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Elecci'#243'n de direcci'#243'n de cliente'
ClientHeight = 319
ClientWidth = 464
Color = 16383743
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object eTitulo: TLabel
Left = 8
Top = 7
Width = 144
Height = 16
Caption = 'Direcciones del cliente'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 11
Top = 32
Width = 445
Height = 33
AutoSize = False
Caption =
'Este cliente posee al menos una sucursal. Puede utilizar la dire' +
'cci'#243'n principal del cliente o los datos de una de las sucursales' +
'.'
WordWrap = True
end
object RdxPanel1: TRdxPanel
Left = 8
Top = 72
Width = 449
Height = 209
BorderStyle = bsSingle
Caption = ' '
BorderWidth = 1
Color = 15726583
ColorHighLight = 8623776
ColorShadow = 8623776
TabOrder = 0
UseDockManager = True
object DireccionPrincipal: TLabel
Left = 40
Top = 40
Width = 382
Height = 49
AutoSize = False
Caption = 'DireccionPrincipal'
WordWrap = True
end
object DireccionSucursales: TcxListBox
Left = 40
Top = 120
Width = 385
Height = 69
ItemHeight = 13
Style.BorderColor = 8623776
Style.BorderStyle = cbsSingle
Style.Color = 16383743
Style.HotTrack = False
Style.LookAndFeel.Kind = lfFlat
Style.LookAndFeel.NativeStyle = False
StyleDisabled.LookAndFeel.Kind = lfFlat
StyleDisabled.LookAndFeel.NativeStyle = False
StyleFocused.LookAndFeel.Kind = lfFlat
StyleFocused.LookAndFeel.NativeStyle = False
StyleHot.LookAndFeel.Kind = lfFlat
StyleHot.LookAndFeel.NativeStyle = False
TabOrder = 0
IntegralHeight = True
end
object rbDireccionPrincipal: TRdxRadioButton
Left = 16
Top = 16
Width = 409
Height = 17
Transparent = True
Caption = 'Usar los datos de la direcci'#243'n principal'
Checked = True
Color = 16383743
ColorFocused = clWhite
ColorDown = clWhite
ColorDot = clBlack
ColorBorder = clBtnShadow
GroupIndex = 1
ParentColor = False
TabOrder = 1
TabStop = True
Action = actDireccionPrincipal
end
object rbDireccionSucursales: TRdxRadioButton
Left = 16
Top = 96
Width = 409
Height = 17
Transparent = True
Caption = 'Usar los datos de una de las siguientes sucursales del cliente:'
Color = 16383743
ColorFocused = clWhite
ColorDown = clWhite
ColorDot = clBlack
ColorBorder = clBtnShadow
GroupIndex = 1
ParentColor = False
TabOrder = 2
Action = actDireccionSucursales
end
end
object bGuardar: TRdxBoton
Left = 381
Top = 289
Width = 75
Height = 25
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
GroupIndex = 1
Caption = 'Aceptar'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
FontDown.Charset = DEFAULT_CHARSET
FontDown.Color = clWindowText
FontDown.Height = -11
FontDown.Name = 'Tahoma'
FontDown.Style = []
FontDisabled.Charset = DEFAULT_CHARSET
FontDisabled.Color = clWindowText
FontDisabled.Height = -11
FontDisabled.Name = 'MS Sans Serif'
FontDisabled.Style = []
Glyph.Data = {
36040000424D3604000000000000360000002800000010000000100000000100
2000000000000004000000000000000000000000000000000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FAFAFA00EBEBEB00E6E6E600EBEBEB00FAFA
FA00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FAFAFA00DCDCDC00A8A8A80098989800A8A8A800DCDC
DC00FAFAFA00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FAFAFA00DCDCDC007DB90C0075AC0E0075AC0E0084848400A8A8
A800EBEBEB00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FAFAFA00DCDCDC007AB40D007DB90C0084C50B007DB90C0075AC0E009494
9400D7D7D700FAFAFA00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FAFA
FA00DCDCDC007AB40D0071A6100084C50B0084C50B0087C90A0089CD09008484
8400A8A8A800EBEBEB00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00EBEB
EB007AB40D0071A6100084C50B008CD207007AB40D007DB90C0080BF0B0089CD
090094949400D7D7D700FAFAFA00FFFFFF00FFFFFF00FFFFFF00FFFFFF007AB4
0D0071A6100092DB05008CD2070075AC0E00DCDCDC0080BF0B0084C50B0089CD
090084848400A8A8A800EBEBEB00FFFFFF00FFFFFF00FFFFFF00FFFFFF006EA1
110098E6030075AC0E006EA11100DCDCDC00FAFAFA00FFFFFF0084C50B0089CD
090089CD090094949400D7D7D700FAFAFA00FFFFFF00FFFFFF00FFFFFF00618D
130075AC0E0065921200EBEBEB00FAFAFA00FFFFFF00FFFFFF0087C90A008CD2
070084C50B0084848400A8A8A800EBEBEB00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008CD2
070092DB050087C90A0094949400D7D7D700FAFAFA00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0090D7
060092DB050084C50B0084848400A8A8A800EBEBEB00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF0096E3040098E6030087C90A0094949400D7D7D700FAFAFA00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF0096E304009AEA020084C50B0084848400A8A8A800EBEBEB00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF009AEA020092DB050084C50B00ADADAD00EBEBEB00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF0092DB05007AB40D0092DB0500EBEBEB00FAFAFA00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00}
Margin = 5
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 1
Spacing = 6
ModalResult = 1
end
object ActionList1: TActionList
Left = 264
Top = 8
object actDireccionPrincipal: TAction
AutoCheck = True
Caption = 'Usar la direcci'#243'n principal del cliente'
Checked = True
GroupIndex = 1
OnExecute = actDireccionPrincipalExecute
OnUpdate = actDireccionPrincipalUpdate
end
object actDireccionSucursales: TAction
AutoCheck = True
Caption =
'Usar la direcci'#243'n de una de las siguientes sucursales del client' +
'e:'
GroupIndex = 1
OnExecute = actDireccionSucursalesExecute
OnUpdate = actDireccionSucursalesUpdate
end
end
end