home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 November / Chip_2002-11_cd1.bin / ctenari / Hadraba / Source / ErrorForm.dfm < prev    next >
Text File  |  2002-06-12  |  2KB  |  75 lines
  1. object ErrorForm1: TErrorForm1
  2.   Left = 336
  3.   Top = 290
  4.   BorderIcons = [biSystemMenu]
  5.   BorderStyle = bsDialog
  6.   Caption = 'AutoRun Internal error handler'
  7.   ClientHeight = 129
  8.   ClientWidth = 377
  9.   Color = clWhite
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   KeyPreview = True
  16.   OldCreateOrder = False
  17.   Position = poDesktopCenter
  18.   OnKeyDown = FormKeyDown
  19.   PixelsPerInch = 96
  20.   TextHeight = 13
  21.   object CloseSpeedButton1: TSpeedButton
  22.     Left = 144
  23.     Top = 88
  24.     Width = 89
  25.     Height = 25
  26.     Caption = 'Close'
  27.     Flat = True
  28.     Font.Charset = DEFAULT_CHARSET
  29.     Font.Color = clRed
  30.     Font.Height = -11
  31.     Font.Name = 'MS Sans Serif'
  32.     Font.Style = [fsBold]
  33.     ParentFont = False
  34.     OnClick = CloseSpeedButton1Click
  35.   end
  36.   object Memo1: TMemo
  37.     Left = 8
  38.     Top = 24
  39.     Width = 361
  40.     Height = 33
  41.     Alignment = taCenter
  42.     BorderStyle = bsNone
  43.     Lines.Strings = (
  44.       'AutoRun generates internal error. Application will be closed.'
  45.       'For more informations, please, contact Hadraba-Soft company.')
  46.     ReadOnly = True
  47.     TabOrder = 0
  48.   end
  49.   object EMailKeyStaticText1: TStaticText
  50.     Left = 160
  51.     Top = 62
  52.     Width = 17
  53.     Height = 17
  54.     Caption = '[C]'
  55.     TabOrder = 1
  56.     OnClick = EMailStaticText1Click
  57.   end
  58.   object EMailStaticText1: TStaticText
  59.     Left = 16
  60.     Top = 61
  61.     Width = 140
  62.     Height = 20
  63.     Cursor = crHandPoint
  64.     Caption = 'hadrabap@volny.cz'
  65.     Font.Charset = EASTEUROPE_CHARSET
  66.     Font.Color = clBlue
  67.     Font.Height = -13
  68.     Font.Name = 'Courier New'
  69.     Font.Style = [fsBold, fsUnderline]
  70.     ParentFont = False
  71.     TabOrder = 2
  72.     OnClick = EMailStaticText1Click
  73.   end
  74. end
  75.