object fEditorFechaPago: TfEditorFechaPago Left = 0 Top = 0 BorderStyle = bsDialog Caption = 'Fecha del cobro / devoluci'#243'n' ClientHeight = 295 ClientWidth = 383 Color = clWindow Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnShow = FormShow DesignSize = ( 383 295) PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 21 Top = 16 Width = 246 Height = 26 Caption = 'Introduzca la fecha en la que se ha hecho efectivo '#13#10'el cobro o ' + 'la devoluci'#243'n:' end object Label2: TLabel Left = 39 Top = 67 Width = 77 Height = 13 Alignment = taRightJustify Caption = 'Fecha del pago:' FocusControl = eFechaPago end object eFechaPago: TcxDateEdit Left = 122 Top = 64 Properties.OnChange = eFechaPagoPropertiesChange 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 = 132 end object Panel1: TPanel Left = 0 Top = 254 Width = 383 Height = 41 Align = alBottom TabOrder = 1 object bAceptar: TButton Left = 119 Top = 8 Width = 75 Height = 25 Caption = 'Aceptar' ModalResult = 1 TabOrder = 0 OnClick = bAceptarClick end object bCancelar: TButton Left = 200 Top = 8 Width = 75 Height = 25 Caption = 'Cancelar' ModalResult = 2 TabOrder = 1 end end object eContabilizar: TcxCheckBox Left = 38 Top = 120 Caption = 'Ignorar en contabiliad' Properties.ValueChecked = 1 Properties.ValueUnchecked = 0 Properties.OnChange = eContabilizarPropertiesChange TabOrder = 2 Width = 203 end object eRefSubCuenta: TcxTextEdit Left = 39 Top = 147 Anchors = [akLeft, akTop, akRight] AutoSize = False Properties.ReadOnly = True Properties.ValidateOnEnter = True Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Color = 14745599 Style.HotTrack = False Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 3 Height = 21 Width = 215 end object eSubCuenta: TcxTextEdit Left = 38 Top = 174 Anchors = [akLeft, akTop, akRight] AutoSize = False Properties.ReadOnly = True Properties.ValidateOnEnter = True Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Color = 14745599 Style.HotTrack = False Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 4 Height = 21 Width = 297 end object BitBtn3: TBitBtn Left = 260 Top = 143 Width = 75 Height = 25 Caption = 'Elegir subcuenta' TabOrder = 5 OnClick = BitBtn3Click end object eIDSubcuenta: TcxTextEdit Left = 38 Top = 201 Anchors = [akLeft, akTop, akRight] AutoSize = False Properties.ReadOnly = True Properties.ValidateOnEnter = True Properties.OnChange = eIDSubcuentaPropertiesChange Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Color = 14745599 Style.HotTrack = False Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 6 Height = 21 Width = 43 end end