object ExceptorForm: TExceptorForm Left = 241 Top = 196 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Shit happens... Don'#39't panic!' ClientHeight = 221 ClientWidth = 427 Color = clNone Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Position = poScreenCenter Scaled = False OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 14 object Label1: TLabel Left = 0 Top = 12 Width = 427 Height = 47 Align = alTop Alignment = taCenter AutoSize = False Caption = 'KaBoom?!?' Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 0 Top = 59 Width = 427 Height = 30 Align = alTop Alignment = taCenter AutoSize = False Caption = 'System just caused an unexpected error with message:' Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object lb_Error: TLabel Left = 0 Top = 89 Width = 427 Height = 30 Align = alTop Alignment = taCenter AutoSize = False Caption = 'Error Message' Font.Color = clRed Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 0 Top = 158 Width = 427 Height = 29 Align = alTop Alignment = taCenter AutoSize = False Caption = 'Call Sight && Sound tech support at tel/fax: +386 62 622 044, 62' + '1-161' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object lb_errtype: TLabel Left = 0 Top = 119 Width = 427 Height = 39 Align = alTop Alignment = taCenter AutoSize = False Caption = 'Error type' Font.Color = clRed Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object separator: TLabel Left = 0 Top = 0 Width = 427 Height = 12 Align = alTop AutoSize = False end object imgVenec: TImage Left = 6 Top = 6 Width = 48 Height = 48 Picture.Data = {} Stretch = True Visible = False end object btn_OK: TButton Left = 75 Top = 189 Width = 75 Height = 21 Caption = '&OK' Default = True TabOrder = 0 OnClick = btn_OKClick end object btnTerminate: TButton Left = 277 Top = 189 Width = 75 Height = 21 Caption = '&Terminate' TabOrder = 1 OnClick = btnTerminateClick end object btnHelp: TButton Left = 176 Top = 189 Width = 75 Height = 21 Caption = '&Help' TabOrder = 2 OnClick = btnHelpClick end end