diff --git a/Source/GUIBase/uViewDetallesBase.dfm b/Source/GUIBase/uViewDetallesBase.dfm index 3e53ea78..b074717b 100644 --- a/Source/GUIBase/uViewDetallesBase.dfm +++ b/Source/GUIBase/uViewDetallesBase.dfm @@ -1,6 +1,6 @@ inherited frViewDetallesBase: TfrViewDetallesBase - Width = 480 - Height = 379 + Width = 451 + Height = 304 Align = alClient OnCreate = CustomViewCreate OnDestroy = CustomViewDestroy @@ -9,7 +9,7 @@ inherited frViewDetallesBase: TfrViewDetallesBase object ToolBar1: TToolBar Left = 0 Top = 0 - Width = 480 + Width = 451 Height = 73 AutoSize = True ButtonWidth = 141 @@ -25,7 +25,6 @@ inherited frViewDetallesBase: TfrViewDetallesBase TabOrder = 0 Transparent = True Visible = False - ExplicitWidth = 451 object ToolButton1: TToolButton Left = 0 Top = 0 @@ -65,7 +64,7 @@ inherited frViewDetallesBase: TfrViewDetallesBase DroppedDownWidth = 145 MaxMRUCount = 0 FontName = 'Tahoma' - ItemIndex = 40 + ItemIndex = 42 Options = [foTrueTypeOnly, foNoOEMFonts, foScalableOnly, foWysiWyg] Sorted = True TabOrder = 2 @@ -150,8 +149,8 @@ inherited frViewDetallesBase: TfrViewDetallesBase object cxGrid: TcxGrid Left = 0 Top = 99 - Width = 480 - Height = 280 + Width = 451 + Height = 205 Align = alClient Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText @@ -162,9 +161,8 @@ inherited frViewDetallesBase: TfrViewDetallesBase TabOrder = 1 LookAndFeel.Kind = lfStandard LookAndFeel.NativeStyle = True - ExplicitWidth = 451 - ExplicitHeight = 205 object cxGridView: TcxGridDBTableView + OnKeyDown = cxGridViewKeyDown NavigatorButtons.ConfirmDelete = False FilterBox.Visible = fvNever OnEditing = cxGridViewEditing @@ -194,8 +192,10 @@ inherited frViewDetallesBase: TfrViewDetallesBase OptionsCustomize.ColumnMoving = False OptionsCustomize.ColumnSorting = False OptionsCustomize.DataRowSizing = True - OptionsData.Appending = True OptionsData.CancelOnExit = False + OptionsData.Deleting = False + OptionsData.DeletingConfirmation = False + OptionsData.Inserting = False OptionsSelection.InvertSelect = False OptionsSelection.MultiSelect = True OptionsSelection.UnselectFocusedRecordOnExit = False @@ -218,7 +218,6 @@ inherited frViewDetallesBase: TfrViewDetallesBase end object cxGridViewPOSICION: TcxGridDBColumn DataBinding.FieldName = 'POSICION' - Visible = False BestFitMaxWidth = 25 MinWidth = 50 SortIndex = 0 @@ -344,11 +343,10 @@ inherited frViewDetallesBase: TfrViewDetallesBase object TBXDock1: TTBXDock Left = 0 Top = 73 - Width = 480 + Width = 451 Height = 26 BackgroundOnToolbars = False UseParentBackground = True - ExplicitWidth = 451 object TBXToolbar1: TTBXToolbar Left = 0 Top = 0