object formPrevPrij: TformPrevPrij Left = 0 Top = 0 BorderIcons = [biSystemMenu] Caption = ' Oprava P'#345'evodky / P'#345#237'jemky' ClientHeight = 348 ClientWidth = 601 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Tahoma' Font.Style = [] Position = poMainFormCenter OnClose = FormClose OnShow = FormShow TextHeight = 16 object btnOK: TButton Left = 396 Top = 315 Width = 75 Height = 25 Caption = 'OK' TabOrder = 0 OnClick = btnOKClick end object btnCancel: TButton Left = 518 Top = 315 Width = 75 Height = 25 Caption = 'Storno' TabOrder = 1 OnClick = btnCancelClick end object grdPrijemky: TJvDBGrid Left = 8 Top = 16 Width = 585 Height = 290 DataSource = ds1 Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleHotTrack] TabOrder = 2 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -13 TitleFont.Name = 'Tahoma' TitleFont.Style = [] OnDrawColumnCell = grdPrijemkyDrawColumnCell OnDblClick = grdPrijemkyDblClick ScrollBars = ssVertical SelectColumnsDialogStrings.Caption = 'Select columns' SelectColumnsDialogStrings.OK = '&OK' SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!' EditControls = <> RowsHeight = 20 TitleRowHeight = 20 Columns = < item Alignment = taCenter Expanded = False FieldName = 'SZ' Title.Alignment = taCenter Title.Caption = 'SK' Width = 50 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'RegCis' Title.Alignment = taCenter Title.Caption = 'Registra'#269'n'#237' '#269#237'slo' Width = 120 Visible = True end item Expanded = False FieldName = 'Nazev1' Title.Caption = 'N'#225'zev' Width = 310 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'Mnoz' Title.Alignment = taCenter Title.Caption = 'Mno'#382'stv'#237 Width = 80 Visible = True end item Expanded = False FieldName = 'idPZ' Visible = False end item Expanded = False FieldName = 'idPZold' Visible = False end> end object vTab1: TFDMemTable FetchOptions.AssignedValues = [evMode] FetchOptions.Mode = fmAll ResourceOptions.AssignedValues = [rvSilentMode] ResourceOptions.SilentMode = True UpdateOptions.AssignedValues = [uvCheckRequired, uvAutoCommitUpdates] UpdateOptions.CheckRequired = False UpdateOptions.AutoCommitUpdates = True Left = 194 Top = 2 object vTab1idPZ: TIntegerField FieldName = 'idPZ' end object vTab1SZ: TStringField FieldName = 'SZ' Size = 3 end object vTab1RegCis: TStringField FieldName = 'RegCis' Size = 30 end object vTab1Nazev1: TStringField FieldName = 'Nazev1' Size = 100 end object vTab1Mnoz: TFloatField FieldName = 'Mnoz' DisplayFormat = '#,##0.###' end object vTab1idPZold: TIntegerField FieldName = 'idPZold' Visible = False end end object ds1: TDataSource DataSet = vTab1 Left = 242 Top = 4 end end