home *** CD-ROM | disk | FTP | other *** search
- object fmRaReport: TfmRaReport
- Left = 228
- Top = 138
- Width = 812
- Height = 541
- Caption = 'Report'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Scaled = False
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Report: TQuickRep
- Left = 8
- Top = 16
- Width = 794
- Height = 1123
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -15
- Font.Name = 'Courier New'
- Font.Pitch = fpFixed
- Font.Style = []
- OnPreview = ReportPreview
- Options = [LastPageFooter]
- Page.Columns = 1
- Page.Orientation = poPortrait
- Page.PaperSize = A4
- Page.Values = (
- 84.666666666666700000
- 2970.000000000000000000
- 84.666666666666700000
- 2100.000000000000000000
- 91.016666666666690000
- 91.016666666666690000
- 0.000000000000000000)
- PrintIfEmpty = False
- PrinterSettings.Copies = 1
- PrinterSettings.Duplex = False
- PrinterSettings.FirstPage = 0
- PrinterSettings.LastPage = 0
- PrinterSettings.OutputBin = First
- ReportTitle = 'Report'
- SnapToGrid = False
- Units = MM
- Zoom = 100
- object PageFooterBand: TQRaBand
- Left = 34
- Top = 226
- Width = 725
- Height = 48
- 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 = (
- 127.000000000000000000
- 1918.229166666667000000)
- BandType = rbPageFooter
- object QRlbOrgName: TQRLabel
- Left = 0
- Top = 32
- Width = 416
- Height = 19
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 50.270833333333300000
- 0.000000000000000000
- 84.666666666666700000
- 1100.666666666670000000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Caption = 'Noname inc.'
- Color = clWhite
- OnPrint = QRlbOrgNamePrint
- Transparent = False
- WordWrap = True
- FontSize = 11
- end
- object qrlbUser: TQRaLabel
- Left = 0
- Top = 16
- Width = 482
- Height = 18
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 47.625000000000000000
- 0.000000000000000000
- 42.333333333333300000
- 1275.291666666670000000)
- LeftInChars = 0
- WidthInChars = 50
- TopInChars = 1
- Alignment = taLeftJustify
- Caption = 'User: Ivanoff Ivan'
- Color = clWhite
- OnPrint = qrlbUserPrint
- Transparent = True
- AutoSizing = False
- FontSize = 11
- end
- object QRLabel3: TQRLabel
- Left = 457
- Top = 32
- Width = 152
- Height = 15
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 39.687500000000000000
- 1209.145833333333000000
- 84.666666666666670000
- 402.166666666666700000)
- Alignment = taRightJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'Copyright (c) 1998-%s Alex Soft'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Times New Roman'
- Font.Pitch = fpFixed
- Font.Style = [fsItalic]
- OnPrint = QRLabel3Print
- ParentFont = False
- Transparent = True
- WordWrap = True
- FontSize = 8
- end
- end
- object TitleBand: TQRBand
- Left = 34
- Top = 64
- Width = 725
- Height = 32
- 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 = (
- 84.666666666666670000
- 1918.229166666667000000)
- BandType = rbTitle
- object QRSysData1: TQRSysData
- Left = 0
- Top = 0
- Width = 433
- Height = 25
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 66.145833333333300000
- 0.000000000000000000
- 0.000000000000000000
- 1145.645833333330000000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- Color = clWhite
- Data = qrsReportTitle
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Courier New'
- Font.Pitch = fpFixed
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = False
- FontSize = 12
- end
- object QRSysData3: TQRSysData
- Left = 440
- Top = 0
- Width = 100
- Height = 19
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 50.270833333333300000
- 1164.166666666670000000
- 0.000000000000000000
- 264.583333333333000000)
- Alignment = taRightJustify
- AlignToBand = False
- AutoSize = False
- Color = clWhite
- Data = qrsDate
- Transparent = False
- FontSize = 11
- end
- end
- object PageHeaderBand: TQRaBand
- Left = 34
- Top = 32
- Width = 725
- Height = 32
- 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 = (
- 84.666666666666670000
- 1918.229166666667000000)
- BandType = rbPageHeader
- object QRSysData4: TQRSysData
- Left = 0
- Top = 0
- Width = 433
- Height = 19
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 50.270833333333300000
- 0.000000000000000000
- 0.000000000000000000
- 1145.645833333330000000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- Color = clWhite
- Data = qrsReportTitle
- Transparent = False
- FontSize = 11
- end
- object QRaSysData1: TQRSysData
- Left = 191
- Top = 16
- Width = 98
- Height = 19
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 50.270833333333300000
- 505.354166666667000000
- 42.333333333333300000
- 259.291666666667000000)
- Alignment = taCenter
- AlignToBand = False
- AutoSize = False
- Color = clWhite
- Data = qrsPageNumber
- Text = 'Page '
- Transparent = False
- FontSize = 11
- end
- object QRSysData2: TQRSysData
- Left = 440
- Top = 0
- Width = 100
- Height = 19
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 50.270833333333300000
- 1164.166666666670000000
- 0.000000000000000000
- 264.583333333333000000)
- Alignment = taRightJustify
- AlignToBand = False
- AutoSize = False
- Color = clWhite
- Data = qrsDate
- Transparent = False
- FontSize = 11
- end
- end
- object DetailBand: TQRaBand
- Left = 34
- Top = 161
- Width = 725
- Height = 65
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- Color = clWhite
- Enabled = False
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 171.979166666666700000
- 1918.229166666667000000)
- BandType = rbDetail
- end
- object ColumnHeaderBand: TQRaBand
- Left = 34
- Top = 96
- Width = 725
- Height = 65
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- Color = clWhite
- Enabled = False
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 171.979166666666700000
- 1918.229166666667000000)
- BandType = rbColumnHeader
- end
- end
- end
-