150 lines
4.8 KiB
Plaintext
150 lines
4.8 KiB
Plaintext
|
|
object fEditorReferencias: TfEditorReferencias
|
||
|
|
Left = 453
|
||
|
|
Top = 234
|
||
|
|
BorderIcons = [biSystemMenu]
|
||
|
|
BorderStyle = bsSingle
|
||
|
|
Caption = 'Lista de referencias'
|
||
|
|
ClientHeight = 406
|
||
|
|
ClientWidth = 466
|
||
|
|
Color = clBtnFace
|
||
|
|
ParentFont = True
|
||
|
|
OldCreateOrder = False
|
||
|
|
Position = poScreenCenter
|
||
|
|
OnCloseQuery = FormCloseQuery
|
||
|
|
OnShow = FormShow
|
||
|
|
PixelsPerInch = 96
|
||
|
|
TextHeight = 13
|
||
|
|
object bAceptar: TButton
|
||
|
|
Left = 297
|
||
|
|
Top = 373
|
||
|
|
Width = 75
|
||
|
|
Height = 23
|
||
|
|
Action = actAceptar
|
||
|
|
Default = True
|
||
|
|
TabOrder = 1
|
||
|
|
end
|
||
|
|
object bCancelar: TButton
|
||
|
|
Left = 382
|
||
|
|
Top = 373
|
||
|
|
Width = 75
|
||
|
|
Height = 23
|
||
|
|
Action = actCancelar
|
||
|
|
Cancel = True
|
||
|
|
TabOrder = 2
|
||
|
|
end
|
||
|
|
object PageControl1: TPageControl
|
||
|
|
Left = 8
|
||
|
|
Top = 8
|
||
|
|
Width = 450
|
||
|
|
Height = 356
|
||
|
|
ActivePage = TabSheet1
|
||
|
|
TabOrder = 0
|
||
|
|
object TabSheet1: TTabSheet
|
||
|
|
Caption = 'Referencias'
|
||
|
|
object Label1: TLabel
|
||
|
|
Left = 6
|
||
|
|
Top = 12
|
||
|
|
Width = 149
|
||
|
|
Height = 13
|
||
|
|
Caption = 'Lista de referencias disponibles'
|
||
|
|
end
|
||
|
|
object ListaReferencias: TcxGrid
|
||
|
|
Left = 0
|
||
|
|
Top = 0
|
||
|
|
Width = 442
|
||
|
|
Height = 328
|
||
|
|
Align = alClient
|
||
|
|
TabOrder = 0
|
||
|
|
LookAndFeel.Kind = lfOffice11
|
||
|
|
LookAndFeel.NativeStyle = True
|
||
|
|
object ListaReferenciasView: TcxGridDBTableView
|
||
|
|
NavigatorButtons.ConfirmDelete = False
|
||
|
|
FilterBox.Visible = fvNever
|
||
|
|
DataController.DataSource = dsReferencias
|
||
|
|
DataController.Filter.Options = [fcoCaseInsensitive]
|
||
|
|
DataController.KeyFieldNames = 'ID'
|
||
|
|
DataController.Options = [dcoAnsiSort, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoFocusTopRowAfterSorting, dcoImmediatePost]
|
||
|
|
DataController.Summary.DefaultGroupSummaryItems = <>
|
||
|
|
DataController.Summary.FooterSummaryItems = <>
|
||
|
|
DataController.Summary.SummaryGroups = <>
|
||
|
|
OptionsBehavior.CellHints = True
|
||
|
|
OptionsBehavior.FocusCellOnTab = True
|
||
|
|
OptionsBehavior.GoToNextCellOnEnter = True
|
||
|
|
OptionsBehavior.BestFitMaxRecordCount = 20
|
||
|
|
OptionsBehavior.FocusCellOnCycle = True
|
||
|
|
OptionsCustomize.ColumnFiltering = False
|
||
|
|
OptionsCustomize.ColumnGrouping = False
|
||
|
|
OptionsCustomize.ColumnMoving = False
|
||
|
|
OptionsCustomize.ColumnSorting = False
|
||
|
|
OptionsCustomize.DataRowSizing = True
|
||
|
|
OptionsData.CancelOnExit = False
|
||
|
|
OptionsData.Deleting = False
|
||
|
|
OptionsData.DeletingConfirmation = False
|
||
|
|
OptionsData.Inserting = False
|
||
|
|
OptionsSelection.UnselectFocusedRecordOnExit = False
|
||
|
|
OptionsView.CellEndEllipsis = True
|
||
|
|
OptionsView.CellAutoHeight = True
|
||
|
|
OptionsView.ColumnAutoWidth = True
|
||
|
|
OptionsView.GridLineColor = cl3DLight
|
||
|
|
OptionsView.GroupByBox = False
|
||
|
|
OptionsView.HeaderEndEllipsis = True
|
||
|
|
OptionsView.Indicator = True
|
||
|
|
object ListaReferenciasViewID: TcxGridDBColumn
|
||
|
|
DataBinding.FieldName = 'ID'
|
||
|
|
Visible = False
|
||
|
|
VisibleForCustomization = False
|
||
|
|
end
|
||
|
|
object ListaReferenciasViewCODIGO: TcxGridDBColumn
|
||
|
|
DataBinding.FieldName = 'CODIGO'
|
||
|
|
Visible = False
|
||
|
|
VisibleForCustomization = False
|
||
|
|
end
|
||
|
|
object ListaReferenciasViewDESCRIPCION: TcxGridDBColumn
|
||
|
|
Caption = 'Referencia'
|
||
|
|
DataBinding.FieldName = 'DESCRIPCION'
|
||
|
|
PropertiesClassName = 'TcxTextEditProperties'
|
||
|
|
Properties.ReadOnly = True
|
||
|
|
Options.Editing = False
|
||
|
|
Options.Focusing = False
|
||
|
|
SortIndex = 0
|
||
|
|
SortOrder = soAscending
|
||
|
|
Width = 191
|
||
|
|
end
|
||
|
|
object ListaReferenciasViewVALOR: TcxGridDBColumn
|
||
|
|
Caption = 'Valor'
|
||
|
|
DataBinding.FieldName = 'VALOR'
|
||
|
|
PropertiesClassName = 'TcxTextEditProperties'
|
||
|
|
Properties.Alignment.Horz = taRightJustify
|
||
|
|
Properties.OnValidate = ListaReferenciasViewVALORPropertiesValidate
|
||
|
|
HeaderAlignmentHorz = taRightJustify
|
||
|
|
Width = 48
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object ListaReferenciasLevel: TcxGridLevel
|
||
|
|
GridView = ListaReferenciasView
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object ActionList1: TActionList
|
||
|
|
Left = 144
|
||
|
|
Top = 16
|
||
|
|
object actAceptar: TAction
|
||
|
|
Caption = 'A&ceptar'
|
||
|
|
OnExecute = actAceptarExecute
|
||
|
|
end
|
||
|
|
object actCancelar: TAction
|
||
|
|
Caption = '&Cancelar'
|
||
|
|
OnExecute = actCancelarExecute
|
||
|
|
end
|
||
|
|
object actCerrar: TAction
|
||
|
|
Caption = 'actCerrar'
|
||
|
|
OnExecute = actCerrarExecute
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object dsReferencias: TDADataSource
|
||
|
|
Left = 168
|
||
|
|
Top = 16
|
||
|
|
end
|
||
|
|
end
|