1785 lines
47 KiB
Plaintext
1785 lines
47 KiB
Plaintext
object formPekarna: TformPekarna
|
|
Left = 0
|
|
Top = 0
|
|
Margins.Bottom = 10
|
|
BorderIcons = [biSystemMenu]
|
|
BorderStyle = bsSingle
|
|
Caption = ' P E K '#193' R N A'
|
|
ClientHeight = 1041
|
|
ClientWidth = 1813
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -13
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
Position = poOwnerFormCenter
|
|
WindowState = wsMaximized
|
|
OnClose = FormClose
|
|
OnCreate = FormCreate
|
|
OnResize = FormResize
|
|
OnShow = FormShow
|
|
TextHeight = 17
|
|
object GridPanel1: TGridPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 1813
|
|
Height = 1041
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 35.000000000000000000
|
|
end
|
|
item
|
|
Value = 50.000000000000000000
|
|
end
|
|
item
|
|
Value = 15.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 1
|
|
Control = GridPanel2
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 1
|
|
Control = grdStroje
|
|
Row = 1
|
|
end
|
|
item
|
|
Column = 0
|
|
Control = pgCtrlPlan
|
|
Row = 1
|
|
end
|
|
item
|
|
Column = 0
|
|
Control = GridPanel3
|
|
Row = 2
|
|
end
|
|
item
|
|
Column = 2
|
|
Control = GridPanel5
|
|
Row = 2
|
|
end
|
|
item
|
|
Column = 2
|
|
Control = GridPanel6
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 2
|
|
Control = memVyrobniPoznamka
|
|
Row = 1
|
|
end
|
|
item
|
|
Column = 1
|
|
Control = GridPanel4
|
|
Row = 2
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 9.839133440683879000
|
|
end
|
|
item
|
|
Value = 60.212878705737260000
|
|
end
|
|
item
|
|
Value = 29.947987853578860000
|
|
end>
|
|
ShowCaption = False
|
|
TabOrder = 0
|
|
object GridPanel2: TGridPanel
|
|
Left = 635
|
|
Top = 1
|
|
Width = 905
|
|
Height = 102
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 45.000000000000000000
|
|
end
|
|
item
|
|
Value = 10.000000000000000000
|
|
end
|
|
item
|
|
Value = 45.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = sgInfo
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 2
|
|
Control = sgCas
|
|
Row = 0
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 100.000000000000000000
|
|
end>
|
|
ShowCaption = False
|
|
TabOrder = 0
|
|
object sgInfo: TStringGrid
|
|
Left = 1
|
|
Top = 1
|
|
Width = 406
|
|
Height = 100
|
|
Align = alClient
|
|
ColCount = 4
|
|
DefaultColAlignment = taCenter
|
|
DefaultRowHeight = 36
|
|
Enabled = False
|
|
FixedCols = 0
|
|
RowCount = 2
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -24
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
Options = [goFixedVertLine, goFixedHorzLine, goRangeSelect, goRowSelect, goFixedRowDefAlign]
|
|
ParentFont = False
|
|
ScrollBars = ssNone
|
|
TabOrder = 0
|
|
OnDrawCell = sgInfoDrawCell
|
|
end
|
|
object sgCas: TStringGrid
|
|
Left = 584
|
|
Top = 1
|
|
Width = 320
|
|
Height = 100
|
|
Align = alRight
|
|
ColCount = 2
|
|
DefaultColAlignment = taCenter
|
|
DefaultRowHeight = 36
|
|
FixedCols = 0
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -27
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
Options = [goFixedVertLine, goFixedHorzLine, goRangeSelect, goRowSelect, goFixedRowDefAlign]
|
|
ParentFont = False
|
|
ScrollBars = ssNone
|
|
TabOrder = 1
|
|
OnDrawCell = sgCasDrawCell
|
|
end
|
|
end
|
|
object grdStroje: TJvDBGrid
|
|
AlignWithMargins = True
|
|
Left = 638
|
|
Top = 106
|
|
Width = 899
|
|
Height = 620
|
|
Align = alClient
|
|
DataSource = dm.dsStroje
|
|
DrawingStyle = gdsGradient
|
|
GradientEndColor = clActiveCaption
|
|
GradientStartColor = 16776176
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
|
|
ParentFont = False
|
|
TabOrder = 1
|
|
TitleFont.Charset = DEFAULT_CHARSET
|
|
TitleFont.Color = clWindowText
|
|
TitleFont.Height = -16
|
|
TitleFont.Name = 'Segoe UI'
|
|
TitleFont.Style = [fsBold]
|
|
OnCellClick = grdStrojeCellClick
|
|
OnDrawColumnCell = grdStrojeDrawColumnCell
|
|
OnDblClick = grdStrojeDblClick
|
|
OnMouseUp = grdStrojeMouseUp
|
|
AutoSizeColumns = True
|
|
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 = 'fIDStroj'
|
|
Visible = False
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'fStroj'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'Stroj'
|
|
Width = 143
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'fVyrobek'
|
|
Title.Alignment = taCenter
|
|
Width = 272
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fAktPaletList'
|
|
Title.Alignment = taCenter
|
|
Width = 102
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fVyrobenoKA'
|
|
Title.Alignment = taCenter
|
|
Width = 66
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fZakazka'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'P'#345#237'kaz'
|
|
Width = 83
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fCinnost'
|
|
Title.Alignment = taCenter
|
|
Width = 120
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fCCP1'
|
|
Title.Alignment = taCenter
|
|
Width = 49
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fVZ'
|
|
Title.Alignment = taCenter
|
|
Width = 40
|
|
Visible = True
|
|
end>
|
|
end
|
|
object pgCtrlPlan: TPageControl
|
|
Left = 1
|
|
Top = 103
|
|
Width = 634
|
|
Height = 626
|
|
ActivePage = shPlanDnes
|
|
Align = alClient
|
|
TabOrder = 2
|
|
object shPlanDnes: TTabSheet
|
|
Caption = ' Pl'#225'n v'#253'roby'
|
|
OnShow = shPlanDnesShow
|
|
object grdPlanDnes: TJvDBGrid
|
|
Left = 0
|
|
Top = 0
|
|
Width = 626
|
|
Height = 594
|
|
Align = alClient
|
|
DataSource = dm.dsPlanDnes
|
|
DrawingStyle = gdsGradient
|
|
GradientEndColor = clActiveCaption
|
|
GradientStartColor = 16776176
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
TitleFont.Charset = DEFAULT_CHARSET
|
|
TitleFont.Color = clWindowText
|
|
TitleFont.Height = -16
|
|
TitleFont.Name = 'Segoe UI'
|
|
TitleFont.Style = [fsBold]
|
|
OnCellClick = grdPlanDnesCellClick
|
|
OnDrawColumnCell = grdPlanDnesDrawColumnCell
|
|
OnDblClick = grdPlanDnesDblClick
|
|
OnMouseUp = grdPlanDnesMouseUp
|
|
OnTitleClick = grdPlanDnesTitleClick
|
|
AutoSizeColumns = True
|
|
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 = 'fIDPlan'
|
|
Visible = False
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fRegCis'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'Ozn.'
|
|
Width = 103
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'fVyrobek'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'V'#253'robek'
|
|
Width = 253
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fHotovo'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'Hotovo'
|
|
Width = 74
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fZakazka'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'P'#345#237'kaz'
|
|
Width = 74
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fDatPlanZadani'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'Pl'#225'n. zah.'
|
|
Width = 101
|
|
Visible = True
|
|
end>
|
|
end
|
|
end
|
|
object shPlanZitra: TTabSheet
|
|
Caption = ' Pl'#225'n v'#253'roby Z'#205'TRA '
|
|
ImageIndex = 1
|
|
object grdPlanZitra: TDBGrid
|
|
Left = 0
|
|
Top = 0
|
|
Width = 626
|
|
Height = 594
|
|
Align = alClient
|
|
DataSource = dm.dsPlanZitra
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -19
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
Options = [dgTitles, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
TitleFont.Charset = DEFAULT_CHARSET
|
|
TitleFont.Color = clWindowText
|
|
TitleFont.Height = -16
|
|
TitleFont.Name = 'Segoe UI'
|
|
TitleFont.Style = [fsBold]
|
|
Columns = <
|
|
item
|
|
Expanded = False
|
|
FieldName = 'fIDPlan'
|
|
Visible = False
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'fVyrobek'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'V'#253'robek'
|
|
Width = 200
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fHotovo'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'Hotovo'
|
|
Width = 78
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fZakazka'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'Zak'#225'zka'
|
|
Width = 225
|
|
Visible = True
|
|
end>
|
|
end
|
|
end
|
|
object shRozpracovanePL: TTabSheet
|
|
Caption = ' Rozpracovan'#233' PL'
|
|
ImageIndex = 2
|
|
OnShow = shRozpracovanePLShow
|
|
object GridPanel13: TGridPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 626
|
|
Height = 594
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 100.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = GridPanel14
|
|
Row = 1
|
|
end
|
|
item
|
|
Column = 0
|
|
Control = grdRozpracovane
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 0
|
|
Control = GridPanel15
|
|
Row = 2
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 86.000000000000000000
|
|
end
|
|
item
|
|
Value = 9.000000000000000000
|
|
end
|
|
item
|
|
Value = 5.000000000000000000
|
|
end>
|
|
TabOrder = 0
|
|
object GridPanel14: TGridPanel
|
|
AlignWithMargins = True
|
|
Left = 4
|
|
Top = 513
|
|
Width = 618
|
|
Height = 47
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 50.000000000000000000
|
|
end
|
|
item
|
|
Value = 50.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = Label10
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 1
|
|
Control = Label11
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 0
|
|
Control = edtNazevRozpracVyrobku
|
|
Row = 1
|
|
end
|
|
item
|
|
Column = 1
|
|
Control = edtRozpracZakazka
|
|
Row = 1
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 40.000000000000000000
|
|
end
|
|
item
|
|
Value = 60.000000000000000000
|
|
end>
|
|
TabOrder = 0
|
|
DesignSize = (
|
|
618
|
|
47)
|
|
object Label10: TLabel
|
|
Left = 89
|
|
Top = 1
|
|
Width = 132
|
|
Height = 17
|
|
Anchors = []
|
|
Caption = 'Rozpracovan'#253' v'#253'robek'
|
|
ExplicitLeft = 56
|
|
end
|
|
object Label11: TLabel
|
|
Left = 417
|
|
Top = 1
|
|
Width = 92
|
|
Height = 17
|
|
Anchors = []
|
|
Caption = 'P'#345#237'kaz / zak'#225'zka'
|
|
ExplicitLeft = 488
|
|
end
|
|
object edtNazevRozpracVyrobku: TEdit
|
|
AlignWithMargins = True
|
|
Left = 4
|
|
Top = 19
|
|
Width = 302
|
|
Height = 24
|
|
Margins.Top = 0
|
|
Align = alClient
|
|
Alignment = taCenter
|
|
Color = 15790320
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
ExplicitHeight = 25
|
|
end
|
|
object edtRozpracZakazka: TEdit
|
|
AlignWithMargins = True
|
|
Left = 402
|
|
Top = 19
|
|
Width = 121
|
|
Height = 25
|
|
Margins.Top = 0
|
|
Alignment = taCenter
|
|
Anchors = []
|
|
Color = 15790320
|
|
ReadOnly = True
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object grdRozpracovane: TJvDBGrid
|
|
Left = 1
|
|
Top = 1
|
|
Width = 624
|
|
Height = 509
|
|
Align = alClient
|
|
DataSource = dm.dsRozpracPL
|
|
DrawingStyle = gdsGradient
|
|
GradientEndColor = clActiveCaption
|
|
GradientStartColor = 16776176
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
|
|
ParentFont = False
|
|
TabOrder = 1
|
|
TitleFont.Charset = DEFAULT_CHARSET
|
|
TitleFont.Color = clWindowText
|
|
TitleFont.Height = -16
|
|
TitleFont.Name = 'Segoe UI'
|
|
TitleFont.Style = [fsBold]
|
|
OnCellClick = grdRozpracovaneCellClick
|
|
OnDrawColumnCell = grdRozpracovaneDrawColumnCell
|
|
OnDblClick = grdRozpracovaneDblClick
|
|
AutoSizeColumns = True
|
|
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 = 'fIDEvidRozp'
|
|
Visible = False
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'fIDStroj'
|
|
Visible = False
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'fStroj'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'Stroj'
|
|
Width = 204
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fCisloZbozi'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'Karta'
|
|
Visible = False
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'fVyrobek'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'V'#253'robek'
|
|
Visible = False
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fSZ'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'SK'
|
|
Width = 37
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fRC'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'Reg. '#269'.'
|
|
Width = 92
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fAktPaletList'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'PL'
|
|
Width = 124
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'fDatStart'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'Start'
|
|
Width = 120
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'fColR'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'R'
|
|
Width = 25
|
|
Visible = True
|
|
end>
|
|
end
|
|
object GridPanel15: TGridPanel
|
|
Left = 1
|
|
Top = 563
|
|
Width = 624
|
|
Height = 30
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 50.000000000000000000
|
|
end
|
|
item
|
|
Value = 50.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = Label12
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 1
|
|
Control = GridPanel16
|
|
Row = 0
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 100.000000000000000000
|
|
end>
|
|
TabOrder = 2
|
|
object Label12: TLabel
|
|
AlignWithMargins = True
|
|
Left = 172
|
|
Top = 4
|
|
Width = 137
|
|
Height = 17
|
|
Align = alRight
|
|
Alignment = taRightJustify
|
|
Caption = 'Vy'#345'adit z v'#253'roby paletu:'
|
|
Visible = False
|
|
end
|
|
object GridPanel16: TGridPanel
|
|
Left = 312
|
|
Top = 1
|
|
Width = 311
|
|
Height = 28
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 50.000000000000000000
|
|
end
|
|
item
|
|
Value = 50.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = edtVyraditPaletu
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 1
|
|
Control = btnVyraditPaletuZVyroby
|
|
Row = 0
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 100.000000000000000000
|
|
end>
|
|
TabOrder = 0
|
|
DesignSize = (
|
|
311
|
|
28)
|
|
object edtVyraditPaletu: TEdit
|
|
AlignWithMargins = True
|
|
Left = 17
|
|
Top = 1
|
|
Width = 121
|
|
Height = 25
|
|
Margins.Top = 0
|
|
Alignment = taCenter
|
|
Anchors = []
|
|
Color = 15790320
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
Visible = False
|
|
end
|
|
object btnVyraditPaletuZVyroby: TButton
|
|
AlignWithMargins = True
|
|
Left = 155
|
|
Top = 1
|
|
Width = 75
|
|
Height = 25
|
|
Margins.Left = 0
|
|
Margins.Top = 0
|
|
Margins.Right = 0
|
|
Margins.Bottom = 0
|
|
Caption = 'Vy'#345'adit !'
|
|
TabOrder = 1
|
|
Visible = False
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object GridPanel3: TGridPanel
|
|
Left = 1
|
|
Top = 729
|
|
Width = 634
|
|
Height = 311
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 50.000000000000000000
|
|
end
|
|
item
|
|
Value = 50.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = btnVyrobniDenik
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 0
|
|
Control = btnObjednavkaMat
|
|
Row = 1
|
|
end
|
|
item
|
|
Column = 0
|
|
Control = btnPolotovar
|
|
Row = 2
|
|
end
|
|
item
|
|
Column = 0
|
|
Control = btnZadaniMimoPlan
|
|
Row = 3
|
|
end
|
|
item
|
|
Column = 1
|
|
Control = btnPrijemNestandard
|
|
Row = 2
|
|
RowSpan = 2
|
|
end
|
|
item
|
|
Column = 1
|
|
Control = ledtVyrobniDen
|
|
Row = 0
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 19.133540686323740000
|
|
end
|
|
item
|
|
Value = 24.819277108433730000
|
|
end
|
|
item
|
|
Value = 15.761873891060710000
|
|
end
|
|
item
|
|
Value = 15.761873891060710000
|
|
end
|
|
item
|
|
Value = 9.460908698115675000
|
|
end
|
|
item
|
|
Value = 15.062525725005430000
|
|
end>
|
|
ShowCaption = False
|
|
TabOrder = 3
|
|
object btnVyrobniDenik: TButton
|
|
AlignWithMargins = True
|
|
Left = 4
|
|
Top = 6
|
|
Width = 310
|
|
Height = 49
|
|
Margins.Top = 5
|
|
Margins.Bottom = 5
|
|
Align = alClient
|
|
Caption = 'V'#253'robn'#237' den'#237'k'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
OnClick = btnVyrobniDenikClick
|
|
end
|
|
object btnObjednavkaMat: TButton
|
|
AlignWithMargins = True
|
|
Left = 4
|
|
Top = 65
|
|
Width = 310
|
|
Height = 67
|
|
Hint = 'Stavy sklad'#367' materi'#225'l'#367
|
|
Margins.Top = 5
|
|
Margins.Bottom = 5
|
|
Align = alClient
|
|
Caption = 'Z'#225'soba materi'#225'lu /'#13#10'Objedn'#225'vky materi'#225'lu'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 1
|
|
WordWrap = True
|
|
OnClick = btnObjednavkaMatClick
|
|
end
|
|
object btnPolotovar: TButton
|
|
AlignWithMargins = True
|
|
Left = 4
|
|
Top = 142
|
|
Width = 310
|
|
Height = 39
|
|
Margins.Top = 5
|
|
Margins.Bottom = 5
|
|
Align = alClient
|
|
Caption = 'Polotovar / P'#345'edv'#253'roba'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 2
|
|
OnClick = btnPolotovarClick
|
|
end
|
|
object btnZadaniMimoPlan: TButton
|
|
AlignWithMargins = True
|
|
Left = 4
|
|
Top = 191
|
|
Width = 310
|
|
Height = 38
|
|
Hint = 'V'#253'b'#283'r v'#253'robku z Norem mimo pl'#225'n'
|
|
Margins.Top = 5
|
|
Margins.Bottom = 5
|
|
Align = alClient
|
|
Caption = 'Zad'#225'n'#237' v'#253'roby mimo pl'#225'n'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 3
|
|
OnClick = btnZadaniMimoPlanClick
|
|
end
|
|
object btnPrijemNestandard: TButton
|
|
AlignWithMargins = True
|
|
Left = 332
|
|
Top = 142
|
|
Width = 291
|
|
Height = 87
|
|
Hint = 'Z'#225'pis nove vyroben'#233' palety a tisk PL'
|
|
Margins.Left = 15
|
|
Margins.Top = 5
|
|
Margins.Right = 10
|
|
Margins.Bottom = 5
|
|
Align = alClient
|
|
Caption = 'P'#345#237'jem -'#13#10'Nestandardn'#237' v'#253'robek'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 4
|
|
WordWrap = True
|
|
OnClick = btnPrijemNestandardClick
|
|
end
|
|
object ledtVyrobniDen: TRzDateTimePicker
|
|
AlignWithMargins = True
|
|
Left = 347
|
|
Top = 16
|
|
Width = 104
|
|
Height = 29
|
|
Margins.Left = 30
|
|
Margins.Top = 15
|
|
Date = 45159.000000000000000000
|
|
Format = ''
|
|
Time = 45159.000000000000000000
|
|
Color = 13696710
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
MinDate = 45139.000000000000000000
|
|
ParentFont = False
|
|
TabOrder = 5
|
|
OnChange = ledtVyrobniDenChange
|
|
ShowToday = True
|
|
ShowTodayCircle = True
|
|
ShowWeekNumbers = True
|
|
end
|
|
end
|
|
object GridPanel5: TGridPanel
|
|
Left = 1540
|
|
Top = 729
|
|
Width = 272
|
|
Height = 311
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 100.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = btnSpravaVzorku
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 0
|
|
Control = btnMicharna
|
|
Row = 1
|
|
end
|
|
item
|
|
Column = 0
|
|
Control = btnNahledTisky
|
|
Row = 2
|
|
end
|
|
item
|
|
Column = 0
|
|
Control = btnAktualniSarze
|
|
Row = 3
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 25.000000000000000000
|
|
end
|
|
item
|
|
Value = 25.000000000000000000
|
|
end
|
|
item
|
|
Value = 25.000000000000000000
|
|
end
|
|
item
|
|
Value = 25.000000000000000000
|
|
end>
|
|
ShowCaption = False
|
|
TabOrder = 4
|
|
object btnSpravaVzorku: TButton
|
|
AlignWithMargins = True
|
|
Left = 4
|
|
Top = 4
|
|
Width = 262
|
|
Height = 69
|
|
Margins.Right = 5
|
|
Margins.Bottom = 5
|
|
Align = alClient
|
|
Caption = 'Spr'#225'va vzork'#367
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
OnClick = btnSpravaVzorkuClick
|
|
end
|
|
object btnMicharna: TButton
|
|
AlignWithMargins = True
|
|
Left = 4
|
|
Top = 81
|
|
Width = 262
|
|
Height = 70
|
|
Margins.Right = 5
|
|
Margins.Bottom = 5
|
|
Align = alClient
|
|
Caption = 'M'#237'ch'#225'rna'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 1
|
|
OnClick = btnMicharnaClick
|
|
end
|
|
object btnNahledTisky: TButton
|
|
AlignWithMargins = True
|
|
Left = 4
|
|
Top = 159
|
|
Width = 262
|
|
Height = 69
|
|
Margins.Right = 5
|
|
Margins.Bottom = 5
|
|
Align = alClient
|
|
Caption = 'N'#225'hled / Tisky'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 2
|
|
OnClick = btnNahledTiskyClick
|
|
end
|
|
object btnAktualniSarze: TButton
|
|
AlignWithMargins = True
|
|
Left = 4
|
|
Top = 236
|
|
Width = 262
|
|
Height = 69
|
|
Hint = 'Zobrazen'#237' '#353'ar'#382'e podle vybran'#233'ho dne a sm'#283'ny'
|
|
Margins.Right = 5
|
|
Margins.Bottom = 5
|
|
Align = alClient
|
|
Caption = 'Aktu'#225'ln'#237' '#353'ar'#382'e'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 3
|
|
OnClick = btnAktualniSarzeClick
|
|
end
|
|
end
|
|
object GridPanel6: TGridPanel
|
|
Left = 1540
|
|
Top = 1
|
|
Width = 272
|
|
Height = 102
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 100.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = Label1
|
|
Row = 0
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 50.000000000000000000
|
|
end
|
|
item
|
|
Value = 50.000000000000000000
|
|
end>
|
|
ShowCaption = False
|
|
TabOrder = 5
|
|
object Label1: TLabel
|
|
Left = 1
|
|
Top = 30
|
|
Width = 210
|
|
Height = 21
|
|
Align = alBottom
|
|
Alignment = taCenter
|
|
Anchors = []
|
|
Caption = 'Pozn'#225'mky k v'#253'robn'#237'mu dni'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
end
|
|
end
|
|
object memVyrobniPoznamka: TMemo
|
|
AlignWithMargins = True
|
|
Left = 1550
|
|
Top = 113
|
|
Width = 252
|
|
Height = 606
|
|
Margins.Left = 10
|
|
Margins.Top = 10
|
|
Margins.Right = 10
|
|
Margins.Bottom = 10
|
|
Align = alClient
|
|
TabOrder = 6
|
|
OnExit = memVyrobniPoznamkaExit
|
|
end
|
|
object GridPanel4: TGridPanel
|
|
AlignWithMargins = True
|
|
Left = 655
|
|
Top = 734
|
|
Width = 865
|
|
Height = 301
|
|
Margins.Left = 20
|
|
Margins.Top = 5
|
|
Margins.Right = 20
|
|
Margins.Bottom = 5
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 50.000000000000000000
|
|
end
|
|
item
|
|
Value = 50.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
ColumnSpan = 2
|
|
Control = GridPanel7
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 0
|
|
ColumnSpan = 2
|
|
Control = GridPanel8
|
|
Row = 1
|
|
end
|
|
item
|
|
Column = 0
|
|
ColumnSpan = 2
|
|
Control = GridPanel9
|
|
Row = 2
|
|
end
|
|
item
|
|
Column = 0
|
|
ColumnSpan = 2
|
|
Control = GridPanel10
|
|
Row = 3
|
|
end>
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
RowCollection = <
|
|
item
|
|
Value = 22.186981661669770000
|
|
end
|
|
item
|
|
Value = 21.383721539607240000
|
|
end
|
|
item
|
|
Value = 28.496430623143980000
|
|
end
|
|
item
|
|
Value = 27.932866175579010000
|
|
end>
|
|
ShowCaption = False
|
|
TabOrder = 7
|
|
object GridPanel7: TGridPanel
|
|
AlignWithMargins = True
|
|
Left = 4
|
|
Top = 4
|
|
Width = 857
|
|
Height = 60
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 32.502894206268340000
|
|
end
|
|
item
|
|
Value = 17.259036823528500000
|
|
end
|
|
item
|
|
Value = 25.170323403450180000
|
|
end
|
|
item
|
|
Value = 25.067745566752980000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = edtVybranyStroj
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 1
|
|
Control = edtMistr
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 2
|
|
Control = btnKontrolaPeceni
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 3
|
|
Control = btnNovyVzorek
|
|
Row = 0
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 100.000000000000000000
|
|
end>
|
|
ShowCaption = False
|
|
TabOrder = 0
|
|
object edtVybranyStroj: TLabeledEdit
|
|
AlignWithMargins = True
|
|
Left = 4
|
|
Top = 30
|
|
Width = 265
|
|
Height = 29
|
|
Margins.Right = 10
|
|
Margins.Bottom = 0
|
|
Align = alBottom
|
|
Alignment = taCenter
|
|
EditLabel.Width = 93
|
|
EditLabel.Height = 21
|
|
EditLabel.Caption = 'Vybran'#253' stroj'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
Text = ''
|
|
end
|
|
object edtMistr: TLabeledEdit
|
|
Left = 279
|
|
Top = 30
|
|
Width = 147
|
|
Height = 29
|
|
Margins.Bottom = 0
|
|
Align = alBottom
|
|
Alignment = taCenter
|
|
EditLabel.Width = 36
|
|
EditLabel.Height = 21
|
|
EditLabel.Caption = 'Mistr'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
ReadOnly = True
|
|
TabOrder = 1
|
|
Text = ''
|
|
OnClick = edtMistrClick
|
|
end
|
|
object btnKontrolaPeceni: TButton
|
|
AlignWithMargins = True
|
|
Left = 441
|
|
Top = 4
|
|
Width = 186
|
|
Height = 55
|
|
Margins.Left = 15
|
|
Margins.Right = 15
|
|
Margins.Bottom = 0
|
|
Align = alClient
|
|
Caption = 'Kontrola pe'#269'en'#237' - CCP 1'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 2
|
|
OnClick = btnKontrolaPeceniClick
|
|
end
|
|
object btnNovyVzorek: TButton
|
|
AlignWithMargins = True
|
|
Left = 662
|
|
Top = 4
|
|
Width = 174
|
|
Height = 52
|
|
Margins.Left = 20
|
|
Margins.Right = 20
|
|
Align = alClient
|
|
Caption = 'Nov'#253' vzorek'
|
|
TabOrder = 3
|
|
OnClick = btnNovyVzorekClick
|
|
end
|
|
end
|
|
object GridPanel8: TGridPanel
|
|
AlignWithMargins = True
|
|
Left = 4
|
|
Top = 70
|
|
Width = 857
|
|
Height = 58
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 50.000000000000000000
|
|
end
|
|
item
|
|
Value = 50.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = Label2
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 0
|
|
ColumnSpan = 2
|
|
Control = edtAktVyrobek
|
|
Row = 1
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 50.000000000000000000
|
|
end
|
|
item
|
|
Value = 50.000000000000000000
|
|
end>
|
|
ShowCaption = False
|
|
TabOrder = 1
|
|
DesignSize = (
|
|
857
|
|
58)
|
|
object Label2: TLabel
|
|
Left = 156
|
|
Top = 4
|
|
Width = 117
|
|
Height = 21
|
|
Anchors = []
|
|
Caption = 'Aktu'#225'ln'#237' v'#253'robek'
|
|
ExplicitLeft = 400
|
|
ExplicitTop = 3
|
|
end
|
|
object edtAktVyrobek: TEdit
|
|
Left = 1
|
|
Top = 29
|
|
Width = 855
|
|
Height = 28
|
|
TabStop = False
|
|
Align = alClient
|
|
AutoSize = False
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
end
|
|
end
|
|
object GridPanel9: TGridPanel
|
|
AlignWithMargins = True
|
|
Left = 4
|
|
Top = 131
|
|
Width = 857
|
|
Height = 82
|
|
Margins.Top = 0
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 25.000000000000000000
|
|
end
|
|
item
|
|
Value = 25.000000000000000000
|
|
end
|
|
item
|
|
Value = 25.000000000000000000
|
|
end
|
|
item
|
|
Value = 25.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = btnZahajeniVyrobyPalety
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 3
|
|
Control = btnUkonceniVyrobyPalety
|
|
Row = 0
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 100.000000000000000000
|
|
end>
|
|
ShowCaption = False
|
|
TabOrder = 2
|
|
object btnZahajeniVyrobyPalety: TButton
|
|
AlignWithMargins = True
|
|
Left = 4
|
|
Top = 1
|
|
Width = 208
|
|
Height = 77
|
|
Margins.Top = 0
|
|
Align = alClient
|
|
Caption = 'Zah'#225'jen'#237' v'#253'roby palety'#13#10' Tisk KA '#353't'#237'tk'#367
|
|
TabOrder = 0
|
|
OnClick = btnZahajeniVyrobyPaletyClick
|
|
end
|
|
object btnUkonceniVyrobyPalety: TButton
|
|
AlignWithMargins = True
|
|
Left = 645
|
|
Top = 1
|
|
Width = 208
|
|
Height = 77
|
|
Margins.Top = 0
|
|
Align = alClient
|
|
Caption = 'Ukon'#269'en'#237' v'#253'roby palety'#13#10' Tisk PL'
|
|
TabOrder = 1
|
|
OnClick = btnUkonceniVyrobyPaletyClick
|
|
end
|
|
end
|
|
object GridPanel10: TGridPanel
|
|
AlignWithMargins = True
|
|
Left = 4
|
|
Top = 219
|
|
Width = 857
|
|
Height = 78
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 50.000000000000000000
|
|
end
|
|
item
|
|
Value = 50.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
ColumnSpan = 2
|
|
Control = GridPanel11
|
|
Row = 0
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 100.000000000000000000
|
|
end>
|
|
ShowCaption = False
|
|
TabOrder = 3
|
|
object GridPanel11: TGridPanel
|
|
Left = 1
|
|
Top = 1
|
|
Width = 855
|
|
Height = 76
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 39.936102236421720000
|
|
end
|
|
item
|
|
Value = 39.936102236421720000
|
|
end
|
|
item
|
|
Value = 20.127795527156560000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = Label3
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 1
|
|
Control = Label4
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 0
|
|
ColumnSpan = 2
|
|
Control = GridPanel12
|
|
Row = 1
|
|
RowSpan = 2
|
|
end
|
|
item
|
|
Column = 2
|
|
Control = btnOdpadOprava
|
|
Row = 0
|
|
RowSpan = 3
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 29.166860144418410000
|
|
end
|
|
item
|
|
Value = 31.111317487379640000
|
|
end
|
|
item
|
|
Value = 39.721822368201950000
|
|
end>
|
|
TabOrder = 0
|
|
DesignSize = (
|
|
855
|
|
76)
|
|
object Label3: TLabel
|
|
Left = 145
|
|
Top = 1
|
|
Width = 52
|
|
Height = 21
|
|
Anchors = []
|
|
Caption = 'ODPAD'
|
|
ExplicitLeft = 207
|
|
end
|
|
object Label4: TLabel
|
|
Left = 428
|
|
Top = 1
|
|
Width = 168
|
|
Height = 21
|
|
Anchors = []
|
|
Caption = 'Celkem za sm'#283'na a stroj'
|
|
ExplicitLeft = 598
|
|
end
|
|
object GridPanel12: TGridPanel
|
|
Left = 1
|
|
Top = 23
|
|
Width = 681
|
|
Height = 52
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 26.940100590979010000
|
|
end
|
|
item
|
|
Value = 8.034595154060268000
|
|
end
|
|
item
|
|
Value = 8.183249348806479000
|
|
end
|
|
item
|
|
Value = 51.593367729635760000
|
|
end
|
|
item
|
|
Value = 5.248687176518490000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = Label5
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 1
|
|
Control = Label6
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 2
|
|
Control = Label7
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 3
|
|
Control = Label8
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 4
|
|
Control = Label9
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 0
|
|
Control = edtOdpadStroj
|
|
Row = 1
|
|
end
|
|
item
|
|
Column = 1
|
|
Control = edtOdpadMokry
|
|
Row = 1
|
|
end
|
|
item
|
|
Column = 2
|
|
Control = edtOdpadSuchy
|
|
Row = 1
|
|
end
|
|
item
|
|
Column = 3
|
|
Control = edtOdpadPoznamka
|
|
Row = 1
|
|
end
|
|
item
|
|
Column = 4
|
|
Control = edtOdpadSmena
|
|
Row = 1
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 50.000000000000000000
|
|
end
|
|
item
|
|
Value = 50.000000000000000000
|
|
end>
|
|
TabOrder = 0
|
|
DesignSize = (
|
|
681
|
|
52)
|
|
object Label5: TLabel
|
|
Left = 76
|
|
Top = 3
|
|
Width = 32
|
|
Height = 21
|
|
Anchors = []
|
|
Caption = 'Stroj'
|
|
ExplicitLeft = 59
|
|
end
|
|
object Label6: TLabel
|
|
Left = 188
|
|
Top = 3
|
|
Width = 45
|
|
Height = 21
|
|
Anchors = []
|
|
Caption = 'Mokr'#253
|
|
ExplicitLeft = 199
|
|
end
|
|
object Label7: TLabel
|
|
Left = 245
|
|
Top = 3
|
|
Width = 42
|
|
Height = 21
|
|
Anchors = []
|
|
Caption = 'Such'#253
|
|
ExplicitLeft = 345
|
|
end
|
|
object Label8: TLabel
|
|
Left = 433
|
|
Top = 3
|
|
Width = 71
|
|
Height = 21
|
|
Anchors = []
|
|
Caption = 'Pozn'#225'mka'
|
|
ExplicitLeft = 475
|
|
end
|
|
object Label9: TLabel
|
|
Left = 649
|
|
Top = 3
|
|
Width = 26
|
|
Height = 21
|
|
Anchors = []
|
|
Caption = 'Sm.'
|
|
ExplicitLeft = 670
|
|
end
|
|
object edtOdpadStroj: TEdit
|
|
Left = 1
|
|
Top = 26
|
|
Width = 183
|
|
Height = 25
|
|
Align = alClient
|
|
Alignment = taCenter
|
|
Color = 15790320
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
ExplicitHeight = 29
|
|
end
|
|
object edtOdpadMokry: TNumberBox
|
|
Left = 184
|
|
Top = 26
|
|
Width = 54
|
|
Height = 25
|
|
Align = alClient
|
|
Alignment = taRightJustify
|
|
Mode = nbmFloat
|
|
TabOrder = 1
|
|
OnExit = edtOdpadMokryExit
|
|
ExplicitHeight = 29
|
|
end
|
|
object edtOdpadSuchy: TNumberBox
|
|
Left = 238
|
|
Top = 26
|
|
Width = 56
|
|
Height = 25
|
|
Align = alClient
|
|
Alignment = taRightJustify
|
|
Mode = nbmFloat
|
|
TabOrder = 2
|
|
OnExit = edtOdpadSuchyExit
|
|
ExplicitHeight = 29
|
|
end
|
|
object edtOdpadPoznamka: TEdit
|
|
AlignWithMargins = True
|
|
Left = 297
|
|
Top = 26
|
|
Width = 344
|
|
Height = 25
|
|
Margins.Top = 0
|
|
Margins.Bottom = 0
|
|
Align = alClient
|
|
Alignment = taCenter
|
|
TabOrder = 3
|
|
OnExit = edtOdpadPoznamkaExit
|
|
ExplicitHeight = 29
|
|
end
|
|
object edtOdpadSmena: TEdit
|
|
Left = 644
|
|
Top = 26
|
|
Width = 36
|
|
Height = 25
|
|
Align = alClient
|
|
Alignment = taCenter
|
|
Color = 15790320
|
|
ReadOnly = True
|
|
TabOrder = 4
|
|
ExplicitHeight = 29
|
|
end
|
|
end
|
|
object btnOdpadOprava: TButton
|
|
Left = 703
|
|
Top = 12
|
|
Width = 130
|
|
Height = 51
|
|
Anchors = []
|
|
Caption = 'Oprava'
|
|
TabOrder = 1
|
|
OnClick = btnOdpadOpravaClick
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object infoTimer: TTimer
|
|
Interval = 999
|
|
OnTimer = infoTimerTimer
|
|
Left = 623
|
|
Top = 23
|
|
end
|
|
object timerPrehled: TTimer
|
|
Interval = 20000
|
|
OnTimer = timerPrehledTimer
|
|
Left = 864
|
|
Top = 21
|
|
end
|
|
end
|