ConstruccionesCNJ_FactuGES/Modulos/Presupuestos/Views/uEditorSituacionPresupuesto.dfm
2007-06-21 15:50:59 +00:00

223 lines
5.7 KiB
Plaintext

object fEditorSituacionPresupuesto: TfEditorSituacionPresupuesto
Left = 497
Top = 344
BorderStyle = bsDialog
Caption = 'Cambiar situaci'#243'n del presupuesto'
ClientHeight = 377
ClientWidth = 440
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 = 440
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 del presupuesto')
Comments.Strings = (
'Indique la nueva situaci'#243'n del presupuesto o pulse en '#39'Cancelar'#39 +
' para no hacer ning'#250'n cambio.')
Gradient.FromColor = clHighlight
Gradient.ToColor = clWindow
Gradient.Active = True
Gradient.Orientation = fgdVertical
BufferedDraw = False
ExplicitWidth = 491
end
object Label1: TLabel
Left = 56
Top = 162
Width = 295
Height = 13
Caption = 'El cliente todav'#237'a no ha aceptado o rechazado el presupuesto'
end
object Label2: TLabel
Left = 56
Top = 218
Width = 211
Height = 13
Caption = 'El cliente ha aceptado el presupuesto el d'#237'a:'
end
object Label3: TLabel
Left = 56
Top = 274
Width = 211
Height = 13
Caption = 'El cliente ha aceptado el presupuesto el d'#237'a:'
end
object Label4: TLabel
Left = 56
Top = 96
Width = 138
Height = 13
Caption = 'Fecha del presupuesto: '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object pnlSeleccion: TPanel
Left = 0
Top = 337
Width = 440
Height = 40
Align = alBottom
BevelEdges = [beTop]
BevelKind = bkTile
BevelOuter = bvNone
TabOrder = 0
DesignSize = (
440
38)
object bAceptar: TButton
Left = 277
Top = 2
Width = 74
Height = 23
Action = actAceptar
Anchors = [akRight]
Default = True
TabOrder = 0
end
object bCancelar: TButton
Left = 357
Top = 2
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 rbAceptado: TRadioButton
Left = 38
Top = 195
Width = 219
Height = 17
Action = actAceptado
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
object rbRechazado: TRadioButton
Left = 38
Top = 251
Width = 219
Height = 17
Action = actRechazado
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
end
object edtFechaAceptado: TcxDateEdit
Left = 273
Top = 215
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 edtFechaRechazado: TcxDateEdit
Left = 273
Top = 271
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 = 5
Width = 121
end
object edtFechaPresupuesto: TEdit
Left = 273
Top = 93
Width = 121
Height = 21
ReadOnly = True
TabOrder = 6
end
object ActionList1: TActionList
Left = 16
Top = 256
object actPendiente: TAction
Caption = 'El presupuesto est'#225' pendiente'
OnExecute = actPendienteExecute
end
object actAceptado: TAction
Caption = 'El presupuesto est'#225' aceptado'
OnExecute = actAceptadoExecute
end
object actRechazado: TAction
Caption = 'El presupuesto est'#225' rechazado'
OnExecute = actRechazadoExecute
end
object actAceptar: TAction
Caption = '&Aceptar'
OnExecute = actAceptarExecute
end
end
end