inherited ExceptionDialog: TExceptionDialog Left = 363 Top = 284 ActiveControl = OkBtn AutoScroll = False BorderIcons = [biSystemMenu] Caption = 'ExceptionDialog' ClientHeight = 305 ClientWidth = 418 Constraints.MinWidth = 200 KeyPreview = True OldCreateOrder = True Position = poScreenCenter ShowHint = True OnCreate = FormCreate OnDestroy = FormDestroy OnKeyDown = FormKeyDown OnPaint = FormPaint OnResize = FormResize OnShow = FormShow DesignSize = ( 418 305) PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 3 Top = 91 Width = 414 Height = 9 Anchors = [akLeft, akTop, akRight] Shape = bsTopLine end object Label1: TLabel Left = 8 Top = 104 Width = 209 Height = 13 Caption = 'Please report this error to my e-mail address: ' end object lblMail: TLabel Left = 218 Top = 104 Width = 84 Height = 13 Cursor = crHandPoint Hint = 'mailto:slavek@rydval.cz' Caption = 'slavek@rydval.cz' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = False OnClick = lblMailClick end object OkBtn: TButton Left = 338 Top = 4 Width = 75 Height = 25 Anchors = [akTop, akRight] Caption = '&OK' Default = True ModalResult = 1 TabOrder = 1 end object DetailsMemo: TMemo Left = 4 Top = 128 Width = 410 Height = 173 Anchors = [akLeft, akTop, akRight, akBottom] Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentColor = True ParentFont = False ReadOnly = True ScrollBars = ssBoth TabOrder = 3 WantReturns = False WordWrap = False end object DetailsBtn: TButton Left = 338 Top = 60 Width = 75 Height = 25 Hint = 'Show or hide additional information|' Anchors = [akTop, akRight] Caption = '&Details' Enabled = False TabOrder = 2 OnClick = DetailsBtnClick end object TextLabel: TMemo Left = 56 Top = 8 Width = 267 Height = 75 Hint = 'Use Ctrl+C to copy the report to the clipboard' Anchors = [akLeft, akTop, akRight] BorderStyle = bsNone Ctl3D = True Lines.Strings = ( 'TextLabel') ParentColor = True ParentCtl3D = False ReadOnly = True TabOrder = 0 WantReturns = False end object HelpBtn: TButton Left = 338 Top = 32 Width = 75 Height = 25 Anchors = [akTop, akRight] Caption = 'Help' TabOrder = 4 OnClick = HelpBtnClick end end