522 lines
12 KiB
Plaintext
522 lines
12 KiB
Plaintext
object formSpravaVzorku: TformSpravaVzorku
|
|
Left = 0
|
|
Top = 0
|
|
BorderIcons = [biSystemMenu]
|
|
BorderStyle = bsSingle
|
|
Caption = ' Spr'#225'va vzork'#367
|
|
ClientHeight = 635
|
|
ClientWidth = 1476
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
Position = poOwnerFormCenter
|
|
OnShow = FormShow
|
|
DesignSize = (
|
|
1476
|
|
635)
|
|
TextHeight = 21
|
|
object GridPanel1: TGridPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 1476
|
|
Height = 635
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 100.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = grdSpravaVzorku
|
|
Row = 1
|
|
end
|
|
item
|
|
Column = 0
|
|
Control = GridPanel2
|
|
Row = 0
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 22.000000000000000000
|
|
end
|
|
item
|
|
Value = 75.000000000000000000
|
|
end
|
|
item
|
|
Value = 3.000000000000004000
|
|
end>
|
|
TabOrder = 0
|
|
object grdSpravaVzorku: TJvDBGrid
|
|
Left = 1
|
|
Top = 140
|
|
Width = 1474
|
|
Height = 475
|
|
Align = alClient
|
|
DataSource = dm.dsSpravaVzorku
|
|
DrawingStyle = gdsGradient
|
|
GradientEndColor = clActiveCaption
|
|
GradientStartColor = 16776176
|
|
Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
|
|
TabOrder = 0
|
|
TitleFont.Charset = DEFAULT_CHARSET
|
|
TitleFont.Color = clWindowText
|
|
TitleFont.Height = -16
|
|
TitleFont.Name = 'Segoe UI'
|
|
TitleFont.Style = []
|
|
OnColEnter = grdSpravaVzorkuColEnter
|
|
OnColExit = grdSpravaVzorkuColExit
|
|
OnDrawColumnCell = grdSpravaVzorkuDrawColumnCell
|
|
OnDblClick = grdSpravaVzorkuDblClick
|
|
OnMouseUp = grdSpravaVzorkuMouseUp
|
|
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 = 'colID'
|
|
Visible = False
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'colIDArchiv'
|
|
Visible = False
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'colSZ'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'SZ'
|
|
Width = 38
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'colRC'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'Reg. '#269#237'slo'
|
|
Width = 113
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'colNazev1'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'N'#225'zev'
|
|
Width = 377
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'colStroj'
|
|
Title.Alignment = taCenter
|
|
Width = 361
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'colMistr'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'Mistr'
|
|
Width = 148
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'colDatPorizeni'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'Datum'
|
|
Width = 151
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'colKArchivaci'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = ' '
|
|
Width = 32
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'colArchiv'
|
|
Title.Alignment = taCenter
|
|
Width = 140
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'colUkonceno'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = ' '
|
|
Width = 32
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'colVyrazeno'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = ' '
|
|
Width = 32
|
|
Visible = True
|
|
end>
|
|
end
|
|
object GridPanel2: TGridPanel
|
|
Left = 1
|
|
Top = 1
|
|
Width = 1474
|
|
Height = 139
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 100.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = GridPanel3
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 0
|
|
Control = GridPanel4
|
|
Row = 1
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 35.515097939819110000
|
|
end
|
|
item
|
|
Value = 64.484902060180900000
|
|
end>
|
|
TabOrder = 1
|
|
object GridPanel3: TGridPanel
|
|
Left = 1
|
|
Top = 1
|
|
Width = 1472
|
|
Height = 49
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 20.000000000000000000
|
|
end
|
|
item
|
|
Value = 20.000000000000000000
|
|
end
|
|
item
|
|
Value = 20.000000000000000000
|
|
end
|
|
item
|
|
Value = 20.000000000000000000
|
|
end
|
|
item
|
|
Value = 20.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 1
|
|
Control = btnTiskKartonu
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 2
|
|
Control = btnTiskSeznamVzorku
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 4
|
|
Control = btnUkoncitKarton
|
|
Row = 0
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 100.000000000000000000
|
|
end>
|
|
TabOrder = 0
|
|
DesignSize = (
|
|
1472
|
|
49)
|
|
object btnTiskKartonu: TButton
|
|
Left = 352
|
|
Top = 2
|
|
Width = 180
|
|
Height = 45
|
|
Anchors = []
|
|
Caption = 'Tisk - '#353't'#237'tek kartonu'
|
|
TabOrder = 0
|
|
end
|
|
object btnTiskSeznamVzorku: TButton
|
|
Left = 602
|
|
Top = 2
|
|
Width = 268
|
|
Height = 45
|
|
Anchors = []
|
|
Caption = 'Tisk - seznam vzork'#367' v kartonu'
|
|
TabOrder = 1
|
|
end
|
|
object btnUkoncitKarton: TButton
|
|
Left = 1254
|
|
Top = 2
|
|
Width = 140
|
|
Height = 45
|
|
Anchors = []
|
|
Caption = 'Ukon'#269'it karton'
|
|
TabOrder = 2
|
|
end
|
|
end
|
|
object GridPanel4: TGridPanel
|
|
Left = 1
|
|
Top = 50
|
|
Width = 1472
|
|
Height = 88
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 0.800000000000000000
|
|
end
|
|
item
|
|
Value = 2.600000000000000000
|
|
end
|
|
item
|
|
Value = 7.900000000000000000
|
|
end
|
|
item
|
|
Value = 25.800000000000000000
|
|
end
|
|
item
|
|
Value = 24.700000000000000000
|
|
end
|
|
item
|
|
Value = 10.000000000000000000
|
|
end
|
|
item
|
|
Value = 10.100000000000000000
|
|
end
|
|
item
|
|
Value = 2.200000000000000000
|
|
end
|
|
item
|
|
Value = 9.900000000000000000
|
|
end
|
|
item
|
|
Value = 2.200000000000000000
|
|
end
|
|
item
|
|
Value = 2.200000000000000000
|
|
end
|
|
item
|
|
Value = 1.599999999999993000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = Label1
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 1
|
|
Control = edtSZ
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 2
|
|
Control = edtRegCis
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 3
|
|
Control = edtNazev1
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 4
|
|
Control = edtStroj
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 10
|
|
Control = Label9
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 7
|
|
Control = Label2
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 9
|
|
Control = Label3
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 5
|
|
ColumnSpan = 2
|
|
Control = btnVyraditVzorek
|
|
Row = 0
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 100.000000000000000000
|
|
end>
|
|
TabOrder = 1
|
|
DesignSize = (
|
|
1472
|
|
88)
|
|
object Label1: TLabel
|
|
AlignWithMargins = True
|
|
Left = 1
|
|
Top = 63
|
|
Width = 12
|
|
Height = 21
|
|
Margins.Left = 0
|
|
Margins.Top = 0
|
|
Margins.Right = 0
|
|
Margins.Bottom = 3
|
|
Align = alBottom
|
|
Caption = 'X'
|
|
OnClick = Label1Click
|
|
ExplicitWidth = 9
|
|
end
|
|
object edtSZ: TEdit
|
|
Left = 13
|
|
Top = 58
|
|
Width = 38
|
|
Height = 29
|
|
Align = alBottom
|
|
Alignment = taCenter
|
|
MaxLength = 3
|
|
TabOrder = 0
|
|
OnChange = edtSZChange
|
|
end
|
|
object edtRegCis: TEdit
|
|
Left = 51
|
|
Top = 58
|
|
Width = 116
|
|
Height = 29
|
|
Align = alBottom
|
|
Alignment = taCenter
|
|
MaxLength = 30
|
|
TabOrder = 1
|
|
OnChange = edtRegCisChange
|
|
end
|
|
object edtNazev1: TEdit
|
|
Left = 167
|
|
Top = 58
|
|
Width = 379
|
|
Height = 29
|
|
Align = alBottom
|
|
Alignment = taCenter
|
|
MaxLength = 100
|
|
TabOrder = 2
|
|
OnChange = edtNazev1Change
|
|
end
|
|
object edtStroj: TEdit
|
|
Left = 546
|
|
Top = 58
|
|
Width = 363
|
|
Height = 29
|
|
Align = alBottom
|
|
Alignment = taCenter
|
|
MaxLength = 100
|
|
TabOrder = 3
|
|
OnChange = edtStrojChange
|
|
end
|
|
object Label9: TLabel
|
|
Left = 1419
|
|
Top = 8
|
|
Width = 23
|
|
Height = 72
|
|
Anchors = []
|
|
Caption = 'Vy'#345'azeno'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Orientation = 2700
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
Layout = tlCenter
|
|
WordWrap = True
|
|
ExplicitLeft = 979
|
|
ExplicitTop = 10
|
|
end
|
|
object Label2: TLabel
|
|
Left = 1209
|
|
Top = 2
|
|
Width = 23
|
|
Height = 83
|
|
Anchors = []
|
|
Caption = 'K archivaci'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Orientation = 2700
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
Layout = tlCenter
|
|
WordWrap = True
|
|
ExplicitLeft = 979
|
|
end
|
|
object Label3: TLabel
|
|
Left = 1387
|
|
Top = 5
|
|
Width = 23
|
|
Height = 78
|
|
Anchors = []
|
|
Caption = 'Ukon'#269'eno'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -16
|
|
Font.Name = 'Segoe UI'
|
|
Font.Orientation = 2700
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
Layout = tlCenter
|
|
WordWrap = True
|
|
ExplicitLeft = 1124
|
|
ExplicitTop = 7
|
|
end
|
|
object btnVyraditVzorek: TButton
|
|
Left = 987
|
|
Top = 21
|
|
Width = 140
|
|
Height = 45
|
|
Anchors = []
|
|
Caption = 'Vy'#345'adit vzorek'
|
|
TabOrder = 4
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object dbCb1: TJvDBCheckBox
|
|
Left = 151
|
|
Top = 228
|
|
Width = 20
|
|
Height = 30
|
|
Anchors = []
|
|
Color = clBtnFace
|
|
DataField = 'colKArchivaci'
|
|
DataSource = dm.dsSpravaVzorku
|
|
ParentColor = False
|
|
TabOrder = 1
|
|
ValueChecked = 'X'
|
|
ValueUnchecked = ''
|
|
Visible = False
|
|
end
|
|
end
|