object FormRtfReport: TFormRtfReport Left = 245 Top = 163 Width = 856 Height = 587 Caption = 'FormRtfReport' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Scaled = False PixelsPerInch = 96 TextHeight = 13 object QReport: TQuickRep Left = 0 Top = 0 Width = 794 Height = 1123 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] Functions.Strings = ( 'PAGENUMBER' 'COLUMNNUMBER' 'REPORTTITLE') Functions.DATA = ( '0' '0' #39#39) OnPreview = QReportPreview 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) PrinterSettings.Copies = 1 PrinterSettings.Duplex = False PrinterSettings.FirstPage = 0 PrinterSettings.LastPage = 0 PrinterSettings.OutputBin = Auto PrintIfEmpty = True SnapToGrid = True Units = MM Zoom = 100 object QRBand1: TQRBand Left = 38 Top = 38 Width = 718 Height = 1049 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 = ( 2775.479166666667000000 1899.708333333333000000) BandType = rbDetail object QRRichText: TQRRichText Left = 0 Top = 0 Width = 717 Height = 1047 Frame.Color = clBlack Frame.DrawTop = False Frame.DrawBottom = False Frame.DrawLeft = False Frame.DrawRight = False Size.Values = ( 2770.187500000000000000 0.000000000000000000 0.000000000000000000 1897.062500000000000000) Alignment = taLeftJustify AutoStretch = True Color = clWindow Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] end end end end