Prvni verze
This commit is contained in:
586
frmZahajeniPalety.dfm
Normal file
586
frmZahajeniPalety.dfm
Normal file
@ -0,0 +1,586 @@
|
||||
object formZahajeniPalety: TformZahajeniPalety
|
||||
Left = 0
|
||||
Top = 0
|
||||
BorderStyle = bsDialog
|
||||
Caption = ' Zah'#225'jen'#237' v'#253'roby palety'
|
||||
ClientHeight = 800
|
||||
ClientWidth = 539
|
||||
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 Panel1: TPanel
|
||||
Left = 8
|
||||
Top = 8
|
||||
Width = 523
|
||||
Height = 205
|
||||
TabOrder = 0
|
||||
object lblWarnStitekPL: TLabel
|
||||
Left = 285
|
||||
Top = 92
|
||||
Width = 187
|
||||
Height = 42
|
||||
Alignment = taCenter
|
||||
Caption = 'Nebyl nalezen tiskopis pro Paletov'#253' list !'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clRed
|
||||
Font.Height = -16
|
||||
Font.Name = 'Segoe UI'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
WordWrap = True
|
||||
end
|
||||
object edtZakazka: TLabeledEdit
|
||||
Left = 122
|
||||
Top = 6
|
||||
Width = 121
|
||||
Height = 29
|
||||
TabStop = False
|
||||
Color = 15790320
|
||||
EditLabel.Width = 57
|
||||
EditLabel.Height = 29
|
||||
EditLabel.Caption = 'P'#345#237'kaz: '
|
||||
LabelPosition = lpLeft
|
||||
ReadOnly = True
|
||||
TabOrder = 0
|
||||
Text = ''
|
||||
end
|
||||
object edtPL: TLabeledEdit
|
||||
Left = 122
|
||||
Top = 45
|
||||
Width = 121
|
||||
Height = 29
|
||||
TabStop = False
|
||||
Color = 15790320
|
||||
EditLabel.Width = 97
|
||||
EditLabel.Height = 29
|
||||
EditLabel.Caption = 'Paletov'#253' list: '
|
||||
LabelPosition = lpLeft
|
||||
ReadOnly = True
|
||||
TabOrder = 1
|
||||
Text = ''
|
||||
end
|
||||
object edtSarze: TLabeledEdit
|
||||
Left = 122
|
||||
Top = 84
|
||||
Width = 121
|
||||
Height = 29
|
||||
TabStop = False
|
||||
Color = 15790320
|
||||
EditLabel.Width = 53
|
||||
EditLabel.Height = 29
|
||||
EditLabel.Caption = #352'ar'#382'e: '
|
||||
LabelPosition = lpLeft
|
||||
ReadOnly = True
|
||||
TabOrder = 2
|
||||
Text = ''
|
||||
end
|
||||
object edtDatVyroby: TLabeledEdit
|
||||
Left = 122
|
||||
Top = 123
|
||||
Width = 121
|
||||
Height = 29
|
||||
TabStop = False
|
||||
Color = 15790320
|
||||
EditLabel.Width = 65
|
||||
EditLabel.Height = 29
|
||||
EditLabel.Caption = 'V'#253'roba: '
|
||||
LabelPosition = lpLeft
|
||||
ReadOnly = True
|
||||
TabOrder = 3
|
||||
Text = ''
|
||||
end
|
||||
object edtDatSpotreby: TLabeledEdit
|
||||
Left = 122
|
||||
Top = 162
|
||||
Width = 121
|
||||
Height = 29
|
||||
TabStop = False
|
||||
Color = 15790320
|
||||
EditLabel.Width = 78
|
||||
EditLabel.Height = 29
|
||||
EditLabel.Caption = 'Spot'#345'eba: '
|
||||
LabelPosition = lpLeft
|
||||
ReadOnly = True
|
||||
TabOrder = 4
|
||||
Text = ''
|
||||
end
|
||||
object edtSZ: TLabeledEdit
|
||||
Left = 300
|
||||
Top = 45
|
||||
Width = 45
|
||||
Height = 29
|
||||
TabStop = False
|
||||
Color = 15790320
|
||||
EditLabel.Width = 33
|
||||
EditLabel.Height = 21
|
||||
EditLabel.Caption = 'SZ: '
|
||||
ReadOnly = True
|
||||
TabOrder = 5
|
||||
Text = ''
|
||||
end
|
||||
object edtRegCis: TLabeledEdit
|
||||
Left = 354
|
||||
Top = 45
|
||||
Width = 147
|
||||
Height = 29
|
||||
TabStop = False
|
||||
Color = 15790320
|
||||
EditLabel.Width = 80
|
||||
EditLabel.Height = 21
|
||||
EditLabel.Caption = 'Reg. '#269#237'slo: '
|
||||
ReadOnly = True
|
||||
TabOrder = 6
|
||||
Text = ''
|
||||
end
|
||||
end
|
||||
object Panel2: TPanel
|
||||
Left = 8
|
||||
Top = 216
|
||||
Width = 523
|
||||
Height = 70
|
||||
TabOrder = 1
|
||||
object edtNazev1: TLabeledEdit
|
||||
Left = 8
|
||||
Top = 24
|
||||
Width = 501
|
||||
Height = 29
|
||||
Alignment = taCenter
|
||||
Color = 15790320
|
||||
EditLabel.Width = 58
|
||||
EditLabel.Height = 21
|
||||
EditLabel.Caption = 'N'#225'zev: '
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -16
|
||||
Font.Name = 'Segoe UI'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
TabOrder = 0
|
||||
Text = ''
|
||||
end
|
||||
end
|
||||
object Panel3: TPanel
|
||||
Left = 8
|
||||
Top = 289
|
||||
Width = 523
|
||||
Height = 176
|
||||
TabOrder = 2
|
||||
object lblKANaPal: TLabel
|
||||
Left = 261
|
||||
Top = 133
|
||||
Width = 56
|
||||
Height = 21
|
||||
Caption = '(KA/pal)'
|
||||
end
|
||||
object lblWarnStitekKA: TLabel
|
||||
Left = 279
|
||||
Top = 60
|
||||
Width = 187
|
||||
Height = 42
|
||||
Alignment = taCenter
|
||||
Caption = 'Nebyl nalezen tiskopis pro Kartonov'#253' '#353't'#237'tek !'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clRed
|
||||
Font.Height = -16
|
||||
Font.Name = 'Segoe UI'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
WordWrap = True
|
||||
end
|
||||
object edtBarvaStitku: TLabeledEdit
|
||||
Left = 137
|
||||
Top = 10
|
||||
Width = 121
|
||||
Height = 29
|
||||
TabStop = False
|
||||
Color = 15790320
|
||||
EditLabel.Width = 93
|
||||
EditLabel.Height = 29
|
||||
EditLabel.Caption = 'Barva '#353't'#237'tku '
|
||||
LabelPosition = lpLeft
|
||||
ReadOnly = True
|
||||
TabOrder = 0
|
||||
Text = ''
|
||||
end
|
||||
object edtTypStitku: TLabeledEdit
|
||||
Left = 137
|
||||
Top = 49
|
||||
Width = 121
|
||||
Height = 29
|
||||
TabStop = False
|
||||
Color = 15790320
|
||||
EditLabel.Width = 77
|
||||
EditLabel.Height = 29
|
||||
EditLabel.Caption = 'Typ '#353't'#237'tku: '
|
||||
LabelPosition = lpLeft
|
||||
ReadOnly = True
|
||||
TabOrder = 1
|
||||
Text = ''
|
||||
end
|
||||
object edtVelkostStitku: TLabeledEdit
|
||||
Left = 137
|
||||
Top = 88
|
||||
Width = 121
|
||||
Height = 29
|
||||
TabStop = False
|
||||
Color = 15790320
|
||||
EditLabel.Width = 107
|
||||
EditLabel.Height = 29
|
||||
EditLabel.Caption = 'Velikost '#353't'#237'tku: '
|
||||
LabelPosition = lpLeft
|
||||
ReadOnly = True
|
||||
TabOrder = 2
|
||||
Text = ''
|
||||
end
|
||||
object edtPocetStitku: TLabeledEdit
|
||||
Left = 137
|
||||
Top = 130
|
||||
Width = 54
|
||||
Height = 29
|
||||
EditLabel.Width = 90
|
||||
EditLabel.Height = 29
|
||||
EditLabel.Caption = 'Po'#269'et '#353't'#237'tku: '
|
||||
LabelPosition = lpLeft
|
||||
TabOrder = 3
|
||||
Text = ''
|
||||
end
|
||||
object edtPocetStitkuMax: TEdit
|
||||
Left = 206
|
||||
Top = 130
|
||||
Width = 52
|
||||
Height = 29
|
||||
Alignment = taCenter
|
||||
AutoSize = False
|
||||
Color = 15790320
|
||||
ReadOnly = True
|
||||
TabOrder = 4
|
||||
end
|
||||
end
|
||||
object Panel4: TPanel
|
||||
Left = 8
|
||||
Top = 469
|
||||
Width = 523
|
||||
Height = 186
|
||||
TabOrder = 3
|
||||
object GroupBox1: TGroupBox
|
||||
AlignWithMargins = True
|
||||
Left = 4
|
||||
Top = 4
|
||||
Width = 515
|
||||
Height = 178
|
||||
Align = alClient
|
||||
Caption = ' Tisknout '
|
||||
TabOrder = 0
|
||||
object GridPanel1: TGridPanel
|
||||
Left = 2
|
||||
Top = 23
|
||||
Width = 511
|
||||
Height = 153
|
||||
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
|
||||
ColumnSpan = 2
|
||||
Control = Label1
|
||||
Row = 0
|
||||
end
|
||||
item
|
||||
Column = 0
|
||||
ColumnSpan = 2
|
||||
Control = Label2
|
||||
Row = 1
|
||||
end
|
||||
item
|
||||
Column = 0
|
||||
ColumnSpan = 2
|
||||
Control = Label3
|
||||
Row = 2
|
||||
end
|
||||
item
|
||||
Column = 0
|
||||
ColumnSpan = 2
|
||||
Control = Label4
|
||||
Row = 3
|
||||
end
|
||||
item
|
||||
Column = 2
|
||||
Control = pnlSarzeAno
|
||||
Row = 0
|
||||
end
|
||||
item
|
||||
Column = 3
|
||||
Control = pnlSarzeNe
|
||||
Row = 0
|
||||
end
|
||||
item
|
||||
Column = 2
|
||||
Control = pnlSpotrebaAno
|
||||
Row = 1
|
||||
end
|
||||
item
|
||||
Column = 3
|
||||
Control = pnlSpotrebaNe
|
||||
Row = 1
|
||||
end
|
||||
item
|
||||
Column = 2
|
||||
Control = edtPocetPL
|
||||
Row = 3
|
||||
end
|
||||
item
|
||||
Column = 2
|
||||
Control = pnlTiskNaObraz
|
||||
Row = 2
|
||||
end
|
||||
item
|
||||
Column = 3
|
||||
Control = pnlTiskNaTisk
|
||||
Row = 2
|
||||
end>
|
||||
RowCollection = <
|
||||
item
|
||||
Value = 25.000000000000000000
|
||||
end
|
||||
item
|
||||
Value = 25.000000000000000000
|
||||
end
|
||||
item
|
||||
Value = 25.000000000000000000
|
||||
end
|
||||
item
|
||||
Value = 25.000000000000000000
|
||||
end>
|
||||
TabOrder = 0
|
||||
DesignSize = (
|
||||
511
|
||||
153)
|
||||
object Label1: TLabel
|
||||
Left = 109
|
||||
Top = 9
|
||||
Width = 38
|
||||
Height = 21
|
||||
Anchors = []
|
||||
Caption = #352'ar'#382'e'
|
||||
ExplicitLeft = 49
|
||||
end
|
||||
object Label2: TLabel
|
||||
Left = 72
|
||||
Top = 47
|
||||
Width = 112
|
||||
Height = 21
|
||||
Anchors = []
|
||||
Caption = 'Datum spot'#345'eby'
|
||||
ExplicitLeft = 12
|
||||
end
|
||||
object Label3: TLabel
|
||||
Left = 104
|
||||
Top = 85
|
||||
Width = 48
|
||||
Height = 21
|
||||
Anchors = []
|
||||
Caption = 'Tisk na'
|
||||
ExplicitLeft = 108
|
||||
end
|
||||
object Label4: TLabel
|
||||
Left = 54
|
||||
Top = 122
|
||||
Width = 149
|
||||
Height = 21
|
||||
Anchors = []
|
||||
Caption = 'Po'#269'et paletov'#253'ch list'#367
|
||||
ExplicitLeft = 58
|
||||
end
|
||||
object pnlSarzeAno: TPanel
|
||||
Left = 256
|
||||
Top = 1
|
||||
Width = 127
|
||||
Height = 38
|
||||
Align = alClient
|
||||
Color = clMoneyGreen
|
||||
FullRepaint = False
|
||||
ParentBackground = False
|
||||
TabOrder = 0
|
||||
OnClick = pnlSarzeAnoClick
|
||||
object rbTiskSarzeAno: TRadioButton
|
||||
AlignWithMargins = True
|
||||
Left = 4
|
||||
Top = 4
|
||||
Width = 119
|
||||
Height = 30
|
||||
Align = alClient
|
||||
Caption = 'Ano'
|
||||
Checked = True
|
||||
Color = clMoneyGreen
|
||||
ParentColor = False
|
||||
TabOrder = 0
|
||||
TabStop = True
|
||||
OnClick = rbTiskSarzeAnoClick
|
||||
end
|
||||
end
|
||||
object pnlSarzeNe: TPanel
|
||||
Left = 383
|
||||
Top = 1
|
||||
Width = 127
|
||||
Height = 38
|
||||
Align = alClient
|
||||
FullRepaint = False
|
||||
ParentBackground = False
|
||||
TabOrder = 1
|
||||
OnClick = pnlSarzeNeClick
|
||||
object rbTiskSarzeNe: TRadioButton
|
||||
AlignWithMargins = True
|
||||
Left = 4
|
||||
Top = 4
|
||||
Width = 119
|
||||
Height = 30
|
||||
Align = alClient
|
||||
Caption = 'Ne'
|
||||
TabOrder = 0
|
||||
OnClick = rbTiskSarzeNeClick
|
||||
end
|
||||
end
|
||||
object pnlSpotrebaAno: TPanel
|
||||
Left = 256
|
||||
Top = 39
|
||||
Width = 127
|
||||
Height = 38
|
||||
Align = alClient
|
||||
Color = clMoneyGreen
|
||||
FullRepaint = False
|
||||
ParentBackground = False
|
||||
TabOrder = 2
|
||||
object rbTiskSpotrebaAno: TRadioButton
|
||||
AlignWithMargins = True
|
||||
Left = 4
|
||||
Top = 4
|
||||
Width = 119
|
||||
Height = 30
|
||||
Align = alClient
|
||||
Caption = 'Ano'
|
||||
Checked = True
|
||||
Color = clMoneyGreen
|
||||
ParentColor = False
|
||||
TabOrder = 0
|
||||
TabStop = True
|
||||
OnClick = rbTiskSpotrebaAnoClick
|
||||
end
|
||||
end
|
||||
object pnlSpotrebaNe: TPanel
|
||||
Left = 383
|
||||
Top = 39
|
||||
Width = 127
|
||||
Height = 38
|
||||
Align = alClient
|
||||
FullRepaint = False
|
||||
ParentBackground = False
|
||||
TabOrder = 3
|
||||
object rbTiskSpotrebaNe: TRadioButton
|
||||
AlignWithMargins = True
|
||||
Left = 4
|
||||
Top = 4
|
||||
Width = 119
|
||||
Height = 30
|
||||
Align = alClient
|
||||
Caption = 'Ne'
|
||||
TabOrder = 0
|
||||
OnClick = rbTiskSpotrebaNeClick
|
||||
end
|
||||
end
|
||||
object edtPocetPL: TEdit
|
||||
Left = 259
|
||||
Top = 118
|
||||
Width = 121
|
||||
Height = 29
|
||||
Alignment = taCenter
|
||||
Anchors = []
|
||||
MaxLength = 1
|
||||
NumbersOnly = True
|
||||
TabOrder = 4
|
||||
end
|
||||
object pnlTiskNaObraz: TPanel
|
||||
Left = 256
|
||||
Top = 77
|
||||
Width = 127
|
||||
Height = 37
|
||||
Align = alClient
|
||||
Color = clMoneyGreen
|
||||
FullRepaint = False
|
||||
ParentBackground = False
|
||||
TabOrder = 5
|
||||
object rbTiskNaObraz: TRadioButton
|
||||
AlignWithMargins = True
|
||||
Left = 4
|
||||
Top = 4
|
||||
Width = 119
|
||||
Height = 29
|
||||
Align = alClient
|
||||
Caption = 'Obrazovku'
|
||||
Checked = True
|
||||
Color = clMoneyGreen
|
||||
ParentColor = False
|
||||
TabOrder = 0
|
||||
TabStop = True
|
||||
OnClick = rbTiskNaObrazClick
|
||||
end
|
||||
end
|
||||
object pnlTiskNaTisk: TPanel
|
||||
Left = 383
|
||||
Top = 77
|
||||
Width = 127
|
||||
Height = 37
|
||||
Align = alClient
|
||||
FullRepaint = False
|
||||
ParentBackground = False
|
||||
TabOrder = 6
|
||||
object rbTiskNaTisk: TRadioButton
|
||||
AlignWithMargins = True
|
||||
Left = 4
|
||||
Top = 4
|
||||
Width = 119
|
||||
Height = 29
|
||||
Align = alClient
|
||||
Caption = 'Tisk'#225'rnu'
|
||||
TabOrder = 0
|
||||
OnClick = rbTiskNaTiskClick
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
object btnTiskStitku: TButton
|
||||
Left = 136
|
||||
Top = 665
|
||||
Width = 233
|
||||
Height = 62
|
||||
Caption = 'Tisk kartonov'#253'ch '#353't'#237'tk'#367#13#10' + Paletov'#253' l'#237'stek'
|
||||
TabOrder = 4
|
||||
OnClick = btnTiskStitkuClick
|
||||
end
|
||||
object btnTiskZaloha: TButton
|
||||
Left = 136
|
||||
Top = 751
|
||||
Width = 233
|
||||
Height = 37
|
||||
Caption = 'Z'#225'lo'#382'n'#237' tisk na A4'
|
||||
TabOrder = 5
|
||||
end
|
||||
end
|
||||
Reference in New Issue
Block a user