200 lines
4.4 KiB
Plaintext
200 lines
4.4 KiB
Plaintext
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
|