Prvni verze

frmGenTPV.dfm

@@ -0,0 +1,269 @@
+object formGenTPV: TformGenTPV
+  Left = 0
+  Top = 0
+  BorderIcons = [biSystemMenu]
+  BorderStyle = bsSingle
+  Caption = '  Generuj karty + TPV'
+  ClientHeight = 397
+  ClientWidth = 644
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -16
+  Font.Name = 'Tahoma'
+  Font.Style = []
+  Position = poOwnerFormCenter
+  OnClose = FormClose
+  OnShow = FormShow
+  TextHeight = 19
+  object Label1: TLabel
+    Left = 127
+    Top = 58
+    Width = 44
+    Height = 19
+    Caption = #268'.org.'
+  end
+  object Label2: TLabel
+    Left = 23
+    Top = 181
+    Width = 96
+    Height = 19
+    Caption = 'N'#225'zev / popis'
+  end
+  object Label3: TLabel
+    Left = 204
+    Top = 58
+    Width = 44
+    Height = 19
+    Caption = 'Pozice'
+  end
+  object Label4: TLabel
+    Left = 271
+    Top = 58
+    Width = 55
+    Height = 19
+    Caption = 'Materi'#225'l'
+  end
+  object Label6: TLabel
+    Left = 23
+    Top = 293
+    Width = 155
+    Height = 19
+    Caption = 'Vzor pro operace TPV'
+  end
+  object lblVzorTPV: TLabel
+    Left = 218
+    Top = 316
+    Width = 396
+    Height = 19
+    AutoSize = False
+  end
+  object Label7: TLabel
+    Left = 359
+    Top = 58
+    Width = 86
+    Height = 19
+    Caption = 'Technologie'
+  end
+  object Label16: TLabel
+    Left = 472
+    Top = 58
+    Width = 49
+    Height = 19
+    Caption = '1. obal'
+  end
+  object Label5: TLabel
+    Left = 23
+    Top = 58
+    Width = 56
+    Height = 19
+    Caption = 'Skupina'
+  end
+  object Label8: TLabel
+    Left = 59
+    Top = 114
+    Width = 63
+    Height = 19
+    Caption = 'P51/VOx'
+  end
+  object Label9: TLabel
+    Left = 59
+    Top = 146
+    Width = 60
+    Height = 19
+    Caption = 'P11-P43'
+  end
+  object edtNazev: TEdit
+    Left = 23
+    Top = 203
+    Width = 591
+    Height = 27
+    MaxLength = 100
+    TabOrder = 8
+  end
+  object edtCisOrg: TComboEdit
+    Left = 127
+    Top = 79
+    Width = 71
+    Height = 27
+    Alignment = taCenter
+    ClickKey = 16397
+    GlyphKind = gkEllipsis
+    MaxLength = 4
+    NumGlyphs = 1
+    ParentShowHint = False
+    ShowHint = True
+    TabOrder = 1
+    Text = ''
+    OnButtonClick = edtCisOrgButtonClick
+    OnExit = edtCisOrgExit
+  end
+  object edtPozice: TEdit
+    Left = 204
+    Top = 79
+    Width = 59
+    Height = 27
+    Alignment = taCenter
+    MaxLength = 3
+    TabOrder = 2
+    OnExit = edtPoziceExit
+  end
+  object edtMat: TComboEdit
+    Left = 271
+    Top = 79
+    Width = 59
+    Height = 27
+    Alignment = taCenter
+    ClickKey = 16397
+    GlyphKind = gkEllipsis
+    MaxLength = 2
+    NumGlyphs = 1
+    ParentShowHint = False
+    ShowHint = True
+    TabOrder = 3
+    Text = ''
+    OnButtonClick = edtMatButtonClick
+    OnExit = edtMatExit
+  end
+  object edtVzorTPV: TComboEdit
+    Left = 23
+    Top = 313
+    Width = 179
+    Height = 27
+    ClickKey = 16397
+    GlyphKind = gkEllipsis
+    MaxLength = 15
+    NumGlyphs = 1
+    ParentShowHint = False
+    ShowHint = True
+    TabOrder = 10
+    Text = ''
+    OnButtonClick = edtVzorTPVButtonClick
+  end
+  object btnOK: TButton
+    Left = 397
+    Top = 356
+    Width = 97
+    Height = 31
+    Caption = 'Generuj'
+    TabOrder = 11
+    OnClick = btnOKClick
+  end
+  object btnStorno: TButton
+    Left = 517
+    Top = 356
+    Width = 97
+    Height = 31
+    Caption = 'Storno'
+    TabOrder = 12
+    OnClick = btnStornoClick
+  end
+  object edtTech: TEdit
+    Left = 359
+    Top = 79
+    Width = 37
+    Height = 27
+    Alignment = taCenter
+    MaxLength = 1
+    TabOrder = 4
+    OnExit = edtTechExit
+  end
+  object cboxPrvniObal: TComboBox
+    Left = 472
+    Top = 78
+    Width = 115
+    Height = 27
+    Style = csDropDownList
+    TabOrder = 5
+    Items.Strings = (
+      ''
+      'K'#345'emen'
+      'Zirkon')
+  end
+  object cboxVOD: TComboBox
+    Left = 23
+    Top = 79
+    Width = 65
+    Height = 27
+    Style = csDropDownList
+    TabOrder = 0
+    Items.Strings = (
+      'VOD'
+      'VOB'
+      'F01'
+      'F10'
+      'F11'
+      'F20'
+      'F21'
+      'PNA'
+      'POD'
+      'VKO'
+      'VS1'
+      'VS2')
+  end
+  object cbGenSpodek: TCheckBox
+    Left = 23
+    Top = 248
+    Width = 187
+    Height = 22
+    Caption = '   generovat podsestavy'
+    Checked = True
+    State = cbChecked
+    TabOrder = 9
+  end
+  object edtRegC: TEdit
+    Left = 128
+    Top = 111
+    Width = 198
+    Height = 27
+    TabOrder = 6
+  end
+  object cbRCdleFin: TCheckBox
+    Left = 251
+    Top = 248
+    Width = 187
+    Height = 22
+    Caption = '   reg.'#269'. P11-P43 dle fin'#225'lu'
+    Checked = True
+    State = cbChecked
+    TabOrder = 13
+  end
+  object edtRegCN: TEdit
+    Left = 128
+    Top = 143
+    Width = 198
+    Height = 27
+    TabOrder = 7
+    OnChange = edtRegCNChange
+  end
+  object cbNabidka: TCheckBox
+    Left = 23
+    Top = 20
+    Width = 110
+    Height = 22
+    Caption = '  NAB'#205'DKA'
+    Checked = True
+    State = cbChecked
+    TabOrder = 14
+  end
+end