This repository has been archived on 2024-12-02. You can view files and clone it, but cannot push or open issues or pull requests.
FactuGES/Clientes/ContratoCliente.dfm
2007-06-26 08:08:27 +00:00

2510 lines
94 KiB
Plaintext

object frContratoCliente: TfrContratoCliente
Left = 0
Top = 0
Width = 853
Height = 626
Color = 16383743
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 0
BarraSalir = brSalir
BarraOperacion = brGuardar
object pnlTitulo: TRdxPanelTituloOperacion
Left = 0
Top = 0
Width = 853
Height = 22
Caption = ' '
Color = 11590911
Align = alTop
Font.Charset = DEFAULT_CHARSET
Font.Color = 18299
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
end
object brSalir: TRdxBarraInferior
Left = 0
Top = 526
Width = 853
Height = 50
Caption = ' '
ParentColor = True
Visible = False
ColorHighLight = 8623776
ColorShadow = clBtnFace
Align = alBottom
TabOrder = 1
UseDockManager = True
Margen = 10
object bSalir: TRdxBoton
Left = 10
Top = 20
Width = 75
Height = 25
Cancel = True
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
GroupIndex = -1
Down = True
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 = {
36030000424D3603000000000000360000002800000010000000100000000100
18000000000000030000130B0000130B00000000000000000000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFAFAFAEBEBEBE6E6E6EBEBEBFAFAFAFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFAFAFADCDCDCA8A8A898
9898A8A8A8DCDCDCFAFAFAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFAFAFADCDCDC7DB90C75AC0E75AC0E848484A8A8A8EBEBEBFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFAFAFADCDCDC7AB40D7DB90C84C50B7D
B90C75AC0E949494D7D7D7FAFAFAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFAFAFA
DCDCDC7AB40D71A61084C50B84C50B87C90A89CD09848484A8A8A8EBEBEBFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFEBEBEB7AB40D71A61084C50B8CD2077AB40D7D
B90C80BF0B89CD09949494D7D7D7FAFAFAFFFFFFFFFFFFFFFFFFFFFFFF7AB40D
71A61092DB058CD20775AC0EDCDCDC80BF0B84C50B89CD09848484A8A8A8EBEB
EBFFFFFFFFFFFFFFFFFFFFFFFF6EA11198E60375AC0E6EA111DCDCDCFAFAFAFF
FFFF84C50B89CD0989CD09949494D7D7D7FAFAFAFFFFFFFFFFFFFFFFFF618D13
75AC0E659212EBEBEBFAFAFAFFFFFFFFFFFF87C90A8CD20784C50B848484A8A8
A8EBEBEBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFF8CD20792DB0587C90A949494D7D7D7FAFAFAFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF90D70692DB0584C50B8484
84A8A8A8EBEBEBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFF96E30498E60387C90A949494D7D7D7FAFAFAFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF96E3049AEA0284C5
0B848484A8A8A8EBEBEBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFF9AEA0292DB0584C50BADADADEBEBEBFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF92DB057AB4
0D92DB05EBEBEBFAFAFAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
Margin = 5
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 0
Spacing = 6
OnClick = bSalirClick
end
end
object brGuardar: TRdxBarraInferior
Left = 0
Top = 576
Width = 853
Height = 50
Caption = ' '
ParentColor = True
Visible = False
ColorHighLight = 8623776
ColorShadow = clBtnFace
Align = alBottom
TabOrder = 2
UseDockManager = True
Margen = 10
object bGuardar: TRdxBoton
Left = 10
Top = 20
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 = 0
Spacing = 6
OnClick = bGuardarClick
end
object bCancelar: TRdxBoton
Left = 95
Top = 20
Width = 75
Height = 25
Cancel = True
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
GroupIndex = -1
Down = True
Caption = 'Cancelar'
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 = {
36030000424D3603000000000000360000002800000010000000100000000100
18000000000000030000130B0000130B00000000000000000000FFFFFFFAFAFA
EBEBEBE6E6E6EBEBEBFAFAFAFFFFFFFFFFFFFAFAFAEBEBEBEBEBEBFAFAFAFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFEBEBEBADADAD989898ADADADEBEBEBFFFFFFFA
FAFADCDCDCA8A8A8A8A8A8DCDCDCFAFAFAFFFFFFFFFFFFFFFFFFFFFFFF1B1BCB
0807BE0807BE949494D7D7D7F5F5F5DCDCDC0505BC0505BC848484A8A8A8EBEB
EBFFFFFFFFFFFFFFFFFFFFFFFF393ADF5F5FF84B4CEA848484A3A3A3C8C8C813
13C56867FD6B6BFF2827D3989898E6E6E6FFFFFFFFFFFFFFFFFFFFFFFF4F4EEC
6363F96A6AFE4343E58484841313C55B5BF56A6AFE6A6AFE3839DE999999E6E6
E6FFFFFFFFFFFFFFFFFFFFFFFF393ADE5A5AF45A5AF46766FC4343E55B5BF563
63F96766FC5E5EF7201FCDA8A8A8EBEBEBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
393ADE5251EE5454F05F5EF76363F95555F16363F94A4BE9201FCCD7D7D7FAFA
FAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF393ADE4F4EEC5251EE5454F063
63F94B4CEA201FCD989898E6E6E6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFF4A4BE94242E44A4BE94A4BE94B4CEA201FCD949494D7D7D7FAFA
FAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFAFAFA4343E53839DE4242E442
42E44A4BE94343E5848484A3A3A3DCDCDCFAFAFAFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFEBEBEB4F4EEC2D2DD63637DC3839DE4242E44242E41B1BCB848484A3A3
A3DCDCDCFAFAFAFFFFFFFFFFFFFFFFFFFAFAFA3434DB3434DB2C2CD53333DA34
34DB3434DB3C3CE04242E41313C5848484A8A8A8EBEBEBFFFFFFFFFFFFFFFFFF
EBEBEB3434DB3333DA2222CF2827D3504FEC4242E43434DB3637DC3738DD1313
C5999999E6E6E6FFFFFFFFFFFFFFFFFF5251EE393ADF1B1BCB3434DB3C3CE0A8
A8A82D2DD53C3CE03434DB4242E41313C5ADADADEBEBEBFFFFFFFFFFFFFFFFFF
504FEC4343E54343E54343E53434DADCDCDCFAFAFA2222CE393ADE3D3DE02D2D
D5EBEBEBFAFAFAFFFFFFFFFFFFFFFFFFFFFFFF504FED4B4CEA4B4CEAEBEBEBFA
FAFAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
Margin = 5
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 1
Spacing = 6
OnClick = bCancelarClick
end
end
object pnlCuerpo: TPanel
Left = 0
Top = 22
Width = 853
Height = 504
Align = alClient
BevelOuter = bvNone
BorderWidth = 10
ParentColor = True
TabOrder = 0
object pnlFactura: TAdvPanel
Left = 10
Top = 10
Width = 833
Height = 79
Align = alTop
BevelOuter = bvNone
Color = 16383743
TabOrder = 0
UseDockManager = True
Version = '1.5.0.0'
AnchorHint = False
AutoSize.Enabled = False
AutoSize.Height = True
AutoSize.Width = True
AutoHideChildren = True
BackgroundPosition = bpTopLeft
BorderColor = clBlack
BorderShadow = False
Buffered = True
CanMove = False
CanSize = False
Caption.Background.Data = {
72010000424D7201000000000000760000002800000014000000150000000100
040000000000FC000000D30E0000D30E00001000000010000000B5BDC600FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111
1111111100001111111111111111111100001111111111111111111100001111
1111111111110000000011111111111111111111000011111111111111111111
0000111111111111111111110000111111111111111111110000111111111111
1111111100001111111111111111111100001111111111111111111100001111
1111111111111111000011111111111111111111000011111111111111111111
0000111111111111111111110000111111111111111111110000111111111111
1111111100001111111111111111111100001111111111111111111100001111
11111111111111110000111111111111111111110000}
Caption.ButtonPosition = cbpLeft
Caption.Color = clBtnFace
Caption.ColorTo = clNone
Caption.CloseColor = clBtnFace
Caption.CloseButton = False
Caption.CloseButtonColor = clBlack
Caption.Flat = True
Caption.Font.Charset = DEFAULT_CHARSET
Caption.Font.Color = 18299
Caption.Font.Height = -11
Caption.Font.Name = 'Tahoma'
Caption.Font.Style = [fsBold]
Caption.Height = 23
Caption.Indent = -4
Caption.MinMaxButton = True
Caption.MinMaxButtonColor = 18299
Caption.ShadeLight = 200
Caption.ShadeGrain = 0
Caption.ShadeType = stBitmapRStretch
Caption.Shape = csRectangle
Caption.Text = 'Datos del contrato de cliente'
Caption.TopIndent = 0
Caption.Visible = True
Collaps = False
CollapsColor = clWhite
CollapsDelay = 20
CollapsSteps = 0
ColorTo = clNone
FixedTop = False
FixedLeft = False
FixedHeight = False
FixedWidth = False
FreeOnClose = False
Hover = False
HoverColor = clNone
HoverFontColor = clNone
Indent = 0
LineSpacing = 0
Position.Save = False
Position.Location = clRegistry
ShadowColor = clGray
ShadowOffset = 2
ShowMoveCursor = False
TextVAlign = tvaTop
TopIndent = 0
URLColor = clBlue
FullHeight = 38
object eCodigo: TLabel
Left = 45
Top = 33
Width = 96
Height = 13
Alignment = taRightJustify
Caption = 'C'#243'digo de contrato:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eFechaAlta: TLabel
Left = 299
Top = 33
Width = 33
Height = 13
Alignment = taRightJustify
Caption = 'Fecha:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eSituacion: TLabel
Left = 477
Top = 33
Width = 47
Height = 13
Alignment = taRightJustify
Caption = 'Situacion:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eDocumento: TLabel
Left = 659
Top = 33
Width = 58
Height = 13
Alignment = taRightJustify
Caption = 'Documento:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
Visible = False
end
object Codigo: TcxDBButtonEdit
Left = 145
Top = 29
DataBinding.DataField = 'CODIGO'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.Buttons = <
item
Default = True
Glyph.Data = {
26050000424D260500000000000036040000280000000F0000000F0000000100
080000000000F0000000330B0000330B00000001000000010000212121003131
31004A4A4A00FFBD4A00636363006B6B6B00FF8C6B00FFC66B00FFFF8C000031
9400ADADAD00FFE7B500FFFFB500C6C6C600FFFFD600004ADE00FF00FF002152
FF008C8CFF0021ADFF008CD6FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00101010101010
101010101010101010FF101010101010101010100100001010FF101010101010
101010040F13090010FF1010101010101010040F14120F0010FF101010101010
10040F14120F00101000101010050202020214120F00101010FF101005070707
0306110F0010101010FF10050A0B0808070306021010101010FF10050B0E0C08
080703021010101010FF10050B0E0C0C0808030210101010100010050B0E0C0C
0C0803021010101010FF10050D0B0E0C0C0B0A021010101010FF1010050D0B0B
0B0A00101010101010FF101010050505050510101010101010FF101010101010
10101010101010101000}
Kind = bkGlyph
end>
Properties.ReadOnly = False
Properties.OnButtonClick = CodigoPropertiesButtonClick
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro
TabOrder = 0
Width = 110
end
object FechaContrato: TcxDBDateEdit
Left = 335
Top = 29
DataBinding.DataField = 'FECHACONTRATO'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.DateButtons = [btnToday]
Properties.ImmediatePost = True
Properties.ReadOnly = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro
TabOrder = 1
Width = 110
end
object cbxSituacion: TcxDBComboBox
Left = 527
Top = 29
DataBinding.DataField = 'SITUACION'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.DropDownListStyle = lsFixedList
Properties.ImmediatePost = True
Properties.ImmediateUpdateText = True
Properties.ReadOnly = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro
TabOrder = 2
Width = 110
end
object cbxDocumento: TcxDBLookupComboBox
Left = 721
Top = 29
DataBinding.DataField = 'CODIGODOCUMENTO'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.DropDownAutoSize = True
Properties.DropDownListStyle = lsFixedList
Properties.DropDownRows = 10
Properties.GridMode = True
Properties.ImmediatePost = True
Properties.KeyFieldNames = 'CODIGO'
Properties.ListColumns = <
item
FieldName = 'DESCRIPCION'
end>
Properties.ListOptions.AnsiSort = True
Properties.ListOptions.GridLines = glNone
Properties.ListOptions.ShowHeader = False
Properties.ListSource = dsDocumentos
Properties.ReadOnly = True
Properties.OnValidate = cbxDocumentoPropertiesValidate
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro
TabOrder = 3
Visible = False
Width = 300
end
end
object pnlPaginas: TRdxPanel
Left = 10
Top = 89
Width = 833
Height = 320
Caption = ' '
ParentColor = True
ColorHighLight = 8623776
ColorShadow = 8623776
Align = alClient
TabOrder = 1
UseDockManager = True
object Paginas: TRdxPagesControl
Left = 0
Top = 0
Width = 833
Height = 320
ActivePage = pagContenido
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
MultiLine = True
ParentFont = False
TabOrder = 0
TabWidth = 120
Color = 15726583
ColorTab = 11590911
FontTab.Charset = DEFAULT_CHARSET
FontTab.Color = 18299
FontTab.Height = -11
FontTab.Name = 'Tahoma'
FontTab.Style = [fsBold]
object pagCliente: TTabSheet
Caption = 'Datos del cliente'
object Label2: TLabel
Left = 51
Top = 26
Width = 86
Height = 13
Alignment = taRightJustify
Caption = 'C'#243'digo de cliente:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eNIFCIF: TLabel
Left = 279
Top = 26
Width = 48
Height = 13
Alignment = taRightJustify
Caption = 'NIF / CIF:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eNumero: TLabel
Left = 473
Top = 80
Width = 16
Height = 13
Alignment = taRightJustify
Caption = 'N'#186':'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object ePiso: TLabel
Left = 560
Top = 80
Width = 23
Height = 13
Alignment = taRightJustify
Caption = 'Piso:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eCodigoPostal: TLabel
Left = 468
Top = 107
Width = 21
Height = 13
Alignment = taRightJustify
Caption = 'C.P:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eNombre: TLabel
Left = 96
Top = 53
Width = 41
Height = 13
Alignment = taRightJustify
Caption = 'Nombre:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eDireccion: TLabel
Left = 110
Top = 80
Width = 27
Height = 13
Alignment = taRightJustify
Caption = 'Calle:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eProvincia: TLabel
Left = 90
Top = 106
Width = 47
Height = 13
Alignment = taRightJustify
Caption = 'Provincia:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object ePoblacion: TLabel
Left = 88
Top = 133
Width = 49
Height = 13
Alignment = taRightJustify
Caption = 'Poblaci'#243'n:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eTelefono1: TLabel
Left = 93
Top = 159
Width = 41
Height = 13
Alignment = taRightJustify
Caption = 'Telef. 1:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eTelefono2: TLabel
Left = 285
Top = 159
Width = 41
Height = 13
Alignment = taRightJustify
Caption = 'Telef. 2:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eFax: TLabel
Left = 464
Top = 159
Width = 22
Height = 13
Alignment = taRightJustify
Caption = 'Fax:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eMovil1: TLabel
Left = 97
Top = 185
Width = 37
Height = 13
Alignment = taRightJustify
Caption = 'M'#243'vil 1:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eMovil2: TLabel
Left = 289
Top = 185
Width = 37
Height = 13
Alignment = taRightJustify
Caption = 'M'#243'vil 2:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object ePersona: TLabel
Left = 31
Top = 213
Width = 103
Height = 13
Alignment = taRightJustify
Caption = 'Persona de contacto:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object CodCliente: TcxDBButtonEdit
Left = 141
Top = 22
DataBinding.DataField = 'CODIGOCLIENTE'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.Buttons = <
item
Default = True
Glyph.Data = {
26050000424D260500000000000036040000280000000F0000000F0000000100
080000000000F0000000330B0000330B00000001000000010000212121003131
31004A4A4A00FFBD4A00636363006B6B6B00FF8C6B00FFC66B00FFFF8C000031
9400ADADAD00FFE7B500FFFFB500C6C6C600FFFFD600004ADE00FF00FF002152
FF008C8CFF0021ADFF008CD6FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00101010101010
101010101010101010FF101010101010101010100100001010FF101010101010
101010040F13090010FF1010101010101010040F14120F0010FF101010101010
10040F14120F00101000101010050202020214120F00101010FF101005070707
0306110F0010101010FF10050A0B0808070306021010101010FF10050B0E0C08
080703021010101010FF10050B0E0C0C0808030210101010100010050B0E0C0C
0C0803021010101010FF10050D0B0E0C0C0B0A021010101010FF1010050D0B0B
0B0A00101010101010FF101010050505050510101010101010FF101010101010
10101010101010101000}
Kind = bkGlyph
end>
Properties.ReadOnly = False
Properties.OnButtonClick = CodClientePropertiesButtonClick
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 0
Width = 110
end
object NIFCIF: TcxDBTextEdit
Left = 331
Top = 23
AutoSize = False
DataBinding.DataField = 'NIFCIF'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.ReadOnly = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 1
Height = 21
Width = 110
end
object Numero: TcxDBTextEdit
Left = 493
Top = 76
AutoSize = False
DataBinding.DataField = 'NUMERO'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.ReadOnly = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 4
Height = 21
Width = 40
end
object Piso: TcxDBTextEdit
Left = 586
Top = 76
AutoSize = False
DataBinding.DataField = 'PISO'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.ReadOnly = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 5
Height = 21
Width = 40
end
object CodigoPostal: TcxDBTextEdit
Left = 493
Top = 103
AutoSize = False
DataBinding.DataField = 'CODIGOPOSTAL'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.ReadOnly = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 7
Height = 21
Width = 133
end
object Nombre: TcxDBTextEdit
Left = 141
Top = 50
AutoSize = False
DataBinding.DataField = 'NOMBRE'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.ReadOnly = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 2
Height = 21
Width = 300
end
object Calle: TcxDBTextEdit
Left = 141
Top = 76
AutoSize = False
DataBinding.DataField = 'CALLE'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.ReadOnly = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 3
Height = 21
Width = 300
end
object Provincia: TcxDBButtonEdit
Left = 141
Top = 102
DataBinding.DataField = 'PROVINCIA'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.Buttons = <
item
Default = True
Glyph.Data = {
26050000424D260500000000000036040000280000000F0000000F0000000100
080000000000F0000000330B0000330B00000001000000010000212121003131
31004A4A4A00FFBD4A00636363006B6B6B00FF8C6B00FFC66B00FFFF8C000031
9400ADADAD00FFE7B500FFFFB500C6C6C600FFFFD600004ADE00FF00FF002152
FF008C8CFF0021ADFF008CD6FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00101010101010
101010101010101010FF101010101010101010100100001010FF101010101010
101010040F13090010FF1010101010101010040F14120F0010FF101010101010
10040F14120F00101000101010050202020214120F00101010FF101005070707
0306110F0010101010FF10050A0B0808070306021010101010FF10050B0E0C08
080703021010101010FF10050B0E0C0C0808030210101010100010050B0E0C0C
0C0803021010101010FF10050D0B0E0C0C0B0A021010101010FF1010050D0B0B
0B0A00101010101010FF101010050505050510101010101010FF101010101010
10101010101010101000}
Kind = bkGlyph
end>
Properties.CharCase = ecUpperCase
Properties.ReadOnly = False
Properties.OnButtonClick = ProvinciaPropertiesButtonClick
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 6
Width = 300
end
object Poblacion: TcxDBButtonEdit
Left = 141
Top = 129
DataBinding.DataField = 'POBLACION'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.Buttons = <
item
Default = True
Glyph.Data = {
26050000424D260500000000000036040000280000000F0000000F0000000100
080000000000F0000000330B0000330B00000001000000010000212121003131
31004A4A4A00FFBD4A00636363006B6B6B00FF8C6B00FFC66B00FFFF8C000031
9400ADADAD00FFE7B500FFFFB500C6C6C600FFFFD600004ADE00FF00FF002152
FF008C8CFF0021ADFF008CD6FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00101010101010
101010101010101010FF101010101010101010100100001010FF101010101010
101010040F13090010FF1010101010101010040F14120F0010FF101010101010
10040F14120F00101000101010050202020214120F00101010FF101005070707
0306110F0010101010FF10050A0B0808070306021010101010FF10050B0E0C08
080703021010101010FF10050B0E0C0C0808030210101010100010050B0E0C0C
0C0803021010101010FF10050D0B0E0C0C0B0A021010101010FF1010050D0B0B
0B0A00101010101010FF101010050505050510101010101010FF101010101010
10101010101010101000}
Kind = bkGlyph
end>
Properties.ReadOnly = False
Properties.OnButtonClick = PoblacionPropertiesButtonClick
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 8
Width = 300
end
object Telefono1: TcxDBTextEdit
Left = 138
Top = 156
AutoSize = False
DataBinding.DataField = 'TELEFONO1'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.ReadOnly = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 9
Height = 21
Width = 110
end
object Telefono2: TcxDBTextEdit
Left = 328
Top = 156
AutoSize = False
DataBinding.DataField = 'TELEFONO2'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.ReadOnly = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 10
Height = 21
Width = 110
end
object Fax: TcxDBTextEdit
Left = 490
Top = 156
AutoSize = False
DataBinding.DataField = 'FAX'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.ReadOnly = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 11
Height = 21
Width = 133
end
object Movil1: TcxDBTextEdit
Left = 138
Top = 182
AutoSize = False
DataBinding.DataField = 'MOVIL1'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.ReadOnly = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 12
Height = 21
Width = 110
end
object Movil2: TcxDBTextEdit
Left = 328
Top = 182
AutoSize = False
DataBinding.DataField = 'MOVIL2'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.ReadOnly = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 13
Height = 21
Width = 110
end
object PersonaContacto: TcxDBTextEdit
Left = 138
Top = 209
AutoSize = False
DataBinding.DataField = 'PERSONACONTACTO'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.ReadOnly = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 14
Height = 21
Width = 300
end
end
object pagContenido: TTabSheet
Caption = 'Contenido'
ImageIndex = 1
object pnlGridArticulos: TPanel
Left = 0
Top = 0
Width = 825
Height = 292
Align = alClient
BevelOuter = bvNone
BorderWidth = 5
ParentColor = True
TabOrder = 0
TabStop = True
object pnlBarraContenido: TRdxPanel
Left = 5
Top = 31
Width = 815
Height = 26
Caption = ' '
ParentColor = True
ColorHighLight = 8623776
ColorShadow = 16383743
Align = alTop
TabOrder = 0
UseDockManager = True
object bAnadirCon: TRdxBoton
Left = 0
Top = 0
Width = 105
Height = 19
Action = actAnadirDetalle
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
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 = []
Margin = 10
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 0
Spacing = 0
end
object bEliminar: TRdxBoton
Left = 111
Top = 0
Width = 105
Height = 19
Action = actEliminarDetalle
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
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 = []
Margin = 10
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 1
Spacing = 0
end
object bEliminarTodo: TRdxBoton
Left = 223
Top = 0
Width = 105
Height = 19
Action = actEliminarTodoDetalle
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
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 = []
Margin = 10
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 2
Spacing = 0
end
end
object gridDetalles: TcxGrid
Left = 5
Top = 57
Width = 815
Height = 153
Align = alClient
BevelInner = bvNone
BevelKind = bkFlat
BorderStyle = cxcbsNone
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 1
OnResize = gridDetallesResize
LookAndFeel.Kind = lfFlat
LookAndFeel.NativeStyle = True
object VistaDetalles: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = dsDetallesContrato
DataController.KeyFieldNames = 'CODIGOCONTRATO;NUMCONCEPTO'
DataController.Options = [dcoAnsiSort, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnGrouping = False
OptionsSelection.CellSelect = False
OptionsSelection.HideFocusRectOnExit = False
OptionsSelection.InvertSelect = False
OptionsSelection.UnselectFocusedRecordOnExit = False
OptionsView.CellEndEllipsis = True
OptionsView.CellAutoHeight = True
OptionsView.ColumnAutoWidth = True
OptionsView.GridLineColor = 14280169
OptionsView.GroupByBox = False
OptionsView.HeaderEndEllipsis = True
OptionsView.Indicator = True
OptionsView.RowSeparatorColor = 14280169
Styles.StyleSheet = dmConfiguracion.StyleSheetGrid
end
object VistaPropiedades: TcxGridDBCardView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = dsPropiedadesContrato
DataController.KeyFieldNames = 'CODIGOCONTRATO;NUMCONCEPTO;NUMPROPIEDAD'
DataController.Options = [dcoAnsiSort, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
LayoutDirection = ldVertical
OptionsBehavior.FocusCellOnTab = True
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.RowFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsData.Inserting = False
OptionsSelection.UnselectFocusedRecordOnExit = False
OptionsView.CellEndEllipsis = True
OptionsView.CardBorderWidth = 1
OptionsView.CardWidth = 450
OptionsView.CellAutoHeight = True
OptionsView.RowCaptionAutoHeight = True
OptionsView.RowCaptionEndEllipsis = True
OptionsView.SeparatorColor = 15726583
OptionsView.SeparatorWidth = 1
Styles.StyleSheet = dmConfiguracion.StyleSheetCard
object VistaPropiedadesDBCardViewRow2: TcxGridDBCardViewRow
Caption = 'Propiedad'
DataBinding.FieldName = 'CODIGOPROPIEDAD'
PropertiesClassName = 'TcxLookupComboBoxProperties'
Properties.GridMode = True
Properties.ImmediatePost = True
Properties.KeyFieldNames = 'CODIGO'
Properties.ListColumns = <
item
FieldName = 'DESCRIPCION'
end>
Properties.ListOptions.AnsiSort = True
Properties.ListOptions.GridLines = glNone
Properties.ListOptions.ShowHeader = False
Properties.ListSource = dsPropiedadesContrato
end
object VistaPropiedadesDBCardViewRow3: TcxGridDBCardViewRow
Caption = 'Valor'
DataBinding.FieldName = 'VALOR'
PropertiesClassName = 'TcxTextEditProperties'
OnCustomDrawCell = VistaPropiedadesDBCardViewRow3CustomDrawCell
end
end
object gridDetallesLevel1: TcxGridLevel
GridView = VistaDetalles
end
end
object pnlBarraPropiedades: TRdxPanel
Left = 5
Top = 5
Width = 815
Height = 26
Caption = ' '
ParentColor = True
ColorHighLight = 8623776
ColorShadow = 16383743
Align = alTop
TabOrder = 2
UseDockManager = True
object eSeccion: TLabel
Left = 416
Top = 4
Width = 40
Height = 13
Caption = 'Secci'#243'n:'
FocusControl = Seccion
Visible = False
end
object bAnadirProp: TRdxBoton
Left = 0
Top = 0
Width = 105
Height = 19
Action = actAnadirPropiedad
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
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 = []
Margin = 10
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 0
Spacing = 0
end
object bEliminarProp: TRdxBoton
Left = 112
Top = 0
Width = 113
Height = 19
Action = actEliminarPropiedad
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
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 = []
Margin = 10
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 1
Spacing = 0
end
object bSubir: TRdxBoton
Left = 245
Top = 0
Width = 59
Height = 19
Action = actSubir
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
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 = {
42010000424D4201000000000000760000002800000011000000110000000100
040000000000CC000000230B0000230B0000100000001000000039424A00FF00
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111
1111100000001111111111111111100000001111110000011111100000001111
1100000111111000000011111100000111111000000011111100000111111000
0000111111000001111110000000111111000001111110000000110000000000
0001100000001110000000000011100000001111000000000111100000001111
1000000011111000000011111100000111111000000011111110001111111000
0000111111110111111110000000111111111111111110000000111111111111
111110000000}
Margin = 5
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 2
Spacing = 5
end
object bBajar: TRdxBoton
Left = 311
Top = 0
Width = 59
Height = 19
Action = actBajar
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
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 = {
42010000424D4201000000000000760000002800000011000000110000000100
040000000000CC000000230B0000230B0000100000001000000039424A00FF00
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111
1111100000001111111111111111100000001111111101111111100000001111
1110001111111000000011111100000111111000000011111000000011111000
0000111100000000011110000000111000000000001110000000110000000000
0001100000001111110000011111100000001111110000011111100000001111
1100000111111000000011111100000111111000000011111100000111111000
0000111111000001111110000000111111111111111110000000111111111111
111110000000}
Margin = 5
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 3
Spacing = 5
end
object Seccion: TcxComboBox
Left = 464
Top = 0
ParentFont = False
Properties.DropDownListStyle = lsFixedList
Properties.DropDownRows = 4
Properties.ImmediatePost = True
Properties.ImmediateUpdateText = True
Properties.Items.Strings = (
'FRENTE'
'INTERIOR')
Properties.ReadOnly = False
Properties.OnChange = SeccionPropertiesChange
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 4
Visible = False
Width = 97
end
end
object pnlObservaciones: TRdxPanel
Left = 5
Top = 210
Width = 815
Height = 77
Caption = ' '
ParentColor = True
ColorHighLight = clBtnText
ColorShadow = clBtnShadow
Align = alBottom
TabOrder = 3
UseDockManager = True
object Label1: TLabel
Left = 0
Top = 0
Width = 815
Height = 22
Align = alTop
AutoSize = False
Caption = 'Observaciones:'
Font.Charset = DEFAULT_CHARSET
Font.Color = 18299
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
Layout = tlBottom
end
object Observaciones: TcxMemo
Left = 0
Top = 22
Align = alClient
ParentFont = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 0
OnExit = ObservacionesExit
Height = 55
Width = 815
end
end
end
end
object pagPrecios: TTabSheet
Caption = 'Importes'
object pnlPrecios: TPanel
Left = 0
Top = 0
Width = 825
Height = 292
Align = alClient
BevelOuter = bvNone
BorderWidth = 5
ParentColor = True
TabOrder = 0
TabStop = True
OnResize = pnlPreciosResize
object pnlBarraPrecio: TRdxPanel
Left = 5
Top = 5
Width = 875
Height = 26
Caption = ' '
ParentColor = True
ColorHighLight = 8623776
ColorShadow = 16383743
Align = alTop
TabOrder = 0
UseDockManager = True
object RdxBoton1: TRdxBoton
Left = 0
Top = 0
Width = 105
Height = 19
Action = actAnadirDetalle
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
Caption = 'A'#241'adir precio'
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 = []
Margin = 10
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 0
Spacing = 0
end
object RdxBoton2: TRdxBoton
Left = 111
Top = 0
Width = 105
Height = 19
Action = actEliminarDetalle
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
Caption = 'Eliminar precio'
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 = []
Margin = 10
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 1
Spacing = 0
end
end
object pnlContenido: TPanel
Left = 5
Top = 31
Width = 875
Height = 308
Align = alClient
BevelOuter = bvNone
BorderWidth = 5
ParentColor = True
TabOrder = 1
TabStop = True
OnResize = pnlPreciosResize
object pnlGrid: TRdxPanel
Left = 5
Top = 5
Width = 332
Height = 298
BorderStyle = bsSingle
Caption = ' '
BorderWidth = 1
Color = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
Align = alLeft
TabOrder = 0
AutoSize = True
UseDockManager = True
object gridPrecios: TDBCtrlGrid
Left = 1
Top = 1
Width = 330
Height = 296
Align = alClient
AllowDelete = False
AllowInsert = False
Color = 14280169
DataSource = dsDetallesContrato
PanelBorder = gbNone
PanelHeight = 98
PanelWidth = 313
ParentColor = False
TabOrder = 0
SelectedColor = clHighlight
object DBEdit1: TDBEdit
Left = 1
Top = 1
Width = 190
Height = 16
BevelInner = bvNone
BevelOuter = bvNone
BorderStyle = bsNone
Color = 16383743
DataField = 'DESCRIPCION'
DataSource = dsDetallesContrato
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 193
Top = 1
Width = 119
Height = 16
BevelInner = bvNone
BevelOuter = bvNone
BorderStyle = bsNone
Color = 16383743
DataField = 'IMPORTEUNIDAD'
DataSource = dsDetallesContrato
TabOrder = 1
end
end
end
end
end
end
object pagNotasVarias: TTabSheet
Caption = 'Notas varias'
ImageIndex = 3
OnResize = pagNotasVariasResize
object pnlFormasPago: TPanel
Left = 0
Top = 0
Width = 825
Height = 100
Align = alTop
BevelOuter = bvNone
ParentColor = True
TabOrder = 0
object RdxPanel4: TPanel
Left = 0
Top = 0
Width = 125
Height = 100
Align = alLeft
BevelOuter = bvNone
Caption = ' '
ParentColor = True
TabOrder = 0
object eFormasPago: TLabel
Left = 44
Top = 10
Width = 81
Height = 13
Alignment = taRightJustify
Caption = 'Formas de pago:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
WordWrap = True
end
end
object RdxPanel5: TPanel
Left = 125
Top = 0
Width = 700
Height = 100
Align = alClient
BevelOuter = bvNone
BorderWidth = 10
Caption = ' '
ParentColor = True
TabOrder = 1
object FormasPago: TcxDBMemo
Left = 10
Top = 10
Align = alClient
DataBinding.DataField = 'FORMAPAGO'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.ReadOnly = False
Properties.ScrollBars = ssVertical
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 0
Height = 80
Width = 680
end
end
end
object pnlPlazosEntrega: TPanel
Left = 0
Top = 100
Width = 825
Height = 100
Align = alTop
BevelOuter = bvNone
ParentColor = True
TabOrder = 1
object Panel2: TPanel
Left = 0
Top = 0
Width = 125
Height = 100
Align = alLeft
BevelOuter = bvNone
Caption = ' '
ParentColor = True
TabOrder = 0
object ePlazosEntrega: TLabel
Left = 35
Top = 10
Width = 90
Height = 13
Alignment = taRightJustify
Caption = 'Plazos de entrega:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
WordWrap = True
end
end
object Panel3: TPanel
Left = 125
Top = 0
Width = 700
Height = 100
Align = alClient
BevelOuter = bvNone
BorderWidth = 10
Caption = ' '
ParentColor = True
TabOrder = 1
object PlazosEntrega: TcxDBMemo
Left = 10
Top = 10
Align = alClient
DataBinding.DataField = 'PLAZOENTREGA'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.ReadOnly = False
Properties.ScrollBars = ssVertical
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 0
Height = 80
Width = 680
end
end
end
object pnlNota: TPanel
Left = 0
Top = 200
Width = 825
Height = 100
Align = alTop
BevelOuter = bvNone
ParentColor = True
TabOrder = 2
object Panel4: TPanel
Left = 0
Top = 0
Width = 125
Height = 100
Align = alLeft
BevelOuter = bvNone
Caption = ' '
ParentColor = True
TabOrder = 0
object eNota: TLabel
Left = 98
Top = 10
Width = 27
Height = 13
Alignment = taRightJustify
Caption = 'Nota:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
WordWrap = True
end
end
object Panel5: TPanel
Left = 125
Top = 0
Width = 700
Height = 100
Align = alClient
BevelOuter = bvNone
BorderWidth = 10
Caption = ' '
ParentColor = True
TabOrder = 1
object Nota: TcxDBMemo
Left = 10
Top = 10
Align = alClient
DataBinding.DataField = 'OBSERVACIONES'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.ReadOnly = False
Properties.ScrollBars = ssVertical
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 0
Height = 80
Width = 680
end
end
end
end
object pagPlanos: TTabSheet
Caption = 'Planos y fotos'
ImageIndex = 4
object Panel14: TPanel
Left = 0
Top = 0
Width = 825
Height = 35
Align = alTop
AutoSize = True
BevelOuter = bvNone
BorderWidth = 5
Caption = ' '
ParentColor = True
TabOrder = 0
object Label6: TLabel
Left = 390
Top = 11
Width = 42
Height = 13
Alignment = taRightJustify
Caption = 'Tama'#241'o:'
end
object RdxBoton3: TRdxBoton
Left = 7
Top = 9
Width = 81
Height = 19
Action = actAnadirPlano
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
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 = []
Margin = 10
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 0
Spacing = 0
end
object RdxBoton4: TRdxBoton
Left = 94
Top = 9
Width = 86
Height = 19
Action = actEliminarPlano
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
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 = []
Margin = 10
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 1
Spacing = 0
end
object JvTrackBar1: TJvTrackBar
Left = 433
Top = 5
Width = 150
Height = 25
Max = 100
Position = 75
TabOrder = 2
TickStyle = tsManual
OnChange = JvTrackBar1Change
ShowRange = False
end
object RdxBoton6: TRdxBoton
Left = 194
Top = 9
Width = 86
Height = 19
Action = actRefrescarPlano
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
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 = []
Margin = 10
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 3
Spacing = 0
end
end
object tvPlanos: TJvThumbView
Left = 0
Top = 35
Width = 825
Height = 257
HorzScrollBar.Tracking = True
VertScrollBar.Tracking = True
Align = alClient
Color = clWindow
ParentColor = False
TabOrder = 1
TabStop = True
OnDblClick = tvPlanosDblClick
AlignView = vtFitToScreen
AutoScrolling = True
ThumbGap = 4
AutoHandleKeyb = True
MinMemory = True
MaxWidth = 200
MaxHeight = 200
Size = 75
ScrollMode = smVertical
Sorted = True
AsButtons = True
TitlePlacement = tpDown
Filter =
'Todos (*.png;*.jpg;*.jpeg;*.bmp)|*.png;*.jpg;*.jpeg;*.bmp|Portab' +
'le Network Graphics (*.png)|*.png|JPEG Image File (*.jpg)|*.jpg|' +
'JPEG Image File (*.jpeg)|*.jpeg|Bitmaps (*.bmp)|*.bmp'
ThumbColor = clNone
ShowShadow = True
ShadowColor = clBlack
end
end
end
end
object pnlImportes: TAdvPanel
Left = 10
Top = 409
Width = 833
Height = 85
Align = alBottom
BevelOuter = bvNone
Color = 16383743
TabOrder = 2
UseDockManager = True
Version = '1.5.0.0'
AnchorHint = False
AutoSize.Enabled = False
AutoSize.Height = True
AutoSize.Width = True
AutoHideChildren = True
BackgroundPosition = bpTopLeft
BorderColor = clBlack
BorderShadow = False
Buffered = True
CanMove = False
CanSize = False
Caption.Background.Data = {
72010000424D7201000000000000760000002800000014000000150000000100
040000000000FC000000D30E0000D30E00001000000010000000B5BDC600FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111
1111111100001111111111111111111100001111111111111111111100001111
1111111111110000000011111111111111111111000011111111111111111111
0000111111111111111111110000111111111111111111110000111111111111
1111111100001111111111111111111100001111111111111111111100001111
1111111111111111000011111111111111111111000011111111111111111111
0000111111111111111111110000111111111111111111110000111111111111
1111111100001111111111111111111100001111111111111111111100001111
11111111111111110000111111111111111111110000}
Caption.ButtonPosition = cbpLeft
Caption.Color = clBtnFace
Caption.ColorTo = clNone
Caption.CloseColor = clBtnFace
Caption.CloseButton = False
Caption.CloseButtonColor = clBlack
Caption.Flat = True
Caption.Font.Charset = DEFAULT_CHARSET
Caption.Font.Color = 18299
Caption.Font.Height = -11
Caption.Font.Name = 'Tahoma'
Caption.Font.Style = [fsBold]
Caption.Height = 23
Caption.Indent = -4
Caption.MinMaxButton = True
Caption.MinMaxButtonColor = 18299
Caption.ShadeLight = 200
Caption.ShadeGrain = 0
Caption.ShadeType = stBitmapRStretch
Caption.Shape = csRectangle
Caption.Text = 'Datos de la factura de cliente'
Caption.TopIndent = 0
Caption.Visible = False
Collaps = False
CollapsColor = clWhite
CollapsDelay = 20
CollapsSteps = 0
ColorTo = clNone
FixedTop = False
FixedLeft = False
FixedHeight = False
FixedWidth = False
FreeOnClose = False
Hover = False
HoverColor = clNone
HoverFontColor = clNone
Indent = 0
LineSpacing = 0
Position.Save = False
Position.Location = clRegistry
ShadowColor = clGray
ShadowOffset = 2
ShowMoveCursor = False
TextVAlign = tvaTop
TopIndent = 0
URLColor = clBlue
FullHeight = 38
object Label7: TLabel
Left = 66
Top = 13
Width = 74
Height = 13
Caption = 'Descuento(%):'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 228
Top = 13
Width = 40
Height = 13
Alignment = taRightJustify
Caption = 'IVA(%):'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 22
Top = 39
Width = 70
Height = 13
Alignment = taRightJustify
Caption = 'Base imponible'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 133
Top = 39
Width = 72
Height = 13
Alignment = taRightJustify
Caption = 'Importe de dto'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 228
Top = 39
Width = 73
Height = 13
Alignment = taRightJustify
Caption = 'Importe de IVA'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 338
Top = 39
Width = 77
Height = 13
Alignment = taRightJustify
Caption = 'Importe total'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
end
object Descuento: TcxDBTextEdit
Left = 145
Top = 9
DataBinding.DataField = 'DESCUENTO'
DataBinding.DataSource = dsContrato
ParentFont = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro
TabOrder = 0
Width = 57
end
object IVA: TcxDBTextEdit
Left = 271
Top = 9
DataBinding.DataField = 'IVA'
DataBinding.DataSource = dsContrato
ParentFont = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro
TabOrder = 1
Width = 57
end
object BaseImponible: TcxDBTextEdit
Left = 2
Top = 59
TabStop = False
DataBinding.DataField = 'BASEIMPONIBLE'
DataBinding.DataSource = dsContrato
Properties.Alignment.Horz = taRightJustify
Properties.AutoSelect = False
Properties.ReadOnly = True
Style.BorderStyle = ebsNone
Style.Color = 15726583
Style.HotTrack = False
TabOrder = 2
Width = 90
end
object ImporteDescuento: TcxDBTextEdit
Left = 115
Top = 59
TabStop = False
DataBinding.DataField = 'IMPORTEDESCUENTO'
DataBinding.DataSource = dsContrato
Properties.Alignment.Horz = taRightJustify
Properties.AutoSelect = False
Properties.ReadOnly = True
Style.BorderStyle = ebsNone
Style.Color = 15726583
Style.HotTrack = False
TabOrder = 3
Width = 90
end
object ImporteIVA: TcxDBTextEdit
Left = 211
Top = 59
TabStop = False
DataBinding.DataField = 'IMPORTEIVA'
DataBinding.DataSource = dsContrato
Properties.Alignment.Horz = taRightJustify
Properties.AutoSelect = False
Properties.ReadOnly = True
Style.BorderStyle = ebsNone
Style.Color = 15726583
Style.HotTrack = False
TabOrder = 4
Width = 90
end
object ImporteTotal: TcxDBTextEdit
Left = 325
Top = 59
TabStop = False
DataBinding.DataField = 'IMPORTETOTAL'
DataBinding.DataSource = dsContrato
ParentFont = False
Properties.Alignment.Horz = taRightJustify
Properties.AutoSelect = False
Properties.ReadOnly = True
Style.BorderStyle = ebsNone
Style.Color = 15726583
Style.Font.Charset = DEFAULT_CHARSET
Style.Font.Color = clWindowText
Style.Font.Height = -11
Style.Font.Name = 'Tahoma'
Style.Font.Style = [fsBold]
Style.HotTrack = False
Style.IsFontAssigned = True
TabOrder = 5
Width = 90
end
end
end
object dsContrato: TDataSource
AutoEdit = False
Left = 496
Top = 176
end
object dsDetallesContrato: TDataSource
AutoEdit = False
Left = 464
Top = 176
end
object ActionList1: TActionList
Left = 528
Top = 176
object actAnadirDetalle: TAction
Caption = 'A'#241'adir concepto'
OnExecute = actAnadirDetalleExecute
OnUpdate = actAnadirDetalleUpdate
end
object actEliminarDetalle: TAction
Caption = 'Eliminar concepto'
OnExecute = actEliminarDetalleExecute
OnUpdate = actEliminarDetalleUpdate
end
object actEliminarTodoDetalle: TAction
Caption = 'Eliminar todo'
OnExecute = actEliminarTodoDetalleExecute
OnUpdate = actEliminarTodoDetalleUpdate
end
object actAnadirPropiedad: TAction
Caption = 'A'#241'adir propiedad'
OnExecute = actAnadirPropiedadExecute
OnUpdate = actAnadirPropiedadUpdate
end
object actEliminarPropiedad: TAction
Caption = 'Eliminar propiedad'
OnExecute = actEliminarPropiedadExecute
OnUpdate = actEliminarPropiedadUpdate
end
object actAnadirPlano: TAction
Caption = 'A'#241'adir plano'
OnExecute = actAnadirPlanoExecute
OnUpdate = actAnadirPlanoUpdate
end
object actEliminarPlano: TAction
Caption = 'Eliminar plano'
OnExecute = actEliminarPlanoExecute
OnUpdate = actEliminarPlanoUpdate
end
object actRefrescarPlano: TAction
Caption = 'Refrescar'
OnExecute = actRefrescarPlanoExecute
end
object actSubir: TAction
Caption = 'Subir'
ImageIndex = 0
OnExecute = actSubirExecute
OnUpdate = actSubirUpdate
end
object actBajar: TAction
Caption = 'Bajar'
ImageIndex = 1
OnExecute = actBajarExecute
OnUpdate = actBajarUpdate
end
end
object dsPropiedadesContrato: TDataSource
AutoEdit = False
Left = 432
Top = 176
end
object dsDocumentos: TDataSource
DataSet = TablaDocumentos
Left = 16
Top = 56
end
object TablaDocumentos: TIBQuery
BufferChunks = 1000
CachedUpdates = False
SQL.Strings = (
'select doc.codigo, doc.descripcion, doc.familia, fam.descripcion' +
' descfamilia,'
'doc.formapago, doc.plazoentrega, doc.notas'
'from documentos doc left outer join familias fam'
'on (fam.codigo = doc.familia);')
Left = 16
Top = 88
end
object TablaPropiedades: TIBQuery
BufferChunks = 1000
CachedUpdates = False
SQL.Strings = (
'select * from PROPIEDADES'
'order by DESCRIPCION')
Left = 392
Top = 264
end
object TablaValores: TIBQuery
BufferChunks = 1000
CachedUpdates = False
SQL.Strings = (
'select * from VALORES'
'where CODIGOPROPIEDAD = :CODIGOPROPIEDAD'
'order by DESCRIPCION')
Left = 424
Top = 264
ParamData = <
item
DataType = ftUnknown
Name = 'CODIGOPROPIEDAD'
ParamType = ptUnknown
end>
end
object dsValores: TDataSource
DataSet = TablaValores
Left = 424
Top = 296
end
object dsPropiedades: TDataSource
DataSet = TablaPropiedades
Left = 392
Top = 296
end
object OpenDialog1: TOpenDialog
Options = [ofHideReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing]
Left = 48
Top = 144
end
end