Files
Rootvin-pluginHDCRTN/frmPrehledMicharna.dfm
2025-05-21 21:06:33 +02:00

465 lines
11 KiB
Plaintext

object formPrehledMicharna: TformPrehledMicharna
Left = 0
Top = 0
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = ' P'#345'ehled m'#237'ch'#225'rna'
ClientHeight = 809
ClientWidth = 862
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 = 862
Height = 809
Align = alClient
ColumnCollection = <
item
Value = 100.000000000000000000
end>
ControlCollection = <
item
Column = 0
Control = Button1
Row = 0
end
item
Column = 0
Control = GridPanel2
Row = 1
end
item
Column = 0
Control = grdSeznamTesta
Row = 2
end
item
Column = 0
Control = grdReceptura
Row = 3
end
item
Column = 0
Control = edtSuchaHmot
Row = 4
end>
RowCollection = <
item
Value = 6.000000000000000000
end
item
Value = 10.000000000000000000
end
item
Value = 44.000000000000000000
end
item
Value = 31.000000000000000000
end
item
Value = 4.000000000000000000
end
item
Value = 5.000000000000000000
end>
TabOrder = 0
DesignSize = (
862
809)
object Button1: TButton
Left = 344
Top = 7
Width = 174
Height = 36
Anchors = []
Caption = 'Sb'#283'rn'#253' list m'#237'ch'#225'rna'
TabOrder = 0
end
object GridPanel2: TGridPanel
Left = 1
Top = 49
Width = 860
Height = 81
Align = alClient
ColumnCollection = <
item
Value = 1.500000000000000000
end
item
Value = 23.000000000000000000
end
item
Value = 27.900000000000000000
end
item
Value = 18.000000000000000000
end
item
Value = 18.000000000000000000
end
item
Value = 4.800000000000000000
end
item
Value = 4.700000000000000000
end
item
Value = 2.099999999999996000
end>
ControlCollection = <
item
Column = 5
Control = Label3
Row = 0
end
item
Column = 6
Control = Label1
Row = 0
end
item
Column = 1
Control = edtStroj
Row = 0
end
item
Column = 2
Control = edtTesto
Row = 0
end
item
Column = 4
Control = GridPanel3
Row = 0
end
item
Column = 0
Control = Label4
Row = 0
end>
RowCollection = <
item
Value = 100.000000000000000000
end>
TabOrder = 1
DesignSize = (
860
81)
object Label3: TLabel
Left = 771
Top = 15
Width = 18
Height = 50
Anchors = []
Caption = 'Viskozita'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Orientation = 2700
Font.Style = [fsBold]
ParentFont = False
Layout = tlCenter
ExplicitLeft = 772
ExplicitTop = 8
end
object Label1: TLabel
Left = 812
Top = 10
Width = 18
Height = 60
Anchors = []
Caption = 'Viskozita 2'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Orientation = 2700
Font.Style = [fsBold]
ParentFont = False
Layout = tlCenter
ExplicitLeft = 811
ExplicitTop = 1
end
object edtStroj: TEdit
AlignWithMargins = True
Left = 17
Top = 48
Width = 191
Height = 29
Align = alBottom
MaxLength = 100
TabOrder = 0
OnChange = edtStrojChange
end
object edtTesto: TEdit
AlignWithMargins = True
Left = 214
Top = 48
Width = 234
Height = 29
Align = alBottom
MaxLength = 100
TabOrder = 1
OnChange = edtTestoChange
end
object GridPanel3: TGridPanel
Left = 605
Top = 1
Width = 154
Height = 79
Align = alClient
ColumnCollection = <
item
Value = 88.027489785109650000
end
item
Value = 11.972510214890350000
end>
ControlCollection = <
item
Column = 0
Control = edtDatVypousteni
Row = 0
end
item
Column = 1
Control = Label2
Row = 0
end>
RowCollection = <
item
Value = 100.000000000000000000
end>
TabOrder = 2
object edtDatVypousteni: TJvDatePickerEdit
AlignWithMargins = True
Left = 21
Top = 46
Width = 112
Height = 29
Margins.Left = 20
Margins.Right = 2
Align = alBottom
AllowNoDate = True
Anchors = []
Checked = False
TabOrder = 0
OnChange = edtDatVypousteniChange
end
object Label2: TLabel
AlignWithMargins = True
Left = 138
Top = 52
Width = 12
Height = 21
Margins.Bottom = 5
Align = alBottom
Caption = 'X'
OnClick = Label2Click
ExplicitWidth = 9
end
end
object Label4: TLabel
AlignWithMargins = True
Left = 1
Top = 54
Width = 10
Height = 21
Margins.Left = 0
Margins.Bottom = 5
Align = alBottom
Caption = 'X'
OnClick = Label4Click
ExplicitWidth = 9
end
end
object grdSeznamTesta: TJvDBGrid
Left = 1
Top = 130
Width = 860
Height = 355
Align = alClient
DataSource = dm.dsPrehledMicharna
DrawingStyle = gdsGradient
GradientEndColor = clActiveCaption
GradientStartColor = 16776176
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -16
TitleFont.Name = 'Segoe UI'
TitleFont.Style = []
OnCellClick = grdSeznamTestaCellClick
OnDrawColumnCell = grdSeznamTestaDrawColumnCell
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 = 'colIDPrikaz'
Visible = False
end
item
Expanded = False
FieldName = 'colIDStroj'
Visible = False
end
item
Expanded = False
FieldName = 'colStroj'
Title.Caption = 'Stroj'
Width = 195
Visible = True
end
item
Expanded = False
FieldName = 'colTesto'
Title.Caption = 'T'#283'sto'
Width = 238
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'colStartMichani'
Title.Alignment = taCenter
Title.Caption = 'P'#345#237'prava t'#283'sta'
Width = 154
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'colKonecMichani'
Title.Alignment = taCenter
Title.Caption = 'Vypou'#353't'#283'n'#237
Width = 154
Visible = True
end
item
Expanded = False
FieldName = 'colViskozita'
Title.Caption = ' '
Width = 40
Visible = True
end
item
Expanded = False
FieldName = 'colViskozita2'
Title.Caption = ' '
Width = 40
Visible = True
end
item
Expanded = False
FieldName = 'colIDPMZ'
Visible = False
end
item
Expanded = False
FieldName = 'colIDOperStartStop'
Visible = False
end>
end
object grdReceptura: TJvDBGrid
Left = 1
Top = 485
Width = 860
Height = 250
Align = alClient
DataSource = dm.dsDetailMicharna
DrawingStyle = gdsGradient
GradientEndColor = clActiveCaption
GradientStartColor = 16776176
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
TabOrder = 3
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -16
TitleFont.Name = 'Segoe UI'
TitleFont.Style = []
OnDrawColumnCell = grdRecepturaDrawColumnCell
SelectColumnsDialogStrings.Caption = 'Select columns'
SelectColumnsDialogStrings.OK = '&OK'
SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!'
EditControls = <>
RowsHeight = 25
TitleRowHeight = 25
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'colSZ'
Title.Alignment = taCenter
Title.Caption = 'SZ'
Visible = False
end
item
Alignment = taCenter
Expanded = False
FieldName = 'colRC'
Title.Alignment = taCenter
Title.Caption = 'Reg. '#269#237'slo'
Visible = False
end
item
Expanded = False
FieldName = 'colNazev1'
Title.Alignment = taCenter
Title.Caption = 'Surovina'
Width = 653
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'colMnozstvi'
Title.Alignment = taCenter
Title.Caption = 'Mno'#382'stv'#237
Width = 85
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'colPridano'
Title.Alignment = taCenter
Title.Caption = 'P'#345'id'#225'no'
Width = 85
Visible = True
end>
end
object edtSuchaHmot: TLabeledEdit
Left = 740
Top = 735
Width = 121
Height = 33
Align = alRight
Alignment = taCenter
Color = 15790320
EditLabel.Width = 128
EditLabel.Height = 33
EditLabel.Caption = 'Such'#225' hmotnost: '
LabelPosition = lpLeft
ReadOnly = True
TabOrder = 4
Text = ''
ExplicitHeight = 29
end
end
end