1007 lines
23 KiB
Plaintext
1007 lines
23 KiB
Plaintext
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
|