Prvni verze
This commit is contained in:
509
frmZasobaObjednavky.dfm
Normal file
509
frmZasobaObjednavky.dfm
Normal file
@ -0,0 +1,509 @@
|
||||
object formZasobaObjednavky: TformZasobaObjednavky
|
||||
Left = 0
|
||||
Top = 0
|
||||
BorderIcons = [biSystemMenu]
|
||||
BorderStyle = bsSingle
|
||||
Caption = ' Z'#225'soba / Objedn'#225'vky'
|
||||
ClientHeight = 719
|
||||
ClientWidth = 1174
|
||||
Color = clBtnFace
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -16
|
||||
Font.Name = 'Segoe UI'
|
||||
Font.Style = []
|
||||
Position = poOwnerFormCenter
|
||||
OnShow = FormShow
|
||||
TextHeight = 21
|
||||
object GridPanel1: TGridPanel
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 1174
|
||||
Height = 719
|
||||
Align = alClient
|
||||
ColumnCollection = <
|
||||
item
|
||||
Value = 100.000000000000000000
|
||||
end>
|
||||
ControlCollection = <
|
||||
item
|
||||
Column = 0
|
||||
Control = grdZasobaObjednavky
|
||||
Row = 1
|
||||
end
|
||||
item
|
||||
Column = 0
|
||||
Control = GridPanel2
|
||||
Row = 0
|
||||
end>
|
||||
RowCollection = <
|
||||
item
|
||||
Value = 15.000000000000000000
|
||||
end
|
||||
item
|
||||
Value = 80.000000000000000000
|
||||
end
|
||||
item
|
||||
Value = 5.000000000000000000
|
||||
end>
|
||||
TabOrder = 0
|
||||
object grdZasobaObjednavky: TJvDBGrid
|
||||
Left = 1
|
||||
Top = 109
|
||||
Width = 1172
|
||||
Height = 573
|
||||
Align = alClient
|
||||
DataSource = dm.dsZasobyObjednavky
|
||||
DrawingStyle = gdsGradient
|
||||
GradientEndColor = clActiveCaption
|
||||
GradientStartColor = 16776176
|
||||
Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
|
||||
TabOrder = 0
|
||||
TitleFont.Charset = DEFAULT_CHARSET
|
||||
TitleFont.Color = clWindowText
|
||||
TitleFont.Height = -16
|
||||
TitleFont.Name = 'Segoe UI'
|
||||
TitleFont.Style = []
|
||||
OnDrawColumnCell = grdZasobaObjednavkyDrawColumnCell
|
||||
OnDblClick = grdZasobaObjednavkyDblClick
|
||||
SelectColumnsDialogStrings.Caption = 'Select columns'
|
||||
SelectColumnsDialogStrings.OK = '&OK'
|
||||
SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!'
|
||||
EditControls = <>
|
||||
RowsHeight = 25
|
||||
TitleRowHeight = 25
|
||||
Columns = <
|
||||
item
|
||||
Expanded = False
|
||||
FieldName = 'colIDKmen'
|
||||
Visible = False
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'colSZ'
|
||||
Title.Alignment = taCenter
|
||||
Title.Caption = 'SK'
|
||||
Visible = True
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'colRC'
|
||||
Title.Alignment = taCenter
|
||||
Title.Caption = 'Reg. '#269#237'slo'
|
||||
Width = 106
|
||||
Visible = True
|
||||
end
|
||||
item
|
||||
Expanded = False
|
||||
FieldName = 'colNazev1'
|
||||
Title.Alignment = taCenter
|
||||
Title.Caption = 'N'#225'zev'
|
||||
Width = 337
|
||||
Visible = True
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'colMJ'
|
||||
Title.Alignment = taCenter
|
||||
Title.Caption = 'MJ'
|
||||
Width = 44
|
||||
Visible = True
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'colBaleni1'
|
||||
Title.Alignment = taCenter
|
||||
Title.Caption = 'Balen'#237
|
||||
Width = 75
|
||||
Visible = True
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'colBaleni2'
|
||||
Title.Alignment = taCenter
|
||||
Title.Caption = ' '
|
||||
Width = 68
|
||||
Visible = True
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'colVyroba'
|
||||
Title.Alignment = taCenter
|
||||
Title.Caption = 'V'#253'roba'
|
||||
Width = 76
|
||||
Visible = True
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'colNaCeste'
|
||||
Title.Alignment = taCenter
|
||||
Title.Caption = 'Na cest'#283
|
||||
Width = 84
|
||||
Visible = True
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'colSklad'
|
||||
Title.Alignment = taCenter
|
||||
Title.Caption = 'Sklad'
|
||||
Width = 77
|
||||
Visible = True
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'colCelkem'
|
||||
Title.Alignment = taCenter
|
||||
Title.Caption = 'Celkem'
|
||||
Width = 75
|
||||
Visible = True
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'colObjednano'
|
||||
Title.Alignment = taCenter
|
||||
Title.Caption = 'Objedn'#225'no'
|
||||
Width = 89
|
||||
Visible = True
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'colPalet'
|
||||
Title.Alignment = taCenter
|
||||
Title.Caption = 'Palet'
|
||||
Width = 57
|
||||
Visible = True
|
||||
end>
|
||||
end
|
||||
object GridPanel2: TGridPanel
|
||||
Left = 1
|
||||
Top = 1
|
||||
Width = 1172
|
||||
Height = 108
|
||||
Align = alClient
|
||||
ColumnCollection = <
|
||||
item
|
||||
Value = 100.000000000000000000
|
||||
end>
|
||||
ControlCollection = <
|
||||
item
|
||||
Column = 0
|
||||
Control = GridPanel3
|
||||
Row = 1
|
||||
end>
|
||||
RowCollection = <
|
||||
item
|
||||
Value = 59.877371143897310000
|
||||
end
|
||||
item
|
||||
Value = 40.122628856102700000
|
||||
end>
|
||||
TabOrder = 1
|
||||
object GridPanel3: TGridPanel
|
||||
Left = 1
|
||||
Top = 64
|
||||
Width = 1170
|
||||
Height = 43
|
||||
Align = alClient
|
||||
ColumnCollection = <
|
||||
item
|
||||
Value = 1.000000000000000000
|
||||
end
|
||||
item
|
||||
Value = 2.800000000000000000
|
||||
end
|
||||
item
|
||||
Value = 9.100000000000000000
|
||||
end
|
||||
item
|
||||
Value = 29.000000000000000000
|
||||
end
|
||||
item
|
||||
Value = 3.800000000000000000
|
||||
end
|
||||
item
|
||||
Value = 6.500000000000000000
|
||||
end
|
||||
item
|
||||
Value = 5.900000000000000000
|
||||
end
|
||||
item
|
||||
Value = 6.900000000000000000
|
||||
end
|
||||
item
|
||||
Value = 7.000000000000000000
|
||||
end
|
||||
item
|
||||
Value = 6.900000000000000000
|
||||
end
|
||||
item
|
||||
Value = 6.500000000000000000
|
||||
end
|
||||
item
|
||||
Value = 14.599999999999990000
|
||||
end>
|
||||
ControlCollection = <
|
||||
item
|
||||
Column = 1
|
||||
Control = edtSZ
|
||||
Row = 0
|
||||
end
|
||||
item
|
||||
Column = 2
|
||||
Control = edtRC
|
||||
Row = 0
|
||||
end
|
||||
item
|
||||
Column = 3
|
||||
Control = edtNazev1
|
||||
Row = 0
|
||||
end
|
||||
item
|
||||
Column = 4
|
||||
Control = edtMJ
|
||||
Row = 0
|
||||
end
|
||||
item
|
||||
Column = 5
|
||||
Control = edtBaleni1
|
||||
Row = 0
|
||||
end
|
||||
item
|
||||
Column = 6
|
||||
Control = edtBaleni2
|
||||
Row = 0
|
||||
end
|
||||
item
|
||||
Column = 7
|
||||
Control = cbVyroba
|
||||
Row = 0
|
||||
end
|
||||
item
|
||||
Column = 8
|
||||
Control = cbNaCeste
|
||||
Row = 0
|
||||
end
|
||||
item
|
||||
Column = 9
|
||||
Control = cbSklad
|
||||
Row = 0
|
||||
end
|
||||
item
|
||||
Column = 10
|
||||
Control = cbCelkem
|
||||
Row = 0
|
||||
end
|
||||
item
|
||||
Column = 11
|
||||
Control = cbObjednano
|
||||
Row = 0
|
||||
end
|
||||
item
|
||||
Column = 0
|
||||
Control = Label1
|
||||
Row = 0
|
||||
end>
|
||||
RowCollection = <
|
||||
item
|
||||
Value = 100.000000000000000000
|
||||
end
|
||||
item
|
||||
SizeStyle = ssAuto
|
||||
end>
|
||||
TabOrder = 0
|
||||
DesignSize = (
|
||||
1170
|
||||
43)
|
||||
object edtSZ: TEdit
|
||||
AlignWithMargins = True
|
||||
Left = 14
|
||||
Top = 10
|
||||
Width = 30
|
||||
Height = 29
|
||||
Margins.Left = 1
|
||||
Margins.Right = 1
|
||||
Align = alBottom
|
||||
Alignment = taCenter
|
||||
MaxLength = 3
|
||||
TabOrder = 0
|
||||
OnChange = edtSZChange
|
||||
end
|
||||
object edtRC: TEdit
|
||||
AlignWithMargins = True
|
||||
Left = 46
|
||||
Top = 10
|
||||
Width = 105
|
||||
Height = 29
|
||||
Margins.Left = 1
|
||||
Margins.Right = 1
|
||||
Align = alBottom
|
||||
Alignment = taCenter
|
||||
MaxLength = 30
|
||||
TabOrder = 1
|
||||
OnChange = edtRCChange
|
||||
end
|
||||
object edtNazev1: TEdit
|
||||
AlignWithMargins = True
|
||||
Left = 153
|
||||
Top = 10
|
||||
Width = 336
|
||||
Height = 29
|
||||
Margins.Left = 1
|
||||
Margins.Right = 1
|
||||
Align = alBottom
|
||||
MaxLength = 100
|
||||
TabOrder = 2
|
||||
OnChange = edtNazev1Change
|
||||
end
|
||||
object edtMJ: TEdit
|
||||
AlignWithMargins = True
|
||||
Left = 491
|
||||
Top = 10
|
||||
Width = 43
|
||||
Height = 29
|
||||
Margins.Left = 1
|
||||
Margins.Right = 1
|
||||
Align = alBottom
|
||||
Alignment = taCenter
|
||||
MaxLength = 10
|
||||
TabOrder = 3
|
||||
OnChange = edtMJChange
|
||||
end
|
||||
object edtBaleni1: TEdit
|
||||
AlignWithMargins = True
|
||||
Left = 536
|
||||
Top = 10
|
||||
Width = 74
|
||||
Height = 29
|
||||
Margins.Left = 1
|
||||
Margins.Right = 1
|
||||
Align = alBottom
|
||||
Alignment = taCenter
|
||||
MaxLength = 8
|
||||
NumbersOnly = True
|
||||
OEMConvert = True
|
||||
TabOrder = 4
|
||||
OnChange = edtBaleni1Change
|
||||
end
|
||||
object edtBaleni2: TEdit
|
||||
AlignWithMargins = True
|
||||
Left = 612
|
||||
Top = 10
|
||||
Width = 67
|
||||
Height = 29
|
||||
Margins.Left = 1
|
||||
Margins.Right = 1
|
||||
Align = alBottom
|
||||
Alignment = taCenter
|
||||
MaxLength = 8
|
||||
NumbersOnly = True
|
||||
OEMConvert = True
|
||||
TabOrder = 5
|
||||
OnChange = edtBaleni2Change
|
||||
end
|
||||
object cbVyroba: TComboBox
|
||||
AlignWithMargins = True
|
||||
Left = 681
|
||||
Top = 4
|
||||
Width = 78
|
||||
Height = 29
|
||||
Margins.Left = 1
|
||||
Margins.Right = 1
|
||||
Align = alClient
|
||||
Style = csDropDownList
|
||||
TabOrder = 6
|
||||
OnChange = cbVyrobaChange
|
||||
Items.Strings = (
|
||||
'<>0'
|
||||
'=0')
|
||||
end
|
||||
object cbNaCeste: TComboBox
|
||||
AlignWithMargins = True
|
||||
Left = 761
|
||||
Top = 4
|
||||
Width = 80
|
||||
Height = 29
|
||||
Margins.Left = 1
|
||||
Margins.Right = 1
|
||||
Align = alClient
|
||||
Style = csDropDownList
|
||||
TabOrder = 7
|
||||
OnChange = cbNaCesteChange
|
||||
Items.Strings = (
|
||||
'<>0'
|
||||
'=0')
|
||||
end
|
||||
object cbSklad: TComboBox
|
||||
AlignWithMargins = True
|
||||
Left = 843
|
||||
Top = 4
|
||||
Width = 79
|
||||
Height = 29
|
||||
Margins.Left = 1
|
||||
Margins.Right = 1
|
||||
Align = alClient
|
||||
Style = csDropDownList
|
||||
TabOrder = 8
|
||||
OnChange = cbSkladChange
|
||||
Items.Strings = (
|
||||
''
|
||||
'<>0'
|
||||
'=0')
|
||||
end
|
||||
object cbCelkem: TComboBox
|
||||
AlignWithMargins = True
|
||||
Left = 924
|
||||
Top = 4
|
||||
Width = 73
|
||||
Height = 29
|
||||
Margins.Left = 1
|
||||
Margins.Right = 1
|
||||
Align = alClient
|
||||
Style = csDropDownList
|
||||
TabOrder = 9
|
||||
OnChange = cbCelkemChange
|
||||
Items.Strings = (
|
||||
'<>0'
|
||||
'=0')
|
||||
end
|
||||
object cbObjednano: TComboBox
|
||||
AlignWithMargins = True
|
||||
Left = 999
|
||||
Top = 4
|
||||
Width = 169
|
||||
Height = 29
|
||||
Margins.Left = 1
|
||||
Margins.Right = 1
|
||||
Align = alClient
|
||||
Style = csDropDownList
|
||||
TabOrder = 10
|
||||
OnChange = cbObjednanoChange
|
||||
Items.Strings = (
|
||||
'<>0'
|
||||
'=0')
|
||||
end
|
||||
object Label1: TLabel
|
||||
Left = 2
|
||||
Top = 11
|
||||
Width = 9
|
||||
Height = 21
|
||||
Anchors = []
|
||||
Caption = 'X'
|
||||
OnClick = Label1Click
|
||||
ExplicitLeft = 1
|
||||
ExplicitTop = 8
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
Reference in New Issue
Block a user