Tecsitel_FactuGES2/Source/Modulos/Pedidos a proveedor/Views/uEditorElegirPersonaContactoPedido.dfm
2009-07-09 11:21:22 +00:00

142 lines
3.7 KiB
Plaintext

inherited fEditorElegirPersonaContactoPedido: TfEditorElegirPersonaContactoPedido
BorderStyle = bsDialog
Caption = 'Entrega del material del pedido'
ClientHeight = 269
ClientWidth = 435
Position = poScreenCenter
OnCreate = CustomEditorCreate
OnShow = CustomEditorShow
ExplicitWidth = 441
ExplicitHeight = 301
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 21
Top = 16
Width = 278
Height = 13
Anchors = [akLeft, akTop, akRight]
Caption = 'Indique a qui'#233'n se deber'#225' entregar el material del pedido:'
end
object Panel1: TPanel
Left = 0
Top = 228
Width = 435
Height = 41
Align = alBottom
TabOrder = 0
DesignSize = (
435
41)
object bAceptar: TButton
Left = 271
Top = 8
Width = 75
Height = 25
Anchors = [akTop, akRight]
Caption = 'Aceptar'
ModalResult = 1
TabOrder = 0
end
object bCancelar: TButton
Left = 352
Top = 8
Width = 75
Height = 25
Anchors = [akTop, akRight]
Cancel = True
Caption = 'Cancelar'
ModalResult = 2
TabOrder = 1
end
end
object rdxDestino1: TRadioButton
Left = 48
Top = 45
Width = 335
Height = 17
Action = actEmpleadoEmpresa
TabOrder = 1
TabStop = True
end
object cbListaEmpleados: TcxComboBox
Left = 63
Top = 68
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 = 2
Width = 320
end
object cbListaPersonalSubcontrata: TcxComboBox
Left = 63
Top = 121
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 = 3
Width = 320
end
object RadioButton1: TRadioButton
Left = 48
Top = 98
Width = 335
Height = 17
Action = actSubcontrata
Caption = 'Personal de contacto de la subcontrata:'
TabOrder = 4
end
object rdxDestino2: TRadioButton
Left = 48
Top = 151
Width = 335
Height = 17
Action = actOtro
TabOrder = 5
end
object edtTextoPersona: TcxTextEdit
Left = 63
Top = 174
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 = 320
end
object ActionList1: TActionList
Left = 8
Top = 80
object actEmpleadoEmpresa: TAction
Caption = 'Empleado de '
Checked = True
GroupIndex = 1
OnExecute = actEmpleadoEmpresaExecute
end
object actSubcontrata: TAction
Caption = 'Personal de contacto de la obra:'
GroupIndex = 1
OnExecute = actSubcontrataExecute
end
object actOtro: TAction
Caption = 'A la siguiente persona:'
GroupIndex = 1
OnExecute = actOtroExecute
end
end
end