object fEditorSituacionFacturaCliente: TfEditorSituacionFacturaCliente Left = 497 Top = 344 BorderStyle = bsDialog Caption = 'Cambiar situaci'#243'n de la factura' ClientHeight = 273 ClientWidth = 423 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poMainFormCenter PixelsPerInch = 96 TextHeight = 13 object JvgWizardHeader1: TJvgWizardHeader Left = 0 Top = 0 Width = 423 Height = 73 CaptionFont.Charset = DEFAULT_CHARSET CaptionFont.Color = clWindowText CaptionFont.Height = -11 CaptionFont.Name = 'Tahoma' CaptionFont.Style = [fsBold] CommentFont.Charset = DEFAULT_CHARSET CommentFont.Color = clWindowText CommentFont.Height = -11 CommentFont.Name = 'Tahoma' CommentFont.Style = [] SymbolFont.Charset = DEFAULT_CHARSET SymbolFont.Color = clHighlightText SymbolFont.Height = -35 SymbolFont.Name = 'Wingdings' SymbolFont.Style = [fsBold] Captions.Strings = ( 'Cambiar la situaci'#243'n de la factura') Comments.Strings = ( 'Indique la nueva situaci'#243'n de la factura o pulse en '#39'Cancelar'#39' p' + 'ara no hacer ning'#250'n cambio.') Gradient.FromColor = clHighlight Gradient.ToColor = clWindow Gradient.Active = True Gradient.Orientation = fgdVertical BufferedDraw = False ExplicitWidth = 491 end object Label4: TLabel Left = 56 Top = 96 Width = 120 Height = 13 Caption = 'Fecha de la factura: ' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 56 Top = 185 Width = 138 Height = 13 Caption = 'La factura fue pagada el d'#237'a:' end object pnlSeleccion: TPanel Left = 0 Top = 233 Width = 423 Height = 40 Align = alBottom BevelEdges = [beTop] BevelKind = bkTile BevelOuter = bvNone TabOrder = 0 DesignSize = ( 423 38) object bAceptar: TButton Left = 261 Top = 5 Width = 74 Height = 23 Action = actAceptar Anchors = [akRight] Default = True TabOrder = 0 end object bCancelar: TButton Left = 341 Top = 4 Width = 74 Height = 23 Anchors = [akRight] Cancel = True Caption = '&Cancelar' ModalResult = 2 TabOrder = 1 end end object rbPendiente: TRadioButton Left = 38 Top = 139 Width = 219 Height = 17 Action = actPendiente Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 1 end object rbPagado: TRadioButton Left = 38 Top = 162 Width = 219 Height = 17 Action = actPagado Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 2 end object edtFechaFacturaCliente: TEdit Left = 214 Top = 93 Width = 121 Height = 21 ReadOnly = True TabOrder = 3 end object edtFechaPagado: TcxDateEdit Left = 214 Top = 182 Properties.SaveTime = False Properties.ShowTime = False 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 = 4 Width = 121 end object ActionList1: TActionList Left = 8 Top = 88 object actPendiente: TAction Caption = 'La factura est'#225' pendiente de pago' OnExecute = actPendienteExecute end object actPagado: TAction Caption = 'La factura est'#225' completamente pagada' OnExecute = actPagadoExecute end object actAceptar: TAction Caption = '&Aceptar' OnExecute = actAceptarExecute end end end