object fEditorSituacionPedidoProveedor: TfEditorSituacionPedidoProveedor Left = 497 Top = 344 BorderStyle = bsDialog Caption = 'Cambiar situaci'#243'n del pedido' ClientHeight = 348 ClientWidth = 434 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 pnlHeader: TPanel Left = 0 Top = 0 Width = 656 Height = 64 Align = alTop BevelOuter = bvNone Color = clWhite Padding.Left = 25 Padding.Top = 8 Padding.Right = 25 Padding.Bottom = 8 ParentBackground = False TabOrder = 5 object lblTitle: TLabel AlignWithMargins = True Left = 25 Top = 8 Width = 606 Height = 13 Margins.Left = 0 Margins.Top = 0 Margins.Right = 0 Margins.Bottom = 8 Align = alTop Caption = 'Cambiar la situaci'#243'n del pedido' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False ExplicitWidth = 135 end object lblComments: TLabel AlignWithMargins = True Left = 50 Top = 29 Width = 581 Height = 27 Margins.Left = 25 Margins.Top = 0 Margins.Right = 0 Align = alClient ExplicitWidth = 3 ExplicitHeight = 13 Caption = 'Indique la nueva situaci'#243'n del pedido o pulse en '#39'Cancelar'#39' para' + ' no hacer ning'#250'n cambio.' end end object Label4: TLabel Left = 56 Top = 96 Width = 107 Height = 13 Caption = 'Fecha del pedido: ' 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 = 196 Width = 198 Height = 13 Caption = 'El pedido fue recibido parcialmente el d'#237'a:' end object Label1: TLabel Left = 55 Top = 252 Width = 187 Height = 13 Caption = 'El pedido fue recibido totalmente el d'#237'a:' end object pnlSeleccion: TPanel Left = 0 Top = 308 Width = 434 Height = 40 Align = alBottom BevelEdges = [beTop] BevelKind = bkTile BevelOuter = bvNone TabOrder = 0 DesignSize = ( 434 38) object bAceptar: TButton Left = 272 Top = 2 Width = 74 Height = 23 Action = actAceptar Anchors = [akRight] Default = True TabOrder = 0 end object bCancelar: TButton Left = 352 Top = 1 Width = 74 Height = 23 Anchors = [akRight] Cancel = True Caption = '&Cancelar' ModalResult = 2 TabOrder = 1 end end object rbPendiente: TRadioButton Left = 38 Top = 139 Width = 259 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 rbParcial: TRadioButton Left = 38 Top = 173 Width = 323 Height = 17 Action = actParcial Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 2 end object edtFechaPedidoProveedor: TEdit Left = 272 Top = 93 Width = 121 Height = 21 ReadOnly = True TabOrder = 3 end object edtFechaParcial: TcxDateEdit Left = 272 Top = 193 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 rbRecibido: TRadioButton Left = 37 Top = 229 Width = 323 Height = 17 Action = actRecibido Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 5 end object eFechaRecibido: TcxDateEdit Left = 272 Top = 249 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 = 6 Width = 121 end object ActionList1: TActionList Left = 8 Top = 88 object actPendiente: TAction Caption = 'El pedido est'#225' pendiente de recepci'#243'n' OnExecute = actPendienteExecute end object actParcial: TAction Caption = 'El pedido est'#225' recibido parcialmente' OnExecute = actParcialExecute end object actRecibido: TAction Caption = 'El pedido est'#225' totalmente recibido' OnExecute = actRecibidoExecute end object actAceptar: TAction Caption = '&Aceptar' OnExecute = actAceptarExecute end end end