209 lines
6.9 KiB
Plaintext
209 lines
6.9 KiB
Plaintext
inherited frViewPagosCliente: TfrViewPagosCliente
|
|
Width = 392
|
|
Height = 189
|
|
ExplicitWidth = 392
|
|
ExplicitHeight = 189
|
|
object dxLayoutControl1: TdxLayoutControl
|
|
Left = 0
|
|
Top = 0
|
|
Width = 392
|
|
Height = 189
|
|
Margins.Left = 0
|
|
Margins.Top = 0
|
|
Margins.Right = 0
|
|
Margins.Bottom = 0
|
|
Align = alClient
|
|
ParentBackground = True
|
|
TabOrder = 0
|
|
AutoContentSizes = [acsWidth, acsHeight]
|
|
LookAndFeel = dxLayoutOfficeLookAndFeel1
|
|
object ListaPagosCliente: TcxGrid
|
|
Left = 22
|
|
Top = 55
|
|
Width = 252
|
|
Height = 105
|
|
TabOrder = 1
|
|
LookAndFeel.Kind = lfStandard
|
|
LookAndFeel.NativeStyle = True
|
|
object ListaPagosClienteDBTableView1: TcxGridDBTableView
|
|
NavigatorButtons.ConfirmDelete = False
|
|
OnCellDblClick = ListaPagosClienteDBTableView1CellDblClick
|
|
DataController.DataSource = DADataSource
|
|
DataController.Summary.DefaultGroupSummaryItems = <>
|
|
DataController.Summary.FooterSummaryItems = <>
|
|
DataController.Summary.SummaryGroups = <>
|
|
OptionsCustomize.ColumnFiltering = False
|
|
OptionsCustomize.ColumnGrouping = False
|
|
OptionsCustomize.ColumnHidingOnGrouping = False
|
|
OptionsCustomize.ColumnMoving = False
|
|
OptionsCustomize.ColumnSorting = False
|
|
OptionsData.Deleting = False
|
|
OptionsData.DeletingConfirmation = False
|
|
OptionsData.Inserting = False
|
|
OptionsSelection.CellSelect = False
|
|
OptionsSelection.HideFocusRectOnExit = False
|
|
OptionsSelection.InvertSelect = False
|
|
OptionsSelection.UnselectFocusedRecordOnExit = False
|
|
OptionsView.CellEndEllipsis = True
|
|
OptionsView.FocusRect = False
|
|
OptionsView.ColumnAutoWidth = True
|
|
OptionsView.GroupByBox = False
|
|
object ListaPagosClienteDBTableView1RecID: TcxGridDBColumn
|
|
DataBinding.FieldName = 'RecID'
|
|
Visible = False
|
|
end
|
|
object ListaPagosClienteDBTableView1ID: TcxGridDBColumn
|
|
DataBinding.FieldName = 'ID'
|
|
Visible = False
|
|
end
|
|
object ListaPagosClienteDBTableView1ID_RECIBO: TcxGridDBColumn
|
|
DataBinding.FieldName = 'ID_RECIBO'
|
|
Visible = False
|
|
end
|
|
object ListaPagosClienteDBTableView1TIPO: TcxGridDBColumn
|
|
DataBinding.FieldName = 'TIPO'
|
|
PropertiesClassName = 'TcxImageComboBoxProperties'
|
|
Properties.Items = <
|
|
item
|
|
Description = 'Cobro'
|
|
ImageIndex = 0
|
|
Value = 'Pago'
|
|
end
|
|
item
|
|
Description = 'Devoluci'#243'n'
|
|
Value = 'Devoluci'#243'n'
|
|
end>
|
|
Options.Focusing = False
|
|
IsCaptionAssigned = True
|
|
end
|
|
object ListaPagosClienteDBTableView1FECHA_PAGO: TcxGridDBColumn
|
|
Caption = 'Fecha'
|
|
DataBinding.FieldName = 'FECHA_PAGO'
|
|
PropertiesClassName = 'TcxDateEditProperties'
|
|
Options.Focusing = False
|
|
Width = 100
|
|
end
|
|
object ListaPagosClienteDBTableView1TITULAR: TcxGridDBColumn
|
|
DataBinding.FieldName = 'TITULAR'
|
|
Visible = False
|
|
end
|
|
object ListaPagosClienteDBTableView1ENTIDAD: TcxGridDBColumn
|
|
DataBinding.FieldName = 'ENTIDAD'
|
|
Visible = False
|
|
end
|
|
object ListaPagosClienteDBTableView1SUCURSAL: TcxGridDBColumn
|
|
DataBinding.FieldName = 'SUCURSAL'
|
|
Visible = False
|
|
end
|
|
object ListaPagosClienteDBTableView1DC: TcxGridDBColumn
|
|
DataBinding.FieldName = 'DC'
|
|
Visible = False
|
|
end
|
|
object ListaPagosClienteDBTableView1CUENTA: TcxGridDBColumn
|
|
DataBinding.FieldName = 'CUENTA'
|
|
Visible = False
|
|
end
|
|
object ListaPagosClienteDBTableView1FECHA_ALTA: TcxGridDBColumn
|
|
DataBinding.FieldName = 'FECHA_ALTA'
|
|
Visible = False
|
|
end
|
|
object ListaPagosClienteDBTableView1FECHA_MODIFICACION: TcxGridDBColumn
|
|
DataBinding.FieldName = 'FECHA_MODIFICACION'
|
|
Visible = False
|
|
end
|
|
object ListaPagosClienteDBTableView1USUARIO: TcxGridDBColumn
|
|
DataBinding.FieldName = 'USUARIO'
|
|
Visible = False
|
|
end
|
|
end
|
|
object ListaPagosClienteLevel1: TcxGridLevel
|
|
GridView = ListaPagosClienteDBTableView1
|
|
end
|
|
end
|
|
object TBXToolbar1: TTBXToolbar
|
|
Left = 22
|
|
Top = 30
|
|
Width = 146
|
|
Height = 19
|
|
BorderStyle = bsNone
|
|
Caption = 'TBXToolbar1'
|
|
DragHandleStyle = dhNone
|
|
TabOrder = 0
|
|
object TBXItem12: TTBXItem
|
|
Action = actAnadir
|
|
DisplayMode = nbdmImageAndText
|
|
end
|
|
object TBXItem3: TTBXItem
|
|
Action = actModificar
|
|
DisplayMode = nbdmImageAndText
|
|
end
|
|
object TBSeparatorItem1: TTBSeparatorItem
|
|
end
|
|
object TBXItem1: TTBXItem
|
|
Action = actEliminar
|
|
DisplayMode = nbdmImageAndText
|
|
end
|
|
end
|
|
object dxLayoutControl1Group_Root: TdxLayoutGroup
|
|
ShowCaption = False
|
|
Hidden = True
|
|
ShowBorder = False
|
|
object dxLayoutControl1Group1: TdxLayoutGroup
|
|
AutoAligns = [aaHorizontal]
|
|
AlignVert = avClient
|
|
Caption = 'Cobros y devoluciones del recibo'
|
|
object dxLayoutControl1Item2: TdxLayoutItem
|
|
ShowCaption = False
|
|
Control = TBXToolbar1
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
object dxLayoutControl1Item1: TdxLayoutItem
|
|
AutoAligns = [aaHorizontal]
|
|
AlignVert = avClient
|
|
Control = ListaPagosCliente
|
|
ControlOptions.ShowBorder = False
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object DADataSource: TDADataSource
|
|
DataTable = DataModuleRecibosCliente.tbl_PagosCliente
|
|
Left = 8
|
|
Top = 8
|
|
end
|
|
object ActionListContenido: TActionList
|
|
Left = 8
|
|
Top = 40
|
|
object actAnadir: TAction
|
|
Category = 'Operaciones'
|
|
Caption = 'A'#241'adir'
|
|
ImageIndex = 0
|
|
ShortCut = 45
|
|
end
|
|
object actModificar: TAction
|
|
Category = 'Operaciones'
|
|
Caption = 'Modificar'
|
|
ImageIndex = 11
|
|
end
|
|
object actEliminar: TAction
|
|
Category = 'Operaciones'
|
|
Caption = 'Eliminar'
|
|
ImageIndex = 1
|
|
ShortCut = 16430
|
|
end
|
|
end
|
|
object dxLayoutLookAndFeelList1: TdxLayoutLookAndFeelList
|
|
Left = 320
|
|
Top = 248
|
|
object dxLayoutOfficeLookAndFeel1: TdxLayoutOfficeLookAndFeel
|
|
GroupOptions.CaptionOptions.Font.Charset = DEFAULT_CHARSET
|
|
GroupOptions.CaptionOptions.Font.Color = clWindowText
|
|
GroupOptions.CaptionOptions.Font.Height = -11
|
|
GroupOptions.CaptionOptions.Font.Name = 'Tahoma'
|
|
GroupOptions.CaptionOptions.Font.Style = [fsBold]
|
|
GroupOptions.CaptionOptions.TextColor = clHighlight
|
|
GroupOptions.CaptionOptions.UseDefaultFont = False
|
|
end
|
|
end
|
|
end
|