TomBuzin/Rootvin-pluginHDCRTN
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
5fcde65f6b2d34dfa357d9891e0e9e46e9e2f137
Rootvin-pluginHDCRTN/frmTiskKAStitku.dfm
TomBuz fedc940ac4 Prvni verze
2025-05-21 21:06:33 +02:00

567 lines
13 KiB
Plaintext
Raw Blame History

object formTiskKAStitku: TformTiskKAStitku
Left = 0
Top = 0
BorderIcons = [biSystemMenu]
Caption = ' Tisk KA '#353't'#237'tk'#367
ClientHeight = 737
ClientWidth = 430
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Segoe UI'
Font.Style = []
Position = poOwnerFormCenter
OnShow = FormShow
TextHeight = 17
object Panel1: TPanel
Left = 8
Top = 6
Width = 215
Height = 151
TabOrder = 0
object edtZakazka: TLabeledEdit
Left = 92
Top = 4
Width = 121
Height = 25
Alignment = taCenter
Color = 15790320
EditLabel.Width = 65
EditLabel.Height = 25
EditLabel.Caption = 'Zak'#225'zka: '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
LabelPosition = lpLeft
ParentFont = False
ReadOnly = True
TabOrder = 0
Text = ''
end
object edtPaletList: TLabeledEdit
Left = 92
Top = 33
Width = 121
Height = 25
Alignment = taCenter
Color = 15790320
EditLabel.Width = 87
EditLabel.Height = 25
EditLabel.Caption = 'Paletov'#253' list: '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
LabelPosition = lpLeft
ParentFont = False
ReadOnly = True
TabOrder = 1
Text = ''
end
object edtSarze: TLabeledEdit
Left = 92
Top = 62
Width = 121
Height = 25
Alignment = taCenter
Color = 15790320
EditLabel.Width = 51
EditLabel.Height = 25
EditLabel.Caption = #352'ar'#382'e: '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
LabelPosition = lpLeft
ParentFont = False
ReadOnly = True
TabOrder = 2
Text = ''
end
object edtDatVyroba: TLabeledEdit
Left = 92
Top = 91
Width = 121
Height = 25
Alignment = taCenter
Color = 15790320
EditLabel.Width = 61
EditLabel.Height = 25
EditLabel.Caption = 'V'#253'roba: '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
LabelPosition = lpLeft
ParentFont = False
ReadOnly = True
TabOrder = 3
Text = ''
end
object edtDatSpotreba: TLabeledEdit
Left = 92
Top = 120
Width = 121
Height = 25
Alignment = taCenter
Color = 15790320
EditLabel.Width = 73
EditLabel.Height = 25
EditLabel.Caption = 'Spot'#345'eba: '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
LabelPosition = lpLeft
ParentFont = False
ReadOnly = True
TabOrder = 4
Text = ''
end
end
object Panel2: TPanel
Left = 238
Top = 6
Width = 185
Height = 69
TabOrder = 1
object edtSZ: TLabeledEdit
Left = 6
Top = 22
Width = 37
Height = 25
Alignment = taCenter
Color = 15790320
EditLabel.Width = 16
EditLabel.Height = 17
EditLabel.Caption = 'Sk.'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
Text = ''
end
object edtRegCis: TLabeledEdit
Left = 47
Top = 22
Width = 126
Height = 25
Alignment = taCenter
Color = 15790320
EditLabel.Width = 40
EditLabel.Height = 17
EditLabel.Caption = 'RegCis'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
Text = ''
end
end
object Panel3: TPanel
Left = 8
Top = 166
Width = 415
Height = 60
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
TabOrder = 2
DesignSize = (
415
60)
object edtNazev1: TLabeledEdit
Left = 0
Top = 24
Width = 412
Height = 33
Alignment = taCenter
Anchors = [akLeft, akTop, akRight, akBottom]
Color = 15790320
EditLabel.Width = 52
EditLabel.Height = 25
EditLabel.Caption = 'N'#225'zev'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
Text = ''
end
end
object Panel4: TPanel
Left = 8
Top = 232
Width = 235
Height = 137
TabOrder = 3
object LabeledEdit9: TLabeledEdit
Left = 102
Top = 6
Width = 121
Height = 25
Alignment = taCenter
Color = 15790320
EditLabel.Width = 85
EditLabel.Height = 25
EditLabel.Caption = 'Barva '#353't'#237'tk'#367': '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
LabelPosition = lpLeft
ParentFont = False
ReadOnly = True
TabOrder = 0
Text = ''
end
object LabeledEdit10: TLabeledEdit
Left = 102
Top = 34
Width = 121
Height = 25
Alignment = taCenter
Color = 15790320
EditLabel.Width = 73
EditLabel.Height = 25
EditLabel.Caption = 'Typ '#353't'#237'tk'#367': '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
LabelPosition = lpLeft
ParentFont = False
ReadOnly = True
TabOrder = 1
Text = ''
end
object LabeledEdit11: TLabeledEdit
Left = 102
Top = 65
Width = 121
Height = 25
Alignment = taCenter
Color = 15790320
EditLabel.Width = 97
EditLabel.Height = 25
EditLabel.Caption = 'Velikost '#353't'#237'tk'#367': '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
LabelPosition = lpLeft
ParentFont = False
ReadOnly = True
TabOrder = 2
Text = ''
end
object edtPocetStitku: TLabeledEdit
Left = 102
Top = 96
Width = 51
Height = 25
Alignment = taCenter
EditLabel.Width = 85
EditLabel.Height = 25
EditLabel.Caption = 'Po'#269'et '#353't'#237'tk'#367': '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
LabelPosition = lpLeft
NumbersOnly = True
ParentFont = False
TabOrder = 3
Text = ''
end
object Edit1: TEdit
Left = 173
Top = 96
Width = 50
Height = 25
Alignment = taCenter
Color = 15790320
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
NumbersOnly = True
ParentFont = False
ReadOnly = True
TabOrder = 4
Text = '0'
end
end
object Panel5: TPanel
Left = 10
Top = 388
Width = 412
Height = 191
TabOrder = 4
DesignSize = (
412
191)
object Label1: TLabel
Left = 10
Top = 8
Width = 393
Height = 21
Alignment = taCenter
Anchors = [akLeft, akTop, akRight]
AutoSize = False
Caption = 'Tisknout'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 87
Top = 32
Width = 38
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 Label3: TLabel
Left = 51
Top = 68
Width = 112
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 Label4: TLabel
Left = 51
Top = 110
Width = 80
Height = 21
Caption = 'Tisknout na'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
Visible = False
end
object Label5: TLabel
Left = 222
Top = 32
Width = 28
Height = 21
Caption = 'Ano'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 306
Top = 32
Width = 20
Height = 21
Caption = 'Ne'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 306
Top = 68
Width = 20
Height = 21
Caption = 'Ne'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 222
Top = 68
Width = 28
Height = 21
Caption = 'Ano'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 306
Top = 106
Width = 75
Height = 21
Caption = 'Obrazovka'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
Visible = False
end
object Label10: TLabel
Left = 192
Top = 106
Width = 58
Height = 21
Alignment = taRightJustify
Caption = 'Tisk'#225'rna'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
Visible = False
end
object swTiskSpotreba: TEsSwitch
Left = 256
Top = 70
Width = 44
Height = 20
Color = clBtnFace
MainColor = clRed
ParentColor = False
ParentBackground = False
TabOrder = 0
end
object swTiskSarze: TEsSwitch
Left = 256
Top = 36
Width = 44
Height = 20
TextOn = 'Ano'
TextOff = 'Ne'
Color = clBtnFace
MainColor = clRed
ParentColor = False
ParentShowHint = False
ParentBackground = False
ShowHint = False
TabOrder = 1
end
object swTiskTiskarna: TEsSwitch
Left = 256
Top = 108
Width = 44
Height = 20
Color = clBtnFace
MainColor = clRed
ParentColor = False
ParentBackground = False
TabOrder = 2
Visible = False
end
object edtPocetPL: TLabeledEdit
Left = 251
Top = 144
Width = 51
Height = 29
Alignment = taCenter
EditLabel.Width = 168
EditLabel.Height = 29
EditLabel.Caption = 'Po'#269'et paletov'#253'ch list'#367': '
EditLabel.Font.Charset = DEFAULT_CHARSET
EditLabel.Font.Color = clWindowText
EditLabel.Font.Height = -16
EditLabel.Font.Name = 'Segoe UI'
EditLabel.Font.Style = []
EditLabel.ParentFont = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
LabelPosition = lpLeft
NumbersOnly = True
ParentFont = False
TabOrder = 3
Text = ''
end
end
object Edit2: TEdit
Left = 253
Top = 297
Width = 108
Height = 25
Alignment = taCenter
Color = 15790320
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
NumbersOnly = True
ParentFont = False
ReadOnly = True
TabOrder = 5
Text = '0'
end
object btnTisk: TButton
Left = 110
Top = 588
Width = 181
Height = 51
Caption = 'Tisk kartonov'#253'ch '#353't'#237'tk'#367' +'#13#10'paletov'#253' l'#237'stek'
TabOrder = 6
OnClick = btnTiskClick
end
object btnTiskZaloha: TButton
Left = 110
Top = 668
Width = 181
Height = 51
Caption = 'Z'#225'lo'#382'n'#237' tisk na A4'
TabOrder = 7
Visible = False
OnClick = btnTiskClick
end
end
Reference in New Issue View Git Blame Copy Permalink