Prvni verze

frmGenPolos.dfm

@@ -0,0 +1,199 @@
+object formGenPolos: TformGenPolos
+  Left = 0
+  Top = 0
+  BorderIcons = [biSystemMenu]
+  BorderStyle = bsSingle
+  Caption = '   Generov'#225'n'#237' polosestav'
+  ClientHeight = 582
+  ClientWidth = 559
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -19
+  Font.Name = 'Tahoma'
+  Font.Style = []
+  OldCreateOrder = False
+  Position = poMainFormCenter
+  OnClose = FormClose
+  OnShow = FormShow
+  PixelsPerInch = 96
+  TextHeight = 23
+  object Label1: TLabel
+    Left = 482
+    Top = 13
+    Width = 32
+    Height = 23
+    Caption = 'VPC'
+  end
+  object Label2: TLabel
+    Left = 161
+    Top = 122
+    Width = 170
+    Height = 23
+    Caption = '(reg.'#269'. pro P43-P11)'
+  end
+  object sGrid: TrStringGridEd
+    Left = 0
+    Top = 168
+    Width = 541
+    Height = 357
+    ColCount = 4
+    DefaultColWidth = 90
+    DefaultRowHeight = 26
+    DefaultDrawing = False
+    FixedColor = clGradientActiveCaption
+    FixedCols = 0
+    RowCount = 10
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -19
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goEditing]
+    ParentFont = False
+    ScrollBars = ssVertical
+    TabOrder = 4
+    OptionsEx = [dgAlwaysShowSelection, dgShowTitleBold]
+    Columns = <
+      item
+        ButtonStyle = sgbCheckbox
+        DataType = sgdInteger
+        MaxValue = 1.000000000000000000
+        Alignment = taCenter
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = []
+        ParentFont = False
+        TitleCaption = 'Gen ?'
+        TitleAlignment = taCenter
+      end
+      item
+        Alignment = taCenter
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -17
+        Font.Name = 'Tahoma'
+        Font.Style = []
+        ParentFont = False
+        ReadOnly = True
+        TitleCaption = 'SZ'
+        TitleAlignment = taCenter
+      end
+      item
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -17
+        Font.Name = 'Tahoma'
+        Font.Style = []
+        ParentFont = False
+        ReadOnly = True
+        TitleCaption = 'Skupina zbo'#382#237
+        TitleAlignment = taCenter
+      end
+      item
+        DataType = sgdNumber
+        MinValue = 100000.000000000000000000
+        Alignment = taCenter
+        TitleCaption = 'VPC'
+        TitleAlignment = taCenter
+      end>
+    TitleRowHeight = 25
+    ColWidths = (
+      68
+      59
+      326
+      75)
+    RowHeights = (
+      25
+      26
+      26
+      26
+      26
+      26
+      26
+      26
+      26
+      26)
+  end
+  object edtRegCis: TLabeledEdit
+    Left = 9
+    Top = 38
+    Width = 121
+    Height = 31
+    Color = clGradientInactiveCaption
+    EditLabel.Width = 67
+    EditLabel.Height = 23
+    EditLabel.Caption = 'V'#253'robek'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -19
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentFont = False
+    ReadOnly = True
+    TabOrder = 0
+  end
+  object edtNazev: TEdit
+    Left = 136
+    Top = 38
+    Width = 306
+    Height = 31
+    Color = clGradientInactiveCaption
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -19
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentFont = False
+    ReadOnly = True
+    TabOrder = 1
+  end
+  object btnGen: TButton
+    Left = 105
+    Top = 538
+    Width = 194
+    Height = 33
+    Caption = 'Generuj /Aktualizuj'
+    TabOrder = 3
+    OnClick = btnGenClick
+  end
+  object btnStorno: TButton
+    Left = 356
+    Top = 538
+    Width = 97
+    Height = 33
+    Caption = 'Storno'
+    TabOrder = 2
+    OnClick = btnStornoClick
+  end
+  object edtVPC: TrEditNum
+    Left = 456
+    Top = 38
+    Width = 79
+    Height = 31
+    Alignment = taCenter
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -19
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentFont = False
+    TabOrder = 5
+    Style = enFloat
+    MaxValue = 100000.000000000000000000
+  end
+  object edtOdlitek: TLabeledEdit
+    Left = 8
+    Top = 119
+    Width = 147
+    Height = 31
+    EditLabel.Width = 267
+    EditLabel.Height = 23
+    EditLabel.Caption = #268#237'slo odlitku (v p'#345#237'pad'#283' pot'#345'eby)'
+    MaxLength = 12
+    TabOrder = 6
+    OnExit = edtOdlitekExit
+  end
+end