git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@963 0c75b7a4-871f-7646-8a2f-f78d34cc349f
142 lines
3.7 KiB
Plaintext
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
|