object Freport: TFreport Left = 268 Top = 137 Width = 723 Height = 422 Caption = 'Report' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter PrintScale = poNone Scaled = False PixelsPerInch = 120 TextHeight = 16 object Button1: TButton Left = 248 Top = 344 Width = 89 Height = 33 Caption = 'Close' TabOrder = 0 OnClick = Button1Click end object Button2: TButton Left = 400 Top = 344 Width = 83 Height = 33 Caption = 'Print' TabOrder = 1 OnClick = Button2Click end object RichEdit1: TRichEdit Left = 0 Top = 0 Width = 715 Height = 321 Align = alTop Lines.Strings = ( 'RichEdit1') ReadOnly = True ScrollBars = ssBoth TabOrder = 2 WordWrap = False end end