object formOdpady: TformOdpady Left = 0 Top = 0 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = ' Odpad' ClientHeight = 516 ClientWidth = 922 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Segoe UI' Font.Style = [] Position = poOwnerFormCenter OnShow = FormShow TextHeight = 21 object GridPanel1: TGridPanel Left = 0 Top = 0 Width = 922 Height = 516 Align = alClient ColumnCollection = < item Value = 100.000000000000000000 end> ControlCollection = < item Column = 0 Control = grdOdpady Row = 1 end item Column = 0 Control = btnOK Row = 2 end> RowCollection = < item Value = 10.000000000000000000 end item Value = 80.135339684801000000 end item Value = 9.864660315199004000 end> TabOrder = 0 ExplicitLeft = 138 ExplicitTop = 126 ExplicitWidth = 185 ExplicitHeight = 41 DesignSize = ( 922 516) object grdOdpady: TDBGrid Left = 1 Top = 52 Width = 920 Height = 412 Align = alClient DataSource = dm.dsOdpady DrawingStyle = gdsGradient GradientEndColor = clActiveCaption GradientStartColor = 16776176 Options = [dgEditing, dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack] TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -16 TitleFont.Name = 'Segoe UI' TitleFont.Style = [] OnDrawColumnCell = grdOdpadyDrawColumnCell Columns = < item Expanded = False FieldName = 'colID' ReadOnly = True Visible = False end item Expanded = False FieldName = 'colStroj' ReadOnly = True Title.Alignment = taCenter Title.Caption = 'Stroj' Width = 245 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colDatum' ReadOnly = True Title.Alignment = taCenter Title.Caption = 'Datum' Width = 113 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colSmena' ReadOnly = True Title.Alignment = taCenter Title.Caption = 'Sm'#283'na' Width = 71 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colMokry' Title.Alignment = taCenter Title.Caption = 'Mokr'#253 Width = 78 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colSuchy' Title.Alignment = taCenter Title.Caption = 'Such'#253 Width = 79 Visible = True end item Expanded = False FieldName = 'colPoznamka' Title.Alignment = taCenter Title.Caption = 'Pozn'#225'mka' Width = 290 Visible = True end> end object btnOK: TButton Left = 391 Top = 467 Width = 140 Height = 45 Anchors = [] Caption = 'OK' TabOrder = 1 OnClick = btnOKClick ExplicitTop = 477 end end end