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

480 lines
10 KiB
Plaintext

object formPrijemNestandard: TformPrijemNestandard
Left = 0
Top = 0
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = ' P'#345#237'jem NESTANDARD'
ClientHeight = 749
ClientWidth = 625
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 grdPrijemNestandard: TDBGrid
Left = 8
Top = 44
Width = 605
Height = 219
DataSource = dm.dsPrijemNestandard
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, dgColumnResize, 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 = grdPrijemNestandardCellClick
OnDrawColumnCell = grdPrijemNestandardDrawColumnCell
Columns = <
item
Expanded = False
FieldName = 'fID'
Visible = False
end
item
Expanded = False
FieldName = 'fCislo'
Visible = False
end
item
Alignment = taCenter
Expanded = False
FieldName = 'fSZ'
Title.Alignment = taCenter
Width = 34
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'fRegCis'
Title.Alignment = taCenter
Width = 120
Visible = True
end
item
Expanded = False
FieldName = 'fNazev1'
Width = 364
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'fMJ'
Title.Alignment = taCenter
Width = 50
Visible = True
end>
end
object Panel1: TPanel
Left = 23
Top = 274
Width = 580
Height = 131
TabOrder = 1
object Label1: TLabel
Left = 21
Top = 8
Width = 95
Height = 21
Caption = #268#237'slo v'#253'robku'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 266
Top = 36
Width = 43
Height = 21
Caption = 'N'#225'zev'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 21
Top = 96
Width = 32
Height = 21
Caption = 'Stroj'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
end
object edtSZ: TEdit
Left = 156
Top = 5
Width = 51
Height = 29
Alignment = taCenter
AutoSize = False
Color = 15790320
MaxLength = 3
ReadOnly = True
TabOrder = 0
end
object edtRegCis: TEdit
Left = 213
Top = 5
Width = 104
Height = 29
Alignment = taCenter
AutoSize = False
Color = 15790320
MaxLength = 30
ReadOnly = True
TabOrder = 1
end
object edtNazev1: TEdit
Left = 6
Top = 57
Width = 565
Height = 33
Alignment = taCenter
AutoSize = False
Color = 15790320
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
MaxLength = 100
ParentFont = False
ReadOnly = True
TabOrder = 2
end
object edtStroj: TEdit
Left = 156
Top = 96
Width = 261
Height = 29
Alignment = taCenter
AutoSize = False
Color = 15790320
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
MaxLength = 3
ParentFont = False
ReadOnly = True
TabOrder = 3
end
end
object Panel2: TPanel
Left = 23
Top = 411
Width = 580
Height = 118
TabOrder = 2
object Label4: TLabel
Left = 23
Top = 10
Width = 44
Height = 21
Caption = 'Paleta:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 23
Top = 57
Width = 102
Height = 21
Caption = 'Datum v'#253'roby:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 23
Top = 88
Width = 115
Height = 21
Caption = 'Datum spot'#345'eby:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 291
Top = 57
Width = 51
Height = 21
Caption = 'Sm'#283'na:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 291
Top = 88
Width = 41
Height = 21
Caption = #352'ar'#382'e:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
end
object edtPaletList: TEdit
Left = 83
Top = 7
Width = 118
Height = 29
Alignment = taCenter
AutoSize = False
Color = 15790320
MaxLength = 30
ReadOnly = True
TabOrder = 0
end
object btnVyberPL: TButton
Left = 216
Top = 4
Width = 173
Height = 35
Caption = 'Vybrat paletov'#253' list'
TabOrder = 1
OnClick = btnVyberPLClick
end
object edtDatVyroba: TRzDateTimePicker
Left = 147
Top = 53
Width = 104
Height = 29
Date = 45234.000000000000000000
Format = ''
Time = 0.454477361112367400
Enabled = False
TabOrder = 2
TabStop = False
end
object edtDatSpotreba: TRzDateTimePicker
Left = 147
Top = 85
Width = 104
Height = 29
Date = 45234.000000000000000000
Format = ''
Time = 0.454504768516926600
Enabled = False
TabOrder = 3
TabStop = False
OnChange = edtDatSpotrebaChange
end
object edtSarze: TEdit
Left = 353
Top = 85
Width = 104
Height = 29
Alignment = taCenter
AutoSize = False
Color = 15790320
MaxLength = 30
ReadOnly = True
TabOrder = 4
end
object edtSmena: TEdit
Left = 353
Top = 53
Width = 42
Height = 29
Alignment = taCenter
AutoSize = False
Color = 15790320
MaxLength = 1
ReadOnly = True
TabOrder = 5
end
end
object Panel3: TPanel
Left = 95
Top = 538
Width = 382
Height = 134
TabOrder = 3
object Label9: TLabel
Left = 23
Top = 20
Width = 17
Height = 21
Caption = 'kg'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 144
Top = 20
Width = 106
Height = 21
Caption = 'Paletov'#253' list na:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
end
object edtKA: TNumberBox
Left = 53
Top = 17
Width = 60
Height = 29
Alignment = taCenter
AutoSize = False
MaxLength = 3
TabOrder = 0
OnChangeValue = edtKAChangeValue
OnExit = edtKAExit
end
object btnPLTisk: TButton
Left = 236
Top = 68
Width = 100
Height = 35
Caption = 'Tisk'
TabOrder = 1
end
object rgPocetKopii: TRadioGroup
Left = 23
Top = 53
Width = 185
Height = 53
Caption = 'Po'#269'et kopi'#237
TabOrder = 2
end
object rb1Kopie: TRadioButton
Left = 36
Top = 78
Width = 39
Height = 17
Caption = '1'
TabOrder = 4
end
object rb2Kopie: TRadioButton
Left = 110
Top = 78
Width = 39
Height = 17
Caption = '2'
TabOrder = 5
end
object cbTiskNaObraz: TCheckBox
Left = 265
Top = 23
Width = 97
Height = 17
Caption = 'obrazovku'
TabOrder = 3
OnClick = cbTiskNaObrazClick
end
end
object btnZapisPaletyNestandard: TButton
Left = 187
Top = 688
Width = 231
Height = 45
Caption = 'Z'#225'pis nov'#283' vyroben'#233' palety'
Enabled = False
TabOrder = 4
OnClick = btnZapisPaletyNestandardClick
end
object Panel4: TPanel
Left = 8
Top = 9
Width = 605
Height = 34
TabOrder = 5
object edtFiltrRegCis: TEdit
Left = 50
Top = 3
Width = 121
Height = 29
MaxLength = 30
TabOrder = 1
OnChange = edtFiltrRegCisChange
end
object btnFiltrClear: TButton
Left = -3
Top = 2
Width = 20
Height = 31
Caption = 'X'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
TabOrder = 2
TabStop = False
OnClick = btnFiltrClearClick
end
object edtFiltrSZ: TEdit
Left = 15
Top = 3
Width = 35
Height = 29
Alignment = taCenter
MaxLength = 3
TabOrder = 0
OnChange = edtFiltrSZChange
end
object edtFiltrNazev1: TEdit
Left = 171
Top = 3
Width = 364
Height = 29
MaxLength = 100
TabOrder = 3
OnChange = edtFiltrNazev1Change
end
end
end