Prvni verze
This commit is contained in:
766
frmOdvLisX.dfm
Normal file
766
frmOdvLisX.dfm
Normal file
@ -0,0 +1,766 @@
|
||||
object formOdvLisX: TformOdvLisX
|
||||
Left = 0
|
||||
Top = 0
|
||||
BorderIcons = [biSystemMenu]
|
||||
BorderStyle = bsSingle
|
||||
Caption = ' Odv'#225'd'#283'ni vst'#345'ik'#367' na lisu'
|
||||
ClientHeight = 613
|
||||
ClientWidth = 1487
|
||||
Color = clBtnFace
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -21
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
OldCreateOrder = False
|
||||
Position = poOwnerFormCenter
|
||||
OnClose = FormClose
|
||||
OnShow = FormShow
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 25
|
||||
object lblZapisDat: TLabel
|
||||
Left = 539
|
||||
Top = 570
|
||||
Width = 354
|
||||
Height = 25
|
||||
Alignment = taCenter
|
||||
AutoSize = False
|
||||
Caption = 'Prob'#237'h'#225' z'#225'pis dat...'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clRed
|
||||
Font.Height = -21
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
Visible = False
|
||||
end
|
||||
object Label1: TLabel
|
||||
Left = 596
|
||||
Top = 123
|
||||
Width = 126
|
||||
Height = 25
|
||||
Caption = 'Po'#269'et vst'#345'ik'#367':'
|
||||
end
|
||||
object lblPrijmeni: TLabel
|
||||
Left = 781
|
||||
Top = 79
|
||||
Width = 5
|
||||
Height = 19
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -16
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
end
|
||||
object lblPlan: TLabel
|
||||
Left = 510
|
||||
Top = 79
|
||||
Width = 5
|
||||
Height = 19
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -16
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
end
|
||||
object Label2: TLabel
|
||||
Left = 1182
|
||||
Top = 156
|
||||
Width = 267
|
||||
Height = 23
|
||||
Caption = '. . . . pro evidenci Zmetk'#367' . . . .'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -19
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = [fsItalic]
|
||||
ParentFont = False
|
||||
Visible = False
|
||||
end
|
||||
object btnOK: TButton
|
||||
Left = 523
|
||||
Top = 520
|
||||
Width = 116
|
||||
Height = 39
|
||||
Caption = 'OK'
|
||||
TabOrder = 6
|
||||
OnClick = btnOKClick
|
||||
end
|
||||
object btnStorno: TButton
|
||||
Left = 792
|
||||
Top = 520
|
||||
Width = 113
|
||||
Height = 39
|
||||
Caption = 'Storno'
|
||||
TabOrder = 7
|
||||
OnClick = btnStornoClick
|
||||
end
|
||||
object edtBarcode: TLabeledEdit
|
||||
Left = 510
|
||||
Top = 40
|
||||
Width = 143
|
||||
Height = 33
|
||||
Alignment = taCenter
|
||||
EditLabel.Width = 125
|
||||
EditLabel.Height = 25
|
||||
EditLabel.Caption = #268'. k'#243'd pl'#225'nu:'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -21
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
TabOrder = 0
|
||||
OnExit = edtBarcodeExit
|
||||
end
|
||||
object selBarcode: TButtonedEdit
|
||||
Left = 652
|
||||
Top = 41
|
||||
Width = 31
|
||||
Height = 31
|
||||
Caption = '...'
|
||||
TabOrder = 1
|
||||
OnClick = selBarcodeClick
|
||||
end
|
||||
object edtCisZam: TLabeledEdit
|
||||
Left = 780
|
||||
Top = 40
|
||||
Width = 94
|
||||
Height = 33
|
||||
Alignment = taCenter
|
||||
EditLabel.Width = 131
|
||||
EditLabel.Height = 25
|
||||
EditLabel.Caption = 'Os.'#269'. zam'#283'st.:'
|
||||
NumbersOnly = True
|
||||
TabOrder = 2
|
||||
OnExit = edtCisZamExit
|
||||
end
|
||||
object selCisZam: TButtonedEdit
|
||||
Left = 873
|
||||
Top = 42
|
||||
Width = 31
|
||||
Height = 31
|
||||
Caption = '...'
|
||||
TabOrder = 3
|
||||
OnClick = selCisZamClick
|
||||
OnExit = selCisZamExit
|
||||
end
|
||||
object edtVstriku: TRzNumericEdit
|
||||
Left = 728
|
||||
Top = 120
|
||||
Width = 65
|
||||
Height = 33
|
||||
Alignment = taCenter
|
||||
TabOrder = 4
|
||||
OnExit = edtVstrikuExit
|
||||
DisplayFormat = ',0;(,0)'
|
||||
end
|
||||
object grd: TNextDBGrid6
|
||||
Left = 3
|
||||
Top = 179
|
||||
Width = 1476
|
||||
Height = 316
|
||||
ParentColor = False
|
||||
TabOrder = 5
|
||||
StyleOptions = [soNativeStyles, soVCLStyles]
|
||||
ActiveView = view
|
||||
ActiveViewIndex = 0
|
||||
Options = [goAutoHideScrollBars, goExitEndEditing, goResponsiveViews, goTabLeaveControl]
|
||||
RowHeight = 30
|
||||
ScrollBars = [sbVertical]
|
||||
SelectFullRow = True
|
||||
Style = stModern
|
||||
OnCellClick = grdCellClick
|
||||
DataSource = ds
|
||||
object view: TNxReportGridView6
|
||||
ColumnMoving = False
|
||||
GridLines = True
|
||||
HeaderHeight = 33
|
||||
OnGetCellColor = viewGetCellColor
|
||||
end
|
||||
object colRegCis: TNxDBTextColumn6
|
||||
Alignment = taCenter
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -21
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
Footer.Font.Charset = DEFAULT_CHARSET
|
||||
Footer.Font.Color = clWindowText
|
||||
Footer.Font.Height = -11
|
||||
Footer.Font.Name = 'Tahoma'
|
||||
Footer.Font.Style = []
|
||||
Footer.FormatMask = '#,##0.00'
|
||||
Header.Alignment = taCenter
|
||||
Header.Caption = 'Reg.'#269'.'
|
||||
Header.Font.Charset = DEFAULT_CHARSET
|
||||
Header.Font.Color = clWindowText
|
||||
Header.Font.Height = -21
|
||||
Header.Font.Name = 'Tahoma'
|
||||
Header.Font.Style = []
|
||||
Header.ParentFont = False
|
||||
Header.Clickable = False
|
||||
Index = 0
|
||||
Inserting = False
|
||||
PlaceholderText = 'Text Text'
|
||||
Position = 0
|
||||
Resizeable = False
|
||||
Width = 140
|
||||
DataBinding.FieldName = 'RegCis'
|
||||
end
|
||||
object colZakazka: TNxDBTextColumn6
|
||||
Alignment = taCenter
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -21
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
Footer.Font.Charset = DEFAULT_CHARSET
|
||||
Footer.Font.Color = clWindowText
|
||||
Footer.Font.Height = -11
|
||||
Footer.Font.Name = 'Tahoma'
|
||||
Footer.Font.Style = []
|
||||
Footer.FormatMask = '#,##0.00'
|
||||
Header.Alignment = taCenter
|
||||
Header.Caption = 'Zak'#225'zka'
|
||||
Header.Font.Charset = DEFAULT_CHARSET
|
||||
Header.Font.Color = clWindowText
|
||||
Header.Font.Height = -21
|
||||
Header.Font.Name = 'Tahoma'
|
||||
Header.Font.Style = []
|
||||
Header.ParentFont = False
|
||||
Index = 1
|
||||
PlaceholderText = 'Text Text'
|
||||
Position = 1
|
||||
Resizeable = False
|
||||
Width = 140
|
||||
DataBinding.FieldName = 'Zakazka'
|
||||
end
|
||||
object colNazev: TNxDBTextColumn6
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -21
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
Footer.Font.Charset = DEFAULT_CHARSET
|
||||
Footer.Font.Color = clWindowText
|
||||
Footer.Font.Height = -11
|
||||
Footer.Font.Name = 'Tahoma'
|
||||
Footer.Font.Style = []
|
||||
Footer.FormatMask = '#,##0.00'
|
||||
Header.Alignment = taCenter
|
||||
Header.Caption = 'Popis'
|
||||
Header.Font.Charset = DEFAULT_CHARSET
|
||||
Header.Font.Color = clWindowText
|
||||
Header.Font.Height = -21
|
||||
Header.Font.Name = 'Tahoma'
|
||||
Header.Font.Style = []
|
||||
Header.ParentFont = False
|
||||
Header.Clickable = False
|
||||
Index = 2
|
||||
Inserting = False
|
||||
PlaceholderText = 'Text Text'
|
||||
Position = 2
|
||||
Selectable = False
|
||||
Width = 220
|
||||
DataBinding.FieldName = 'Nazev'
|
||||
end
|
||||
object colForma: TNxDBComboBoxColumn6
|
||||
Alignment = taCenter
|
||||
Editing = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -21
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
Footer.Font.Charset = DEFAULT_CHARSET
|
||||
Footer.Font.Color = clWindowText
|
||||
Footer.Font.Height = -11
|
||||
Footer.Font.Name = 'Tahoma'
|
||||
Footer.Font.Style = []
|
||||
Footer.FormatMask = '#,##0.00'
|
||||
Header.Alignment = taCenter
|
||||
Header.Caption = 'Forma'
|
||||
Header.Font.Charset = DEFAULT_CHARSET
|
||||
Header.Font.Color = clWindowText
|
||||
Header.Font.Height = -21
|
||||
Header.Font.Name = 'Tahoma'
|
||||
Header.Font.Style = []
|
||||
Header.ParentFont = False
|
||||
Index = 3
|
||||
PlaceholderText = 'Text Text'
|
||||
Position = 3
|
||||
Resizeable = False
|
||||
Width = 230
|
||||
AutoDropDown = True
|
||||
ItemHeight = 25
|
||||
ItemsAlignment = taCenter
|
||||
end
|
||||
object colFormaSN: TNxDBTextColumn6
|
||||
Alignment = taCenter
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -21
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
Footer.Font.Charset = DEFAULT_CHARSET
|
||||
Footer.Font.Color = clWindowText
|
||||
Footer.Font.Height = -11
|
||||
Footer.Font.Name = 'Tahoma'
|
||||
Footer.Font.Style = []
|
||||
Footer.FormatMask = '#,##0.00'
|
||||
Header.Alignment = taCenter
|
||||
Header.Caption = 'V'#253'r.'#269#237'slo'
|
||||
Header.Font.Charset = DEFAULT_CHARSET
|
||||
Header.Font.Color = clWindowText
|
||||
Header.Font.Height = -21
|
||||
Header.Font.Name = 'Tahoma'
|
||||
Header.Font.Style = []
|
||||
Header.ParentFont = False
|
||||
Index = 4
|
||||
PlaceholderText = 'Text Text'
|
||||
Position = 4
|
||||
Width = 230
|
||||
DataBinding.FieldName = 'FormaSN'
|
||||
end
|
||||
object colKsVeForme: TNxDBNumberColumn6
|
||||
Alignment = taCenter
|
||||
DrawingOptions = [doBackground, doContent, doCustom]
|
||||
Editing = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -21
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
Footer.Font.Charset = DEFAULT_CHARSET
|
||||
Footer.Font.Color = clWindowText
|
||||
Footer.Font.Height = -11
|
||||
Footer.Font.Name = 'Tahoma'
|
||||
Footer.Font.Style = []
|
||||
Footer.FormatMask = '#,##0.00'
|
||||
Header.Alignment = taCenter
|
||||
Header.Caption = 'Ks/forma'
|
||||
Header.Font.Charset = DEFAULT_CHARSET
|
||||
Header.Font.Color = clWindowText
|
||||
Header.Font.Height = -19
|
||||
Header.Font.Name = 'Tahoma'
|
||||
Header.Font.Style = []
|
||||
Header.ParentFont = False
|
||||
Index = 5
|
||||
Inserting = False
|
||||
ParentColor = False
|
||||
PlaceholderText = '1742'
|
||||
Position = 5
|
||||
Resizeable = False
|
||||
FormatMask = '#,##0'
|
||||
NumericEditOptions = []
|
||||
Precision = 0
|
||||
Increment = 1.000000000000000000
|
||||
SpinButtons = False
|
||||
DataBinding.FieldName = 'KsVeForme'
|
||||
InsertString = '0'
|
||||
end
|
||||
object colKsDobre: TNxDBNumberColumn6
|
||||
Alignment = taCenter
|
||||
Color = 9894289
|
||||
Editing = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -21
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
Footer.Font.Charset = DEFAULT_CHARSET
|
||||
Footer.Font.Color = clWindowText
|
||||
Footer.Font.Height = -11
|
||||
Footer.Font.Name = 'Tahoma'
|
||||
Footer.Font.Style = []
|
||||
Footer.FormatMask = '0'
|
||||
Header.Alignment = taCenter
|
||||
Header.Caption = 'Dobr'#233' ks'
|
||||
Header.Font.Charset = DEFAULT_CHARSET
|
||||
Header.Font.Color = clWindowText
|
||||
Header.Font.Height = -21
|
||||
Header.Font.Name = 'Tahoma'
|
||||
Header.Font.Style = []
|
||||
Header.ParentFont = False
|
||||
Header.Clickable = False
|
||||
Index = 6
|
||||
Inserting = False
|
||||
ParentColor = False
|
||||
PlaceholderText = '1742'
|
||||
Position = 6
|
||||
Resizeable = False
|
||||
Width = 100
|
||||
FormatMask = '#,##0'
|
||||
NumericEditOptions = []
|
||||
Precision = 0
|
||||
Increment = 1.000000000000000000
|
||||
SpinButtons = False
|
||||
DataBinding.FieldName = 'KsDobre'
|
||||
InsertString = '0'
|
||||
end
|
||||
object colZmetky1: TNxDBNumberColumn6
|
||||
Alignment = taCenter
|
||||
Editing = True
|
||||
Enabled = False
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -21
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
Footer.Font.Charset = DEFAULT_CHARSET
|
||||
Footer.Font.Color = clWindowText
|
||||
Footer.Font.Height = -11
|
||||
Footer.Font.Name = 'Tahoma'
|
||||
Footer.Font.Style = []
|
||||
Footer.FormatMask = '#,##0.00'
|
||||
Header.Alignment = taCenter
|
||||
Header.Caption = 'Z'
|
||||
Header.Font.Charset = DEFAULT_CHARSET
|
||||
Header.Font.Color = clWindowText
|
||||
Header.Font.Height = -19
|
||||
Header.Font.Name = 'Tahoma'
|
||||
Header.Font.Style = []
|
||||
Header.ParentFont = False
|
||||
Index = 7
|
||||
Inserting = False
|
||||
ParentColor = False
|
||||
PlaceholderText = '1742'
|
||||
Position = 7
|
||||
Resizeable = False
|
||||
Width = 110
|
||||
FormatMask = '#,##0'
|
||||
NumericEditOptions = []
|
||||
Precision = 0
|
||||
Increment = 1.000000000000000000
|
||||
SpinButtons = False
|
||||
DataBinding.FieldName = 'KsZmetky1'
|
||||
InsertString = '0'
|
||||
end
|
||||
object colZmetky2: TNxDBNumberColumn6
|
||||
Alignment = taCenter
|
||||
Editing = True
|
||||
Enabled = False
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -21
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
Footer.Font.Charset = DEFAULT_CHARSET
|
||||
Footer.Font.Color = clWindowText
|
||||
Footer.Font.Height = -11
|
||||
Footer.Font.Name = 'Tahoma'
|
||||
Footer.Font.Style = []
|
||||
Footer.FormatMask = '#,##0.00'
|
||||
Header.Alignment = taCenter
|
||||
Header.Caption = 'Z'
|
||||
Header.Font.Charset = DEFAULT_CHARSET
|
||||
Header.Font.Color = clWindowText
|
||||
Header.Font.Height = -19
|
||||
Header.Font.Name = 'Tahoma'
|
||||
Header.Font.Style = []
|
||||
Header.ParentFont = False
|
||||
Index = 8
|
||||
Inserting = False
|
||||
ParentColor = False
|
||||
PlaceholderText = '1742'
|
||||
Position = 8
|
||||
Resizeable = False
|
||||
Width = 110
|
||||
FormatMask = '#,##0'
|
||||
NumericEditOptions = []
|
||||
Precision = 0
|
||||
Increment = 1.000000000000000000
|
||||
SpinButtons = False
|
||||
DataBinding.FieldName = 'KsZmetky2'
|
||||
InsertString = '0'
|
||||
end
|
||||
object colZmetky3: TNxDBNumberColumn6
|
||||
Alignment = taCenter
|
||||
Editing = True
|
||||
Enabled = False
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -21
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
Footer.Font.Charset = DEFAULT_CHARSET
|
||||
Footer.Font.Color = clWindowText
|
||||
Footer.Font.Height = -11
|
||||
Footer.Font.Name = 'Tahoma'
|
||||
Footer.Font.Style = []
|
||||
Footer.FormatMask = '#,##0.00'
|
||||
Header.Alignment = taCenter
|
||||
Header.Caption = 'Z'
|
||||
Header.Font.Charset = DEFAULT_CHARSET
|
||||
Header.Font.Color = clWindowText
|
||||
Header.Font.Height = -19
|
||||
Header.Font.Name = 'Tahoma'
|
||||
Header.Font.Style = []
|
||||
Header.ParentFont = False
|
||||
Index = 9
|
||||
Inserting = False
|
||||
ParentColor = False
|
||||
PlaceholderText = '1742'
|
||||
Position = 9
|
||||
Resizeable = False
|
||||
Width = 110
|
||||
FormatMask = '#,##0'
|
||||
NumericEditOptions = []
|
||||
Precision = 0
|
||||
Increment = 1.000000000000000000
|
||||
SpinButtons = False
|
||||
DataBinding.FieldName = 'KsZmetky3'
|
||||
InsertString = '0'
|
||||
end
|
||||
end
|
||||
object grdX: TXDBGrid
|
||||
Left = 3
|
||||
Top = 439
|
||||
Width = 1476
|
||||
Height = 120
|
||||
DataSource = ds
|
||||
Enabled = False
|
||||
GridStyle.VisualStyle = vsStandard
|
||||
HeaderColor = clTeal
|
||||
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgExtendedSelect, dgInternalSelect, dgRowScroll, dgHotButtons, dgTitleButtons, dgTitleHeaders, dgTitleWidthOff, dgMarkerAutoAlign, dgMarkerAutoToggle]
|
||||
TabOrder = 8
|
||||
Columns = <
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'RegCis'
|
||||
Title.Alignment = taCenter
|
||||
Title.Caption = 'Reg.'#269'.'
|
||||
TotalFields.Visible = False
|
||||
Visible = True
|
||||
Width = 166
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'Zakazka'
|
||||
Title.Alignment = taCenter
|
||||
Title.Caption = 'Zak'#225'zka'
|
||||
TotalFields.Visible = False
|
||||
Visible = True
|
||||
Width = 123
|
||||
end
|
||||
item
|
||||
Expanded = False
|
||||
FieldName = 'Nazev'
|
||||
Title.Alignment = taCenter
|
||||
Title.Caption = 'Popis'
|
||||
TotalFields.Visible = False
|
||||
Visible = True
|
||||
Width = 227
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'Forma'
|
||||
LookupDataSet = tblFormaX
|
||||
LookupKeyField = 'RegCis'
|
||||
LookupListFields = 'Forma'
|
||||
TotalFields.Visible = False
|
||||
Visible = True
|
||||
Width = 155
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'FormaSN'
|
||||
Title.Caption = 'V'#253'r.'#269#237'slo'
|
||||
TotalFields.Visible = False
|
||||
Visible = True
|
||||
Width = 158
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'KsVeForme'
|
||||
Title.Caption = 'Ks/forma'
|
||||
TotalFields.Visible = False
|
||||
Visible = True
|
||||
Width = 89
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'KsDobre'
|
||||
Title.Caption = 'Dobr'#233' ks'
|
||||
Visible = True
|
||||
Width = 100
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'KsZmetky1'
|
||||
Title.Caption = 'Z'
|
||||
Visible = True
|
||||
Width = 115
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'KsZmetky2'
|
||||
Title.Caption = 'Z'
|
||||
Visible = True
|
||||
end
|
||||
item
|
||||
Alignment = taCenter
|
||||
Expanded = False
|
||||
FieldName = 'KsZmetky3'
|
||||
Title.Caption = 'Z'
|
||||
Visible = True
|
||||
Width = 103
|
||||
end>
|
||||
end
|
||||
object tbl: TVirtualTable
|
||||
FieldDefs = <
|
||||
item
|
||||
Name = 'IDPostup'
|
||||
DataType = ftInteger
|
||||
end
|
||||
item
|
||||
Name = 'RegCis'
|
||||
DataType = ftString
|
||||
Size = 20
|
||||
end
|
||||
item
|
||||
Name = 'Nazev'
|
||||
DataType = ftString
|
||||
Size = 100
|
||||
end
|
||||
item
|
||||
Name = 'KsDobre'
|
||||
DataType = ftSmallint
|
||||
end
|
||||
item
|
||||
Name = 'IDVyrCS'
|
||||
DataType = ftInteger
|
||||
end
|
||||
item
|
||||
Name = 'FormaSN'
|
||||
DataType = ftString
|
||||
Size = 30
|
||||
end
|
||||
item
|
||||
Name = 'IDradek'
|
||||
DataType = ftInteger
|
||||
end
|
||||
item
|
||||
Name = 'IDnaradi'
|
||||
DataType = ftInteger
|
||||
end
|
||||
item
|
||||
Name = 'KsZmetky1'
|
||||
DataType = ftInteger
|
||||
end
|
||||
item
|
||||
Name = 'KsZmetky2'
|
||||
DataType = ftInteger
|
||||
end
|
||||
item
|
||||
Name = 'KsZmetky3'
|
||||
DataType = ftInteger
|
||||
end
|
||||
item
|
||||
Name = 'KsVeForme'
|
||||
DataType = ftInteger
|
||||
end
|
||||
item
|
||||
Name = 'Forma'
|
||||
DataType = ftString
|
||||
Size = 30
|
||||
end>
|
||||
Left = 124
|
||||
Top = 107
|
||||
Data = {
|
||||
04000D0008004944506F73747570030000000000000006005265674369730100
|
||||
14000000000005004E617A6576010064000000000007004B73446F6272650200
|
||||
00000000000007004944567972435303000000000000000700466F726D61534E
|
||||
01001E000000000007004944726164656B0300000000000000080049446E6172
|
||||
616469030000000000000009004B735A6D65746B793103000000000000000900
|
||||
4B735A6D65746B7932030000000000000009004B735A6D65746B793303000000
|
||||
0000000009004B735665466F726D6503000000000000000500466F726D610100
|
||||
1E0000000000000000000000}
|
||||
object tblIDPrPostup: TIntegerField
|
||||
FieldName = 'IDPostup'
|
||||
Visible = False
|
||||
end
|
||||
object tblRegCis: TStringField
|
||||
FieldName = 'RegCis'
|
||||
end
|
||||
object tblNazev: TStringField
|
||||
FieldName = 'Nazev'
|
||||
Size = 100
|
||||
end
|
||||
object tblKsDobre: TSmallintField
|
||||
FieldName = 'KsDobre'
|
||||
end
|
||||
object tblIDVyrCS: TIntegerField
|
||||
FieldName = 'IDVyrCS'
|
||||
Visible = False
|
||||
end
|
||||
object tblFormaSN: TStringField
|
||||
FieldName = 'FormaSN'
|
||||
Size = 30
|
||||
end
|
||||
object tblIDradek: TIntegerField
|
||||
FieldName = 'IDradek'
|
||||
Visible = False
|
||||
end
|
||||
object tblIDnaradi: TIntegerField
|
||||
FieldName = 'IDnaradi'
|
||||
Visible = False
|
||||
end
|
||||
object tblKsZmetky1: TIntegerField
|
||||
FieldName = 'KsZmetky1'
|
||||
end
|
||||
object tblKsZmetky2: TIntegerField
|
||||
FieldName = 'KsZmetky2'
|
||||
end
|
||||
object tblKsZmetky3: TIntegerField
|
||||
FieldName = 'KsZmetky3'
|
||||
end
|
||||
object tblKsNaPlate: TIntegerField
|
||||
FieldName = 'KsVeForme'
|
||||
end
|
||||
object tblForma: TStringField
|
||||
FieldName = 'Forma'
|
||||
LookupKeyFields = 'RegCis'
|
||||
LookupResultField = 'Forma'
|
||||
Size = 30
|
||||
end
|
||||
object tblcolZakazka: TStringField
|
||||
FieldName = 'Zakazka'
|
||||
Size = 15
|
||||
end
|
||||
end
|
||||
object ds: TDataSource
|
||||
DataSet = tbl
|
||||
Left = 73
|
||||
Top = 107
|
||||
end
|
||||
object dsForma: TDataSource
|
||||
DataSet = tblFormaX
|
||||
Left = 196
|
||||
Top = 110
|
||||
end
|
||||
object tblFormaX: TVirtualTable
|
||||
Left = 252
|
||||
Top = 111
|
||||
Data = {04000000000000000000}
|
||||
object tblFormaXRegCis: TStringField
|
||||
FieldName = 'RegCis'
|
||||
Size = 30
|
||||
end
|
||||
object tblFormaXForma: TStringField
|
||||
FieldName = 'Forma'
|
||||
Size = 30
|
||||
end
|
||||
end
|
||||
end
|
||||
Reference in New Issue
Block a user