Prvni verze

frmPrijemNestandard.dfm

@@ -0,0 +1,479 @@
+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