object ReportForm: TReportForm Left = 124 Top = 147 BorderStyle = bsDialog Caption = 'Report Status Screen' ClientHeight = 130 ClientWidth = 364 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] Position = poScreenCenter OnActivate = FormActivate OnCreate = FormCreate OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 16 object Label1: TLabel Left = 8 Top = 16 Width = 346 Height = 58 Alignment = taCenter AutoSize = False Caption = 'Printing Status' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object BitBtn1: TBitBtn Left = 136 Top = 88 Width = 90 Height = 34 Caption = '&Cancel' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = BitBtn1Click Kind = bkCancel end object ReportPrinter1: TReportPrinter StatusLabel = Label1 StatusFormat = 'Printing Page %p' LineHeightMethod = lhmFont UnitsFactor = 1.000000000000000000 MarginLeft = 0.500000000000000000 MarginRight = 0.500000000000000000 MarginTop = 0.500000000000000000 MarginBottom = 0.500000000000000000 Title = 'Report' Orientation = poPortrait ScaleX = 100.000000000000000000 ScaleY = 100.000000000000000000 Left = 8 Top = 96 end object ReportFiler1: TReportFiler StatusLabel = Label1 StatusFormat = 'Printing page %p' LineHeightMethod = lhmFont UnitsFactor = 1.000000000000000000 MarginLeft = 0.500000000000000000 MarginRight = 0.500000000000000000 MarginTop = 0.500000000000000000 MarginBottom = 0.500000000000000000 Title = 'Report' Orientation = poPortrait ScaleX = 100.000000000000000000 ScaleY = 100.000000000000000000 FileName = 'TEMP.RPT' StreamMode = smUser Left = 40 Top = 96 end object Timer1: TTimer Enabled = False Interval = 500 OnTimer = Timer1Timer Left = 80 Top = 96 end end