object formPrehledMicharna: TformPrehledMicharna Left = 0 Top = 0 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = ' P'#345'ehled m'#237'ch'#225'rna' ClientHeight = 809 ClientWidth = 862 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 = 862 Height = 809 Align = alClient ColumnCollection = < item Value = 100.000000000000000000 end> ControlCollection = < item Column = 0 Control = Button1 Row = 0 end item Column = 0 Control = GridPanel2 Row = 1 end item Column = 0 Control = grdSeznamTesta Row = 2 end item Column = 0 Control = grdReceptura Row = 3 end item Column = 0 Control = edtSuchaHmot Row = 4 end> RowCollection = < item Value = 6.000000000000000000 end item Value = 10.000000000000000000 end item Value = 44.000000000000000000 end item Value = 31.000000000000000000 end item Value = 4.000000000000000000 end item Value = 5.000000000000000000 end> TabOrder = 0 DesignSize = ( 862 809) object Button1: TButton Left = 344 Top = 7 Width = 174 Height = 36 Anchors = [] Caption = 'Sb'#283'rn'#253' list m'#237'ch'#225'rna' TabOrder = 0 end object GridPanel2: TGridPanel Left = 1 Top = 49 Width = 860 Height = 81 Align = alClient ColumnCollection = < item Value = 1.500000000000000000 end item Value = 23.000000000000000000 end item Value = 27.900000000000000000 end item Value = 18.000000000000000000 end item Value = 18.000000000000000000 end item Value = 4.800000000000000000 end item Value = 4.700000000000000000 end item Value = 2.099999999999996000 end> ControlCollection = < item Column = 5 Control = Label3 Row = 0 end item Column = 6 Control = Label1 Row = 0 end item Column = 1 Control = edtStroj Row = 0 end item Column = 2 Control = edtTesto Row = 0 end item Column = 4 Control = GridPanel3 Row = 0 end item Column = 0 Control = Label4 Row = 0 end> RowCollection = < item Value = 100.000000000000000000 end> TabOrder = 1 DesignSize = ( 860 81) object Label3: TLabel Left = 771 Top = 15 Width = 18 Height = 50 Anchors = [] Caption = 'Viskozita' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Segoe UI' Font.Orientation = 2700 Font.Style = [fsBold] ParentFont = False Layout = tlCenter ExplicitLeft = 772 ExplicitTop = 8 end object Label1: TLabel Left = 812 Top = 10 Width = 18 Height = 60 Anchors = [] Caption = 'Viskozita 2' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Segoe UI' Font.Orientation = 2700 Font.Style = [fsBold] ParentFont = False Layout = tlCenter ExplicitLeft = 811 ExplicitTop = 1 end object edtStroj: TEdit AlignWithMargins = True Left = 17 Top = 48 Width = 191 Height = 29 Align = alBottom MaxLength = 100 TabOrder = 0 OnChange = edtStrojChange end object edtTesto: TEdit AlignWithMargins = True Left = 214 Top = 48 Width = 234 Height = 29 Align = alBottom MaxLength = 100 TabOrder = 1 OnChange = edtTestoChange end object GridPanel3: TGridPanel Left = 605 Top = 1 Width = 154 Height = 79 Align = alClient ColumnCollection = < item Value = 88.027489785109650000 end item Value = 11.972510214890350000 end> ControlCollection = < item Column = 0 Control = edtDatVypousteni Row = 0 end item Column = 1 Control = Label2 Row = 0 end> RowCollection = < item Value = 100.000000000000000000 end> TabOrder = 2 object edtDatVypousteni: TJvDatePickerEdit AlignWithMargins = True Left = 21 Top = 46 Width = 112 Height = 29 Margins.Left = 20 Margins.Right = 2 Align = alBottom AllowNoDate = True Anchors = [] Checked = False TabOrder = 0 OnChange = edtDatVypousteniChange end object Label2: TLabel AlignWithMargins = True Left = 138 Top = 52 Width = 12 Height = 21 Margins.Bottom = 5 Align = alBottom Caption = 'X' OnClick = Label2Click ExplicitWidth = 9 end end object Label4: TLabel AlignWithMargins = True Left = 1 Top = 54 Width = 10 Height = 21 Margins.Left = 0 Margins.Bottom = 5 Align = alBottom Caption = 'X' OnClick = Label4Click ExplicitWidth = 9 end end object grdSeznamTesta: TJvDBGrid Left = 1 Top = 130 Width = 860 Height = 355 Align = alClient DataSource = dm.dsPrehledMicharna DrawingStyle = gdsGradient GradientEndColor = clActiveCaption GradientStartColor = 16776176 Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack] TabOrder = 2 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -16 TitleFont.Name = 'Segoe UI' TitleFont.Style = [] OnCellClick = grdSeznamTestaCellClick OnDrawColumnCell = grdSeznamTestaDrawColumnCell SelectColumnsDialogStrings.Caption = 'Select columns' SelectColumnsDialogStrings.OK = '&OK' SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!' EditControls = <> RowsHeight = 25 TitleRowHeight = 25 Columns = < item Expanded = False FieldName = 'colIDPrikaz' Visible = False end item Expanded = False FieldName = 'colIDStroj' Visible = False end item Expanded = False FieldName = 'colStroj' Title.Caption = 'Stroj' Width = 195 Visible = True end item Expanded = False FieldName = 'colTesto' Title.Caption = 'T'#283'sto' Width = 238 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colStartMichani' Title.Alignment = taCenter Title.Caption = 'P'#345#237'prava t'#283'sta' Width = 154 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colKonecMichani' Title.Alignment = taCenter Title.Caption = 'Vypou'#353't'#283'n'#237 Width = 154 Visible = True end item Expanded = False FieldName = 'colViskozita' Title.Caption = ' ' Width = 40 Visible = True end item Expanded = False FieldName = 'colViskozita2' Title.Caption = ' ' Width = 40 Visible = True end item Expanded = False FieldName = 'colIDPMZ' Visible = False end item Expanded = False FieldName = 'colIDOperStartStop' Visible = False end> end object grdReceptura: TJvDBGrid Left = 1 Top = 485 Width = 860 Height = 250 Align = alClient DataSource = dm.dsDetailMicharna DrawingStyle = gdsGradient GradientEndColor = clActiveCaption GradientStartColor = 16776176 Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack] TabOrder = 3 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -16 TitleFont.Name = 'Segoe UI' TitleFont.Style = [] OnDrawColumnCell = grdRecepturaDrawColumnCell 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 = 'colSZ' Title.Alignment = taCenter Title.Caption = 'SZ' Visible = False end item Alignment = taCenter Expanded = False FieldName = 'colRC' Title.Alignment = taCenter Title.Caption = 'Reg. '#269#237'slo' Visible = False end item Expanded = False FieldName = 'colNazev1' Title.Alignment = taCenter Title.Caption = 'Surovina' Width = 653 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colMnozstvi' Title.Alignment = taCenter Title.Caption = 'Mno'#382'stv'#237 Width = 85 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colPridano' Title.Alignment = taCenter Title.Caption = 'P'#345'id'#225'no' Width = 85 Visible = True end> end object edtSuchaHmot: TLabeledEdit Left = 740 Top = 735 Width = 121 Height = 33 Align = alRight Alignment = taCenter Color = 15790320 EditLabel.Width = 128 EditLabel.Height = 33 EditLabel.Caption = 'Such'#225' hmotnost: ' LabelPosition = lpLeft ReadOnly = True TabOrder = 4 Text = '' ExplicitHeight = 29 end end end