home *** CD-ROM | disk | FTP | other *** search
- object NakladyQReport: TNakladyQReport
- Left = 0
- Top = 0
- Width = 794
- Height = 1123
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- BeforePrint = NakladyQReportBeforePrint
- DataSet = ZakazkyTbl
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- Options = [FirstPageHeader, LastPageFooter]
- Page.Columns = 1
- Page.Orientation = poPortrait
- Page.PaperSize = A4
- Page.Values = (
- 100.000000000000000000
- 2970.000000000000000000
- 100.000000000000000000
- 2100.000000000000000000
- 100.000000000000000000
- 100.000000000000000000
- 0.000000000000000000)
- PrintIfEmpty = False
- PrinterSettings.Copies = 1
- PrinterSettings.Duplex = False
- PrinterSettings.FirstPage = 0
- PrinterSettings.LastPage = 0
- PrinterSettings.OutputBin = First
- ReportTitle = 'P�ehled n�klad�'
- SnapToGrid = True
- Units = MM
- Zoom = 100
- object QRBand1: TQRBand
- Left = 38
- Top = 38
- Width = 718
- Height = 40
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- Color = clWhite
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 105.833333333333300000
- 1899.708333333332000000)
- BandType = rbPageHeader
- object QRLabel1: TQRLabel
- Left = 0
- Top = 0
- Width = 717
- Height = 30
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 79.375000000000000000
- 0.000000000000000000
- 0.000000000000000000
- 1897.062500000000000000)
- Alignment = taCenter
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Caption = 'P�ehled n�klad� na jednotliv� zak�zky'
- Color = clWhite
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -24
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 18
- end
- end
- object DetailBand: TQRBand
- Left = 38
- Top = 78
- Width = 718
- Height = 43
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- BeforePrint = DetailBandBeforePrint
- Color = clWhite
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 113.770833333333300000
- 1899.708333333332000000)
- BandType = rbDetail
- object QRDBText1: TQRDBText
- Left = 16
- Top = 20
- Width = 83
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 42.333333333333340000
- 52.916666666666660000
- 219.604166666666600000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazkyTbl
- DataField = 'CisloZakazky'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- end
- object QRBand2: TQRBand
- Left = 38
- Top = 217
- Width = 718
- Height = 40
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- Color = clWhite
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 105.833333333333300000
- 1899.708333333332000000)
- BandType = rbGroupFooter
- object QRSysData1: TQRSysData
- Left = 0
- Top = 16
- Width = 718
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 0.000000000000000000
- 42.333333333333340000
- 1899.708333333332000000)
- Alignment = taCenter
- AlignToBand = False
- AutoSize = False
- Color = clWhite
- Data = qrsPageNumber
- Transparent = False
- FontSize = 10
- end
- end
- object QRSubDetail1: TQRSubDetail
- Left = 38
- Top = 145
- Width = 718
- Height = 25
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- Color = clWhite
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 66.145833333333330000
- 1899.708333333332000000)
- Master = Owner
- DataSet = NakladyTbl
- FooterBand = QRBand3
- HeaderBand = QRBand4
- PrintBefore = False
- PrintIfEmpty = False
- object QRDBText2: TQRDBText
- Left = 96
- Top = 3
- Width = 329
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666670000
- 254.000000000000000000
- 7.937500000000000000
- 870.479166666666700000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = NakladyTbl
- DataField = 'Popis'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRDBText3: TQRDBText
- Left = 431
- Top = 3
- Width = 130
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666670000
- 1140.354166666667000000
- 7.937500000000000000
- 343.958333333333400000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = NakladyTbl
- DataField = 'Zapsal'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRDBText4: TQRDBText
- Left = 2
- Top = 3
- Width = 73
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666670000
- 5.291666666666667000
- 7.937500000000000000
- 193.145833333333300000)
- Alignment = taRightJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazkyTbl
- DataField = 'Datum'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRDBText5: TQRDBText
- Left = 576
- Top = 3
- Width = 121
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666670000
- 1524.000000000000000000
- 7.937500000000000000
- 320.145833333333400000)
- Alignment = taRightJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = NakladyTbl
- DataField = 'Cena'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- end
- object QRBand3: TQRBand
- Left = 38
- Top = 170
- Width = 718
- Height = 47
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- Color = clWhite
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 124.354166666666700000
- 1899.708333333332000000)
- BandType = rbGroupFooter
- object QRExpr1: TQRExpr
- Left = 568
- Top = 8
- Width = 129
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666670000
- 1502.833333333333000000
- 21.166666666666670000
- 341.312500000000000000)
- Alignment = taRightJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- Color = clWhite
- Master = QRSubDetail1
- ParentFont = False
- ResetAfterPrint = True
- Transparent = False
- WordWrap = True
- Expression = 'SUM(NakladyTbl.Cena)'
- FontSize = 10
- end
- object QRLabel5: TQRLabel
- Left = 512
- Top = 8
- Width = 53
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 1354.666666666667000000
- 21.166666666666670000
- 140.229166666666700000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'Celkem:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRShape1: TQRShape
- Left = 506
- Top = 1
- Width = 197
- Height = 1
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 2.645833333333334000
- 1338.791666666667000000
- 2.645833333333334000
- 521.229166666666700000)
- Shape = qrsHorLine
- end
- end
- object QRBand4: TQRBand
- Left = 38
- Top = 121
- Width = 718
- Height = 24
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = True
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- Color = clWhite
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 63.500000000000000000
- 1899.708333333332000000)
- BandType = rbGroupHeader
- object QRLabel4: TQRLabel
- Left = 32
- Top = 3
- Width = 39
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 84.666666666666670000
- 7.937500000000000000
- 103.187500000000000000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'Datum'
- Color = clWhite
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRLabel2: TQRLabel
- Left = 96
- Top = 3
- Width = 78
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 254.000000000000000000
- 7.937500000000000000
- 206.375000000000000000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'Popis v�daj�:'
- Color = clWhite
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRLabel3: TQRLabel
- Left = 432
- Top = 3
- Width = 43
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 1143.000000000000000000
- 7.937500000000000000
- 113.770833333333300000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'Zapsal:'
- Color = clWhite
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- end
- object NakladyTbl: TTable
- Active = True
- Filter = 'Stornoval='#39#39
- Filtered = True
- DatabaseName = 'RealityDB'
- IndexName = 'CisloZakazky_Ind'
- MasterFields = 'CisloZakazky'
- MasterSource = ZakazkyDS
- TableName = 'Naklady.DB'
- Left = 184
- Top = 336
- object NakladyTblCisloZaznamu: TAutoIncField
- FieldName = 'CisloZaznamu'
- end
- object NakladyTblCisloZakazky: TStringField
- FieldName = 'CisloZakazky'
- Required = True
- Size = 30
- end
- object NakladyTblDatum: TDateField
- FieldName = 'Datum'
- Required = True
- end
- object NakladyTblPopis: TStringField
- FieldName = 'Popis'
- Size = 40
- end
- object NakladyTblCena: TCurrencyField
- FieldName = 'Cena'
- Required = True
- end
- object NakladyTblZapsal: TStringField
- FieldName = 'Zapsal'
- Required = True
- end
- object NakladyTblStornoval: TStringField
- FieldName = 'Stornoval'
- end
- end
- object ZakazkyTbl: TTable
- Active = True
- DatabaseName = 'RealityDB'
- IndexFieldNames = 'CisloZakazky'
- TableName = 'Zakazky.DB'
- Left = 120
- Top = 336
- end
- object ZakazkyDS: TDataSource
- DataSet = ZakazkyTbl
- Left = 56
- Top = 336
- end
- end
-