object formOdvTavby: TformOdvTavby Left = 0 Top = 0 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = ' Odv'#225'd'#283'ni strome'#269'k'#367' / tavby' ClientHeight = 732 ClientWidth = 504 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = 'Tahoma' Font.Style = [] Position = poOwnerFormCenter OnClose = FormClose OnResize = FormResize OnShow = FormShow DesignSize = ( 504 732) TextHeight = 25 object lblPopis: TLabel Left = 11 Top = 12 Width = 476 Height = 25 Alignment = taCenter AutoSize = False end object lblPrikaz: TLabel Left = 11 Top = 47 Width = 476 Height = 25 Alignment = taCenter AutoSize = False end object lblZapisDat: TLabel Left = 8 Top = 699 Width = 480 Height = 25 Alignment = taCenter Anchors = [akLeft, akRight, akBottom] AutoSize = False Caption = 'Prob'#237'h'#225' z'#225'pis dat...' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -21 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False Visible = False ExplicitTop = 579 end object btnOK: TButton Left = 198 Top = 637 Width = 116 Height = 39 Anchors = [] Caption = 'OK' TabOrder = 1 OnClick = btnOKClick end object btnStorno: TButton Left = 374 Top = 637 Width = 113 Height = 39 Anchors = [akRight] Caption = 'Storno' TabOrder = 2 OnClick = btnStornoClick end object pgCtrl: TPageControl Left = 20 Top = 87 Width = 467 Height = 540 ActivePage = shOdvStr Anchors = [akLeft, akTop, akRight] TabOrder = 3 object shTavba: TTabSheet Caption = ' Tavba ' object Label1: TLabel Left = 119 Top = 277 Width = 168 Height = 25 Caption = 'Po'#269'et strome'#269'k'#367' :' end object lblPocetStr: TLabel Left = 322 Top = 306 Width = 7 Height = 25 end object lblVyrOp: TLabel Left = 322 Top = 252 Width = 7 Height = 25 end object lblKsStrom: TLabel Left = 207 Top = 307 Width = 7 Height = 25 end object lblFormir: TLabel Left = 119 Top = 254 Width = 4 Height = 16 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object lblLidiZTavby: TLabel Left = 119 Top = 169 Width = 4 Height = 16 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object edtPocetStr: TRzNumericEdit Left = 119 Top = 306 Width = 52 Height = 33 Alignment = taCenter MaxLength = 3 TabOrder = 6 OnChange = edtPocetStrChange OnExit = edtPocetStrExit DisplayFormat = ',0;(,0)' end object edtTavba: TLabeledEdit Left = 119 Top = 133 Width = 139 Height = 33 Alignment = taCenter EditLabel.Width = 70 EditLabel.Height = 25 EditLabel.Caption = 'Tavba :' ReadOnly = True TabOrder = 2 Text = '' OnExit = edtTavbaExit end object edtOpTavba: TLabeledEdit Left = 119 Top = 68 Width = 139 Height = 33 Alignment = taCenter EditLabel.Width = 198 EditLabel.Height = 25 EditLabel.Caption = 'Operace ODL'#201'V'#193'N'#205' :' TabOrder = 0 Text = '' OnExit = edtOpTavbaExit end object selTavba: TButtonedEdit Left = 258 Top = 133 Width = 34 Height = 33 TabOrder = 3 OnClick = selTavbaClick end object selOpTavba: TButtonedEdit Left = 258 Top = 68 Width = 34 Height = 33 TabOrder = 1 OnClick = selOpTavbaClick end object edtFormir: TLabeledEdit Left = 119 Top = 217 Width = 139 Height = 33 Alignment = taCenter EditLabel.Width = 133 EditLabel.Height = 25 EditLabel.Caption = 'Form'#237#345' (os.'#269'.):' TabOrder = 4 Text = '' OnExit = edtFormirExit end object selFormir: TButtonedEdit Left = 258 Top = 217 Width = 34 Height = 33 TabOrder = 5 OnClick = selFormirClick end end object shVibrovani: TTabSheet Caption = ' Vibrov'#225'n'#237' ' ImageIndex = 1 object Label3: TLabel Left = 51 Top = 212 Width = 105 Height = 25 Caption = 'Sko'#345'epiny :' end object Label4: TLabel Left = 151 Top = 291 Width = 151 Height = 25 Caption = 'zmetky (rozbit'#233')' end object Label2: TLabel Left = 104 Top = 243 Width = 65 Height = 25 Caption = 'celkem' end object lblVibrator: TLabel Left = 280 Top = 182 Width = 4 Height = 16 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object lblLidiZTavby2: TLabel Left = 280 Top = 113 Width = 4 Height = 16 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object Label7: TLabel Left = 94 Top = 456 Width = 63 Height = 25 Caption = 'D'#225'vka:' end object Label19: TLabel Left = 151 Top = 357 Width = 152 Height = 25 Caption = 'zmetky (vytekl'#233')' end object Label20: TLabel Left = 151 Top = 406 Width = 207 Height = 25 Caption = 'zmetky (chem.slo'#382'en'#237')' end object edtOpVibr: TLabeledEdit Left = 94 Top = 41 Width = 139 Height = 33 Alignment = taCenter EditLabel.Width = 257 EditLabel.Height = 25 EditLabel.Caption = 'V'#253'robn'#237' operace vibrov'#225'n'#237' :' TabOrder = 0 Text = '' OnExit = edtOpVibrExit end object selOpVibr: TButtonedEdit Left = 233 Top = 41 Width = 34 Height = 33 TabOrder = 1 OnClick = selOpVibrClick end object edtTavbaV: TLabeledEdit Left = 94 Top = 104 Width = 139 Height = 33 Alignment = taCenter EditLabel.Width = 70 EditLabel.Height = 25 EditLabel.Caption = 'Tavba :' TabOrder = 2 Text = '' OnExit = edtTavbaVExit end object selTavbaV: TButtonedEdit Left = 233 Top = 104 Width = 34 Height = 33 TabOrder = 3 OnClick = selTavbaVClick end object edtVibrator: TLabeledEdit Left = 94 Top = 173 Width = 139 Height = 33 Alignment = taCenter EditLabel.Width = 159 EditLabel.Height = 25 EditLabel.Caption = 'Vibrova'#269' (os.'#269'.) :' TabOrder = 4 Text = '' OnExit = edtVibratorExit end object selVibrator: TButtonedEdit Left = 233 Top = 173 Width = 34 Height = 33 TabOrder = 5 OnClick = selVibratorClick end object edtStrCelk: TRzNumericEdit Left = 51 Top = 240 Width = 47 Height = 33 Alignment = taCenter MaxLength = 3 TabOrder = 6 DisplayFormat = ',0;(,0)' end object edtStrZmetky: TRzNumericEdit Left = 101 Top = 289 Width = 44 Height = 33 Alignment = taCenter MaxLength = 3 TabOrder = 7 DisplayFormat = ',0;(,0)' end object edtDavka: TEdit Left = 171 Top = 454 Width = 100 Height = 33 Alignment = taCenter MaxLength = 8 ReadOnly = True TabOrder = 8 OnExit = edtDavkaExit end object selDavka: TButtonedEdit Left = 271 Top = 453 Width = 34 Height = 33 TabOrder = 9 OnClick = selDavkaClick end object edtStrZmetky2: TRzNumericEdit Left = 101 Top = 352 Width = 44 Height = 33 Alignment = taCenter MaxLength = 3 TabOrder = 10 DisplayFormat = ',0;(,0)' end object cbZmetky: TCheckBox Left = 314 Top = 284 Width = 61 Height = 17 Caption = 'OBL' TabOrder = 11 end object cbStrNenalite: TCheckBox Left = 314 Top = 316 Width = 98 Height = 24 Caption = 'nenalit'#233 TabOrder = 12 end object cbZmetky2: TCheckBox Left = 314 Top = 364 Width = 61 Height = 17 Caption = 'OBL' TabOrder = 13 end object edtStrZmetky3: TRzNumericEdit Left = 101 Top = 403 Width = 44 Height = 33 Alignment = taCenter MaxLength = 3 TabOrder = 14 DisplayFormat = ',0;(,0)' end end object shOdvStr: TTabSheet Caption = ' Odveden'#237' STR' ImageIndex = 2 object Label5: TLabel Left = 141 Top = 205 Width = 105 Height = 25 Caption = 'Sko'#345'epiny :' end object Label6: TLabel Left = 194 Top = 236 Width = 42 Height = 25 Caption = 'celk.' Visible = False end object lblZamest: TLabel Left = 129 Top = 184 Width = 4 Height = 16 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object lblStromKs: TLabel Left = 260 Top = 236 Width = 7 Height = 25 end object Label8: TLabel Left = 91 Top = 305 Width = 63 Height = 25 Caption = 'D'#225'vka:' end object lblOperace: TLabel Left = 115 Top = 79 Width = 4 Height = 16 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object lblStrDavka: TLabel Left = 144 Top = 341 Width = 142 Height = 19 Alignment = taRightJustify AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object edtOpStr: TLabeledEdit Left = 129 Top = 40 Width = 139 Height = 33 Alignment = taCenter EditLabel.Width = 166 EditLabel.Height = 25 EditLabel.Caption = 'V'#253'robn'#237' operace :' TabOrder = 0 Text = '' OnExit = edtOpStrExit end object selOpStr: TButtonedEdit Left = 268 Top = 40 Width = 34 Height = 33 TabOrder = 1 OnClick = selOpStrClick end object edtZamStr: TLabeledEdit Left = 129 Top = 146 Width = 139 Height = 33 Alignment = taCenter EditLabel.Width = 203 EditLabel.Height = 25 EditLabel.Caption = 'Zam'#283'stnanec (os.'#269'.) :' TabOrder = 2 Text = '' OnExit = edtZamStrExit end object selZamStr: TButtonedEdit Left = 268 Top = 146 Width = 34 Height = 33 TabOrder = 3 OnClick = selZamStrClick end object edtStrStr: TRzNumericEdit Left = 141 Top = 233 Width = 47 Height = 33 Alignment = taCenter MaxLength = 3 TabOrder = 4 DisplayFormat = ',0;(,0)' end object edtDavkaStr: TEdit Left = 168 Top = 303 Width = 100 Height = 33 Alignment = taCenter MaxLength = 8 ReadOnly = True TabOrder = 5 OnExit = edtDavkaStrExit end object selDavkaStr: TButtonedEdit Left = 268 Top = 303 Width = 34 Height = 33 TabOrder = 6 OnClick = selDavkaStrClick end end object shPrevodVosk: TTabSheet Caption = ' Vosk->Obal ' ImageIndex = 3 object Label10: TLabel Left = 91 Top = 62 Width = 62 Height = 25 Caption = 'P'#345#237'kaz:' end object Label11: TLabel Left = 124 Top = 205 Width = 111 Height = 25 Caption = 'Strome'#269'ky :' end object Label9: TLabel Left = 108 Top = 269 Width = 75 Height = 25 Caption = 'K datu :' end object lblVoskDavka: TLabel Left = 81 Top = 161 Width = 307 Height = 25 Alignment = taCenter AutoSize = False end object lblVoskZbyva: TLabel Left = 73 Top = 106 Width = 323 Height = 25 Alignment = taCenter AutoSize = False end object edtVoskPrikaz: TEdit Left = 161 Top = 60 Width = 166 Height = 33 Alignment = taCenter MaxLength = 15 TabOrder = 0 OnExit = edtVoskPrikazExit end object selVoskPrikaz: TButtonedEdit Left = 327 Top = 60 Width = 34 Height = 33 TabOrder = 1 OnClick = selVoskPrikazClick end object edtVoskStr: TRzNumericEdit Left = 244 Top = 202 Width = 62 Height = 33 Alignment = taCenter MaxLength = 3 TabOrder = 2 OnExit = edtVoskStrExit DisplayFormat = ',0;(,0)' end object datVoskDatum: TRzDateTimePicker Left = 189 Top = 269 Width = 142 Height = 33 Date = 43649.000000000000000000 Format = '' Time = 0.393833148147678000 TabOrder = 3 end end object shDavkaObec: TTabSheet Caption = ' D'#225'vka obecn'#225' ' ImageIndex = 4 object Label12: TLabel Left = 94 Top = 65 Width = 62 Height = 25 Caption = 'P'#345#237'kaz:' end object Label14: TLabel Left = 111 Top = 272 Width = 75 Height = 25 Caption = 'K datu :' end object Label15: TLabel Left = 154 Top = 160 Width = 63 Height = 25 Caption = 'D'#225'vka:' end object lblObecZbyva: TLabel Left = 76 Top = 109 Width = 323 Height = 25 Alignment = taCenter AutoSize = False end object edtPrikazObec: TEdit Left = 164 Top = 63 Width = 166 Height = 33 Alignment = taCenter MaxLength = 15 TabOrder = 0 OnExit = edtPrikazObecExit end object selPrikazObec: TButtonedEdit Left = 330 Top = 63 Width = 34 Height = 33 TabOrder = 1 OnClick = selPrikazObecClick end object edtStrObec: TRzNumericEdit Left = 196 Top = 212 Width = 62 Height = 33 Alignment = taCenter MaxLength = 3 TabOrder = 4 DisplayFormat = ',0;(,0)' end object datDavkaObec: TRzDateTimePicker Left = 192 Top = 272 Width = 142 Height = 33 Date = 43649.000000000000000000 Format = '' Time = 0.393833148147678000 TabOrder = 6 end object edtDavkaObec: TEdit Left = 231 Top = 158 Width = 100 Height = 33 Alignment = taCenter MaxLength = 8 ReadOnly = True TabOrder = 2 end object selDavkaObec: TButtonedEdit Left = 331 Top = 158 Width = 34 Height = 33 TabOrder = 3 OnClick = selDavkaObecClick end object cbMJObec: TComboBox Left = 264 Top = 212 Width = 66 Height = 33 ItemIndex = 0 TabOrder = 5 Text = 'ks' Items.Strings = ( 'ks' 'STR') end end object shP42: TTabSheet Caption = ' P'#345'evod P42/P43->OBROBNA' ImageIndex = 5 object Label13: TLabel Left = 45 Top = 60 Width = 85 Height = 25 Caption = 'Operace:' end object Label16: TLabel Left = 136 Top = 135 Width = 35 Height = 25 Caption = 'Ks :' end object Label17: TLabel Left = 94 Top = 299 Width = 63 Height = 25 Caption = 'D'#225'vka:' end object lblOperaceP42: TLabel Left = 3 Top = 98 Width = 445 Height = 19 Alignment = taCenter AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object lblDavkaObr: TLabel Left = 3 Top = 335 Width = 448 Height = 19 Alignment = taCenter AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object Label18: TLabel Left = 31 Top = 205 Width = 153 Height = 25 Alignment = taRightJustify Caption = 'Zam'#283'st. (os.'#269'.) :' end object lblZamP42: TLabel Left = 9 Top = 244 Width = 436 Height = 19 Alignment = taCenter AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object edtOperP42: TEdit Left = 141 Top = 58 Width = 166 Height = 33 Alignment = taCenter MaxLength = 15 TabOrder = 0 OnExit = edtOperP42Exit end object selOperP42: TButtonedEdit Left = 307 Top = 57 Width = 34 Height = 33 TabOrder = 1 OnClick = selOperP42Click end object edtKsP42: TRzNumericEdit Left = 193 Top = 132 Width = 99 Height = 33 Alignment = taCenter MaxLength = 5 TabOrder = 2 DisplayFormat = ',0;(,0)' end object edtDavkaObr: TEdit Left = 171 Top = 297 Width = 100 Height = 33 Alignment = taCenter MaxLength = 8 ReadOnly = True TabOrder = 5 end object selDavkaObr: TButtonedEdit Left = 271 Top = 297 Width = 34 Height = 33 TabOrder = 6 OnClick = selDavkaObrClick end object selZamP42: TButtonedEdit Left = 289 Top = 202 Width = 34 Height = 33 TabOrder = 4 OnClick = selZamP42Click OnExit = selZamP42Exit end object edtZamP42: TRzNumericEdit Left = 190 Top = 202 Width = 99 Height = 33 Alignment = taCenter MaxLength = 5 TabOrder = 3 OnExit = edtZamP42Exit DisplayFormat = ',0;(,0)' end end end object btnOKNew: TButton Left = 20 Top = 637 Width = 116 Height = 39 Anchors = [akLeft] Caption = 'OK+nov'#253 TabOrder = 0 OnClick = btnOKNewClick end object gbEvidPrace: TGroupBox Left = 8 Top = 685 Width = 479 Height = 178 Caption = ' Ji'#382' evidov'#225'no' TabOrder = 4 object grdEvidPrace: TRzDBGrid Left = 4 Top = 27 Width = 471 Height = 142 DataSource = vDs Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -19 Font.Name = 'Tahoma' Font.Style = [] Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack] ParentFont = False ReadOnly = True TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -19 TitleFont.Name = 'Tahoma' TitleFont.Style = [] Columns = < item Alignment = taCenter Expanded = False FieldName = 'colDatum' Title.Alignment = taCenter Title.Caption = 'Datum' Width = 165 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colAutor' Title.Alignment = taCenter Title.Caption = 'Autor' Width = 153 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colMnoz' Title.Alignment = taCenter Title.Caption = 'Mno'#382'.' Width = 81 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'colMJ' Title.Alignment = taCenter Title.Caption = 'MJ' Width = 50 Visible = True end> end end object vTab: TVirtualTable FieldDefs = < item Name = 'colDatum' DataType = ftString Size = 20 end item Name = 'colAutor' DataType = ftString Size = 80 end> Left = 315 Top = 612 Data = { 040002000800636F6C446174756D01001400000000000800636F6C4175746F72 0100500000000000000000000000} object vTabcolDatum: TStringField FieldName = 'colDatum' end object vTabcolAutor: TStringField FieldName = 'colAutor' Size = 80 end object vTabcolMnoz: TFloatField FieldName = 'colMnoz' end object vTabcolMJ: TStringField FieldName = 'colMJ' Size = 10 end end object vDs: TDataSource DataSet = vTab Left = 360 Top = 615 end end