object InfoForm: TInfoForm Left = 232 Top = 170 BorderIcons = [biSystemMenu] AutoScroll = False Caption = 'Information' ClientHeight = 225 ClientWidth = 349 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OnClose = FormClose OnCreate = CreateInfoForm OnDestroy = DestroyInfoForm OnKeyPress = FormKeyPress OnResize = FormResize PixelsPerInch = 96 TextHeight = 13 object InfoScrollBox: TScrollBox Left = 0 Top = 0 Width = 349 Height = 191 Align = alTop BorderStyle = bsNone Font.Color = clBlack Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 object InfoPaintBox: TPaintBox Left = 0 Top = 0 Width = 349 Height = 191 Align = alClient Font.Color = clBlack Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False OnPaint = InfoPaint end end object CopyBtn: TButton Left = 172 Top = 200 Width = 81 Height = 22 Caption = '&Copy' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = CopyBtnClick OnKeyPress = FormKeyPress end object ExitBtn: TButton Left = 264 Top = 200 Width = 81 Height = 22 Caption = '&Ok' Default = True Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 1 ParentFont = False TabOrder = 2 OnClick = ExitBtnClick OnKeyPress = FormKeyPress end object Separator: TPanel Left = 0 Top = 193 Width = 349 Height = 2 BevelOuter = bvLowered TabOrder = 3 end end