object PoliciesForm: TPoliciesForm Left = 311 Top = 109 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'PoliciesForm' ClientHeight = 260 ClientWidth = 427 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Frame: TGroupBox Left = 8 Top = 12 Width = 413 Height = 209 Caption = 'POLICIES' Font.Color = clMaroon Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 0 object Memo: TMemo Left = 8 Top = 25 Width = 397 Height = 175 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True ScrollBars = ssVertical TabOrder = 0 end end object OKButton: TButton Left = 368 Top = 228 Width = 52 Height = 25 Cancel = True Caption = '&OK' ModalResult = 2 TabOrder = 1 end object PrintButton: TButton Left = 313 Top = 228 Width = 52 Height = 25 Caption = '&Print' TabOrder = 2 OnClick = PrintButtonClick end end