object formImportKusovnik: TformImportKusovnik Left = 0 Top = 0 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = ' Import dat kusovn'#237'ku z CADu' ClientHeight = 715 ClientWidth = 1111 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Segoe UI' Font.Style = [] Position = poOwnerFormCenter RoundedCorners = rcOn OnClose = FormClose OnShow = FormShow DesignSize = ( 1111 715) TextHeight = 21 object Label1: TLabel Left = 30 Top = 24 Width = 59 Height = 21 Caption = 'Zak'#225'zka:' end object selZakazka: TButtonedEdit Left = 30 Top = 48 Width = 139 Height = 29 Alignment = taCenter Images = datModul.imgList RightButton.ImageIndex = 0 RightButton.Visible = True TabOrder = 0 OnRightButtonClick = selZakazkaRightButtonClick end object edtStanice: TLabeledEdit Left = 210 Top = 48 Width = 57 Height = 29 Alignment = taCenter EditLabel.Width = 52 EditLabel.Height = 21 EditLabel.Caption = 'Stanice:' TabOrder = 1 Text = '' end object btnImport: TButton Left = 296 Top = 40 Width = 111 Height = 37 Caption = 'Import dat' TabOrder = 2 OnClick = btnImportClick end object grdKusovnik: TJvDBGrid Left = 12 Top = 98 Width = 1086 Height = 550 Anchors = [akLeft, akTop, akRight, akBottom] DataSource = datModul.dsImportKusovnik DrawingStyle = gdsGradient GradientEndColor = clSkyBlue TabOrder = 3 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -16 TitleFont.Name = 'Segoe UI' TitleFont.Style = [] OnDrawColumnCell = grdKusovnikDrawColumnCell OnDblClick = grdKusovnikDblClick OnMouseUp = grdKusovnikMouseUp SelectColumnsDialogStrings.Caption = 'Select columns' SelectColumnsDialogStrings.OK = '&OK' SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!' EditControls = <> AutoSizeRows = False RowsHeight = 30 TitleRowHeight = 30 OnCanEditCell = grdKusovnikCanEditCell Columns = < item Alignment = taCenter Expanded = False FieldName = 'Pozice' ReadOnly = True Title.Alignment = taCenter Width = 60 Visible = True end item Expanded = False FieldName = 'Oznaceni' ReadOnly = True Title.Caption = 'Ozna'#269'en'#237 Width = 246 Visible = True end item Expanded = False FieldName = 'Popis' ReadOnly = True Width = 412 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'SZ' ReadOnly = True Title.Alignment = taCenter Title.Caption = 'SK' Width = 47 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'RegCis' ReadOnly = True Title.Alignment = taCenter Title.Caption = 'Reg. '#269#237'slo' Width = 118 Visible = True end item Expanded = False FieldName = 'Mnozstvi' ReadOnly = True Title.Alignment = taCenter Title.Caption = 'Mno'#382'stv'#237 Visible = True end item Expanded = False FieldName = 'NovaKarta' Title.Alignment = taCenter Title.Caption = 'Nov'#225 Width = 64 Visible = True end> end object btnStorno: TButton Left = 988 Top = 662 Width = 111 Height = 37 Anchors = [akRight, akBottom] Caption = 'Storno' TabOrder = 4 OnClick = btnStornoClick ExplicitLeft = 856 end object btnZapis: TButton Left = 484 Top = 662 Width = 129 Height = 37 Anchors = [akRight, akBottom] Caption = 'Z'#225'pis do TPV' TabOrder = 5 OnClick = btnZapisClick ExplicitLeft = 352 end end