object formObjednavkaMat: TformObjednavkaMat Left = 0 Top = 0 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = ' Objedn'#225'vka' ClientHeight = 634 ClientWidth = 1170 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Segoe UI' Font.Style = [] Position = poOwnerFormCenter OnClose = FormClose OnResize = FormResize OnShow = FormShow TextHeight = 21 object GridPanel1: TGridPanel Left = 0 Top = 0 Width = 1170 Height = 634 Align = alClient ColumnCollection = < item Value = 100.000000000000000000 end> ControlCollection = < item Column = 0 Control = grdObjednavkaMat Row = 2 end item Column = 0 Control = GridPanel2 Row = 0 end item Column = 0 Row = 0 end item Column = 0 Control = GridPanel6 Row = 1 end> RowCollection = < item Value = 33.000000000000000000 end item Value = 12.000000000000000000 end item Value = 55.000000000000000000 end> TabOrder = 0 object grdObjednavkaMat: TJvDBGrid Left = 1 Top = 285 Width = 1168 Height = 348 Align = alClient DataSource = dm.dsObjednavkaMat DrawingStyle = gdsGradient GradientEndColor = clActiveCaption GradientStartColor = 16776176 Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack] TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -16 TitleFont.Name = 'Segoe UI' TitleFont.Style = [] OnCellClick = grdObjednavkaMatCellClick OnColExit = grdObjednavkaMatColExit OnDrawColumnCell = grdObjednavkaMatDrawColumnCell OnMouseUp = grdObjednavkaMatMouseUp SelectColumnsDialogStrings.Caption = 'Select columns' SelectColumnsDialogStrings.OK = '&OK' SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!' EditControls = <> RowsHeight = 25 TitleRowHeight = 25 Columns = < item Alignment = taCenter Expanded = False FieldName = 'colCisloObj' ReadOnly = True Title.Alignment = taCenter Title.Caption = 'Objedn'#225'vka' Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colMnozstvi' ReadOnly = True Title.Alignment = taCenter Title.Caption = 'Mno'#382'stv'#237 Width = 86 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colPalet' ReadOnly = True Title.Alignment = taCenter Title.Caption = 'Palet' Width = 50 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colDodano' ReadOnly = True Title.Alignment = taCenter Title.Caption = 'Dod'#225'no' Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colPalet2' ReadOnly = True Title.Alignment = taCenter Title.Caption = 'Palet' Width = 50 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colDatum' ReadOnly = True Title.Alignment = taCenter Title.Caption = 'Datum' Width = 86 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colObjednatel' ReadOnly = True Title.Alignment = taCenter Title.Caption = 'Objednatel' Width = 154 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colNeaktivni' ReadOnly = True Title.Alignment = taCenter Title.Caption = ' ' Width = 27 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colSplneno' ReadOnly = True Title.Alignment = taCenter Title.Caption = ' ' Width = 27 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colStornovano' ReadOnly = True Title.Alignment = taCenter Title.Caption = ' ' Width = 27 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colUzavreno' ReadOnly = True Title.Alignment = taCenter Title.Caption = ' ' Width = 27 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colVratka' ReadOnly = True Title.Alignment = taCenter Title.Caption = ' ' Width = 27 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colPoznamka' Title.Alignment = taCenter Title.Caption = 'Pozn'#225'mka' Width = 372 Visible = True end> end object GridPanel2: TGridPanel Left = 1 Top = 1 Width = 1168 Height = 209 Align = alClient ColumnCollection = < item Value = 100.000000000000000000 end> ControlCollection = < item Column = 0 Control = GridPanel3 Row = 0 end item Column = 0 Control = GridPanel4 Row = 1 end item Column = 0 Control = GridPanel5 Row = 2 end> RowCollection = < item Value = 33.333333333333340000 end item Value = 33.333333333333340000 end item Value = 33.333333333333310000 end> TabOrder = 1 DesignSize = ( 1168 209) object GridPanel3: TGridPanel Left = 1 Top = 1 Width = 1166 Height = 69 Align = alClient ColumnCollection = < item Value = 7.843695605606413000 end item Value = 12.000000000000000000 end item Value = 80.156304394393590000 end> ControlCollection = < item Column = 0 Control = edtSZ Row = 0 end item Column = 1 Control = edtRC Row = 0 end item Column = 2 Control = edtNazev1 Row = 0 end> RowCollection = < item Value = 100.000000000000000000 end> TabOrder = 0 DesignSize = ( 1166 69) object edtSZ: TEdit AlignWithMargins = True Left = 37 Top = 20 Width = 52 Height = 29 TabStop = False Alignment = taCenter Anchors = [akRight] Color = 15790320 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Segoe UI' Font.Style = [fsBold] MaxLength = 3 ParentFont = False ReadOnly = True TabOrder = 0 end object edtRC: TEdit Left = 99 Top = 20 Width = 125 Height = 29 Anchors = [] Color = 15790320 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Segoe UI' Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 1 end object edtNazev1: TEdit AlignWithMargins = True Left = 235 Top = 20 Width = 896 Height = 29 Anchors = [akLeft] Color = 15790320 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Segoe UI' Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 2 end end object GridPanel4: TGridPanel Left = 128 Top = 73 Width = 911 Height = 63 Anchors = [akLeft, akTop, akRight, akBottom] ColumnCollection = < item Value = 18.000000000000000000 end item Value = 18.000000000000000000 end item Value = 18.000000000000000000 end item Value = 10.000000000000000000 end item Value = 18.000000000000000000 end item Value = 18.000000000000000000 end> ControlCollection = < item Column = 0 Control = edtMnoz Row = 0 end item Column = 1 Control = edtPalet Row = 0 end item Column = 4 Control = edtMnozVrat Row = 0 end item Column = 2 Control = btnNovaObj Row = 0 end item Column = 5 Control = btnNovaVratka Row = 0 end> RowCollection = < item Value = 100.000000000000000000 end> TabOrder = 1 DesignSize = ( 911 63) object edtMnoz: TLabeledEdit AlignWithMargins = True Left = 41 Top = 27 Width = 121 Height = 29 Alignment = taCenter Anchors = [akRight] EditLabel.Width = 63 EditLabel.Height = 21 EditLabel.Caption = 'Mno'#382'stv'#237 NumbersOnly = True TabOrder = 0 Text = '' end object edtPalet: TLabeledEdit AlignWithMargins = True Left = 208 Top = 27 Width = 77 Height = 29 Alignment = taCenter Anchors = [] EditLabel.Width = 33 EditLabel.Height = 21 EditLabel.Caption = 'Palet' NumbersOnly = True TabOrder = 1 Text = '' end object edtMnozVrat: TLabeledEdit AlignWithMargins = True Left = 604 Top = 27 Width = 121 Height = 29 Alignment = taCenter Anchors = [] EditLabel.Width = 63 EditLabel.Height = 21 EditLabel.Caption = 'Mno'#382'stv'#237 NumbersOnly = True TabOrder = 2 Text = '' end object btnNovaObj: TButton AlignWithMargins = True Left = 331 Top = 9 Width = 160 Height = 45 Anchors = [] Caption = 'Nov'#225' objedn'#225'vka' ImageIndex = 1 ImageName = 'imgAdd' Images = dm.imgList TabOrder = 3 OnClick = btnNovaObjClick end object btnNovaVratka: TButton AlignWithMargins = True Left = 761 Top = 9 Width = 134 Height = 45 Anchors = [] Caption = 'Nov'#225' vratka' ImageIndex = 2 ImageName = 'Item5' Images = dm.imgList TabOrder = 4 OnClick = btnNovaVratkaClick end end object GridPanel5: TGridPanel Left = 130 Top = 143 Width = 907 Height = 60 Anchors = [] ColumnCollection = < item Value = 18.000000000000000000 end item Value = 18.000000000000000000 end item Value = 46.000000000000000000 end item Value = 18.000000000000000000 end> ControlCollection = < item Column = 0 Control = edtMJ Row = 0 end item Column = 1 Control = edtNaPalete Row = 0 end item Column = 3 Control = btnUkazSeznamPalet Row = 0 end> RowCollection = < item Value = 100.000000000000000000 end> TabOrder = 2 DesignSize = ( 907 60) object edtMJ: TLabeledEdit AlignWithMargins = True Left = 52 Top = 26 Width = 82 Height = 29 Margins.Right = 30 Alignment = taCenter Anchors = [akRight] Color = 15790320 EditLabel.Width = 20 EditLabel.Height = 21 EditLabel.Caption = 'MJ' NumbersOnly = True ReadOnly = True TabOrder = 0 Text = '' end object edtNaPalete: TLabeledEdit AlignWithMargins = True Left = 177 Top = 26 Width = 140 Height = 29 Alignment = taCenter Anchors = [] Color = 15790320 EditLabel.Width = 153 EditLabel.Height = 21 EditLabel.Caption = 'Na palet'#283' (orienta'#269'n'#283')' NumbersOnly = True ReadOnly = True TabOrder = 1 Text = '' end object btnUkazSeznamPalet: TButton AlignWithMargins = True Left = 757 Top = 7 Width = 135 Height = 45 Anchors = [] Caption = 'Paletov'#233' listy' TabOrder = 2 OnClick = btnUkazSeznamPaletClick end end end object GridPanel6: TGridPanel Left = 1 Top = 210 Width = 1168 Height = 75 Align = alClient ColumnCollection = < item Value = 7.692307692307693000 end item Value = 7.692307692307693000 end item Value = 7.692307692307693000 end item Value = 7.692307692307693000 end item Value = 7.692307692307693000 end item Value = 7.692307692307693000 end item Value = 7.692307692307693000 end item Value = 7.692307692307693000 end item Value = 7.692307692307693000 end item Value = 7.692307692307693000 end item Value = 7.692307692307693000 end item Value = 7.692307692307693000 end item Value = 7.692307692307679000 end> ControlCollection = < item Column = 7 Control = Panel1 Row = 0 end item Column = 11 Control = Panel2 Row = 0 end item Column = 8 Control = Panel3 Row = 0 end item Column = 9 Control = Panel4 Row = 0 end item Column = 10 Control = Panel5 Row = 0 end> RowCollection = < item Value = 100.000000000000000000 end> TabOrder = 2 object Panel1: TPanel Left = 629 Top = 1 Width = 90 Height = 73 Align = alClient BorderWidth = 1 BorderStyle = bsSingle TabOrder = 0 object Label5: TLabel Left = 2 Top = 2 Width = 82 Height = 65 Align = alClient Caption = 'Neaktivn'#237 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Segoe UI' Font.Orientation = 2700 Font.Style = [] ParentFont = False ExplicitWidth = 19 ExplicitHeight = 53 end end object Panel2: TPanel Left = 988 Top = 1 Width = 89 Height = 73 Align = alClient BorderWidth = 1 BorderStyle = bsSingle TabOrder = 1 object Label1: TLabel Left = 2 Top = 2 Width = 81 Height = 65 Align = alClient Caption = 'Vratka' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -16 Font.Name = 'Segoe UI' Font.Orientation = 2700 Font.Style = [] ParentFont = False ExplicitWidth = 23 ExplicitHeight = 44 end end object Panel3: TPanel Left = 719 Top = 1 Width = 89 Height = 73 Align = alClient BorderWidth = 1 BorderStyle = bsSingle TabOrder = 2 object Label3: TLabel Left = 2 Top = 2 Width = 81 Height = 65 Align = alClient Caption = 'Stornov'#225'no' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Segoe UI' Font.Orientation = 2700 Font.Style = [] ParentFont = False ExplicitWidth = 19 ExplicitHeight = 67 end end object Panel4: TPanel Left = 808 Top = 1 Width = 90 Height = 73 Align = alClient BorderWidth = 1 BorderStyle = bsSingle TabOrder = 3 object Label4: TLabel Left = 2 Top = 2 Width = 82 Height = 65 Align = alClient Caption = 'Spln'#283'no' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Segoe UI' Font.Orientation = 2700 Font.Style = [] ParentFont = False ExplicitWidth = 19 ExplicitHeight = 47 end end object Panel5: TPanel Left = 898 Top = 1 Width = 90 Height = 73 Align = alClient BorderWidth = 1 BorderStyle = bsSingle TabOrder = 4 object Label2: TLabel Left = 2 Top = 2 Width = 82 Height = 65 Align = alClient Caption = 'Uzav'#345'eno' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Segoe UI' Font.Orientation = 2700 Font.Style = [] ParentFont = False ExplicitWidth = 19 ExplicitHeight = 55 end end end end object icmpCli: TIdIcmpClient ReceiveTimeout = 2000 Protocol = 1 ProtocolIPv6 = 58 Left = 680 Top = 178 end end