roberto
6a0c10c5e6
git-svn-id: https://192.168.0.254/svn/Proyectos.AlonsoYSal_FactuGES2/trunk@6 40301925-124e-1c4e-b97d-170ad7a8785b
363 lines
11 KiB
Plaintext
363 lines
11 KiB
Plaintext
object fEditorFormaPago: TfEditorFormaPago
|
|
Left = 453
|
|
Top = 234
|
|
BorderIcons = [biSystemMenu]
|
|
BorderStyle = bsSingle
|
|
Caption = 'Forma de pago'
|
|
ClientHeight = 390
|
|
ClientWidth = 484
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
Position = poScreenCenter
|
|
OnShow = FormShow
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object JvEnterAsTab1: TJvEnterAsTab
|
|
Left = 137
|
|
Top = 306
|
|
Width = 28
|
|
Height = 28
|
|
end
|
|
object dxLayoutControl1: TdxLayoutControl
|
|
Left = 0
|
|
Top = 0
|
|
Width = 484
|
|
Height = 390
|
|
Align = alClient
|
|
TabOrder = 0
|
|
TabStop = False
|
|
ExplicitWidth = 412
|
|
ExplicitHeight = 515
|
|
object Bevel4: TBevel
|
|
Left = 10
|
|
Top = 329
|
|
Width = 388
|
|
Height = 10
|
|
Shape = bsBottomLine
|
|
end
|
|
object Bevel2: TBevel
|
|
Left = 10
|
|
Top = 151
|
|
Width = 388
|
|
Height = 10
|
|
Shape = bsBottomLine
|
|
end
|
|
object eReferencia: TDBEdit
|
|
Left = 76
|
|
Top = 12
|
|
Width = 118
|
|
Height = 21
|
|
BorderStyle = bsNone
|
|
Color = clInfoBk
|
|
DataField = 'REFERENCIA'
|
|
DataSource = dsFormaPago
|
|
TabOrder = 0
|
|
end
|
|
object eDescripcion: TDBEdit
|
|
Left = 76
|
|
Top = 43
|
|
Width = 262
|
|
Height = 21
|
|
BorderStyle = bsNone
|
|
Color = clInfoBk
|
|
DataField = 'DESCRIPCION'
|
|
DataSource = dsFormaPago
|
|
TabOrder = 1
|
|
end
|
|
object ListaFormasPago: TcxGrid
|
|
Left = 10
|
|
Top = 167
|
|
Width = 246
|
|
Height = 156
|
|
TabOrder = 6
|
|
LookAndFeel.Kind = lfStandard
|
|
LookAndFeel.NativeStyle = True
|
|
object ListaFormasPagoDBTableView1: TcxGridDBTableView
|
|
NavigatorButtons.ConfirmDelete = False
|
|
DataController.DataSource = dsPlazos
|
|
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
|
|
DataController.Summary.DefaultGroupSummaryItems = <>
|
|
DataController.Summary.FooterSummaryItems = <>
|
|
DataController.Summary.SummaryGroups = <>
|
|
OptionsCustomize.ColumnFiltering = False
|
|
OptionsCustomize.ColumnGrouping = False
|
|
OptionsCustomize.ColumnMoving = False
|
|
OptionsCustomize.ColumnSorting = False
|
|
OptionsData.Deleting = False
|
|
OptionsData.DeletingConfirmation = False
|
|
OptionsData.Inserting = False
|
|
OptionsView.CellEndEllipsis = True
|
|
OptionsView.GroupByBox = False
|
|
object ListaFormasPagoDBTableView1NUM_DIAS: TcxGridDBColumn
|
|
DataBinding.FieldName = 'NUM_DIAS'
|
|
PropertiesClassName = 'TcxSpinEditProperties'
|
|
Properties.AssignedValues.MinValue = True
|
|
Width = 112
|
|
end
|
|
object ListaFormasPagoDBTableView1PORCENTAJE: TcxGridDBColumn
|
|
DataBinding.FieldName = 'PORCENTAJE'
|
|
PropertiesClassName = 'TcxSpinEditProperties'
|
|
Properties.AssignedValues.MinValue = True
|
|
Properties.MaxValue = 100.000000000000000000
|
|
HeaderAlignmentHorz = taRightJustify
|
|
Width = 132
|
|
end
|
|
end
|
|
object ListaFormasPagoLevel1: TcxGridLevel
|
|
GridView = ListaFormasPagoDBTableView1
|
|
end
|
|
end
|
|
object bAnadir: TButton
|
|
Left = 262
|
|
Top = 167
|
|
Width = 95
|
|
Height = 23
|
|
Action = actAnadir
|
|
TabOrder = 7
|
|
end
|
|
object bEliminar: TButton
|
|
Left = 262
|
|
Top = 196
|
|
Width = 95
|
|
Height = 23
|
|
Action = actEliminar
|
|
TabOrder = 8
|
|
end
|
|
object bAceptar: TButton
|
|
Left = 314
|
|
Top = 345
|
|
Width = 75
|
|
Height = 23
|
|
Action = actAceptar
|
|
TabOrder = 9
|
|
end
|
|
object bCancelar: TButton
|
|
Left = 395
|
|
Top = 345
|
|
Width = 75
|
|
Height = 23
|
|
Action = actCancelar
|
|
Cancel = True
|
|
TabOrder = 10
|
|
end
|
|
object rdPagoPlazos: TcxRadioButton
|
|
Left = 10
|
|
Top = 125
|
|
Width = 388
|
|
Height = 20
|
|
Caption = 'Plazos del pago'
|
|
TabOrder = 5
|
|
OnClick = rdPagoPlazosClick
|
|
end
|
|
object rdPagoVencimiento: TcxRadioButton
|
|
Left = 10
|
|
Top = 72
|
|
Width = 388
|
|
Height = 20
|
|
Caption = 'Pago por vencimiento'
|
|
TabOrder = 2
|
|
OnClick = rdPagoPlazosClick
|
|
end
|
|
object cbSubcuenta: TcxDBLookupComboBox
|
|
Left = 74
|
|
Top = 98
|
|
DataBinding.DataField = 'ID_SUBCUENTA'
|
|
DataBinding.DataSource = dsFormaPago
|
|
Properties.KeyFieldNames = 'ID'
|
|
Properties.ListColumns = <
|
|
item
|
|
FieldName = 'DESCRIPCION'
|
|
end>
|
|
Properties.ListOptions.GridLines = glNone
|
|
Properties.ListOptions.ShowHeader = False
|
|
Properties.ListOptions.SyncMode = True
|
|
Properties.ListSource = dsSubcuentas
|
|
Style.BorderColor = clWindowFrame
|
|
Style.BorderStyle = ebs3D
|
|
Style.HotTrack = False
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
Style.ButtonStyle = bts3D
|
|
Style.PopupBorderStyle = epbsFrame3D
|
|
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 = 250
|
|
end
|
|
object cxDBCheckBox1: TcxDBCheckBox
|
|
Left = 330
|
|
Top = 98
|
|
Caption = 'Ignorar en contabilidad'
|
|
DataBinding.DataField = 'IGNORAR_CONTABILIDAD'
|
|
DataBinding.DataSource = dsFormaPago
|
|
Properties.ValueChecked = 1
|
|
Properties.ValueUnchecked = 0
|
|
TabOrder = 4
|
|
Width = 140
|
|
end
|
|
object dxLayoutControl1Group_Root: TdxLayoutGroup
|
|
AutoAligns = [aaVertical]
|
|
AlignHorz = ahClient
|
|
Caption = 'Referencia:'
|
|
ShowCaption = False
|
|
Hidden = True
|
|
ShowBorder = False
|
|
object dxLayoutControl1Group2: TdxLayoutGroup
|
|
ShowCaption = False
|
|
Hidden = True
|
|
ShowBorder = False
|
|
object dxLayoutControl1Group3: TdxLayoutGroup
|
|
ShowCaption = False
|
|
Hidden = True
|
|
ShowBorder = False
|
|
object dxLayoutControl1Item1: TdxLayoutItem
|
|
Caption = 'Referencia:'
|
|
Control = eReferencia
|
|
end
|
|
object dxLayoutControl1Item2: TdxLayoutItem
|
|
Caption = 'Descripci'#243'n:'
|
|
Control = eDescripcion
|
|
end
|
|
object dxLayoutControl1Item11: TdxLayoutItem
|
|
ShowCaption = False
|
|
Control = rdPagoVencimiento
|
|
ControlOptions.AutoColor = True
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object panelVencimiento: TdxLayoutGroup
|
|
ShowCaption = False
|
|
Hidden = True
|
|
LayoutDirection = ldHorizontal
|
|
ShowBorder = False
|
|
object dxLayoutControl1Item12: TdxLayoutItem
|
|
AutoAligns = [aaVertical]
|
|
AlignHorz = ahClient
|
|
Caption = 'Cuenta:'
|
|
Control = cbSubcuenta
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object checkIgnorarContabilidad: TdxLayoutItem
|
|
AutoAligns = [aaVertical]
|
|
Caption = 'cxDBCheckBox1'
|
|
ShowCaption = False
|
|
Control = cxDBCheckBox1
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
end
|
|
object dxLayoutControl1Item10: TdxLayoutItem
|
|
Caption = 'cxRadioButton1'
|
|
ShowCaption = False
|
|
Control = rdPagoPlazos
|
|
ControlOptions.AutoColor = True
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Item9: TdxLayoutItem
|
|
Control = Bevel2
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
end
|
|
object panelPlazosDePago: TdxLayoutGroup
|
|
Caption = 'asdadsa'
|
|
ShowCaption = False
|
|
Hidden = True
|
|
LayoutDirection = ldHorizontal
|
|
ShowBorder = False
|
|
object dxLayoutControl1Item3: TdxLayoutItem
|
|
Control = ListaFormasPago
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Group1: TdxLayoutGroup
|
|
AutoAligns = [aaVertical]
|
|
AlignHorz = ahClient
|
|
ShowCaption = False
|
|
Hidden = True
|
|
ShowBorder = False
|
|
object dxLayoutControl1Item4: TdxLayoutItem
|
|
ShowCaption = False
|
|
Control = bAnadir
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Item5: TdxLayoutItem
|
|
ShowCaption = False
|
|
Control = bEliminar
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object dxLayoutControl1Item8: TdxLayoutItem
|
|
Control = Bevel4
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Group5: TdxLayoutGroup
|
|
AutoAligns = [aaVertical]
|
|
AlignHorz = ahRight
|
|
ShowCaption = False
|
|
Hidden = True
|
|
LayoutDirection = ldHorizontal
|
|
ShowBorder = False
|
|
object dxLayoutControl1Item6: TdxLayoutItem
|
|
ShowCaption = False
|
|
Control = bAceptar
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Item7: TdxLayoutItem
|
|
ShowCaption = False
|
|
Control = bCancelar
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object ActionList1: TActionList
|
|
Left = 88
|
|
Top = 300
|
|
object actAnadir: TAction
|
|
Caption = '&A'#241'adir'
|
|
OnExecute = actAnadirExecute
|
|
OnUpdate = actAnadirUpdate
|
|
end
|
|
object actEliminar: TAction
|
|
Caption = '&Eliminar'
|
|
OnExecute = actEliminarExecute
|
|
OnUpdate = actEliminarUpdate
|
|
end
|
|
object actAceptar: TAction
|
|
Caption = '&Guardar'
|
|
OnExecute = actAceptarExecute
|
|
end
|
|
object actCancelar: TAction
|
|
Caption = '&Cancelar'
|
|
OnExecute = actCancelarExecute
|
|
end
|
|
object actCerrar: TAction
|
|
Caption = 'actCerrar'
|
|
OnExecute = actCerrarExecute
|
|
end
|
|
object actModificar: TAction
|
|
Caption = '&Modificar'
|
|
end
|
|
end
|
|
object dsFormaPago: TDADataSource
|
|
Left = 48
|
|
Top = 300
|
|
end
|
|
object dsPlazos: TDADataSource
|
|
Left = 8
|
|
Top = 300
|
|
end
|
|
object dsSubcuentas: TDADataSource
|
|
Left = 248
|
|
Top = 68
|
|
end
|
|
end
|