home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 August - Disc 3 / chip_20018103_hu.iso / honosito / internet / the_bat.exe / thebat.exe / 0 / RCDATA / TMESSAGETICKER / TMESSAGETICKER.txt
Encoding:
Text File  |  2001-06-19  |  3.6 KB  |  165 lines
  1. object MessageTicker: TMessageTicker
  2.   Left = 333
  3.   Top = 173
  4.   BorderStyle = bsNone
  5.   ClientHeight = 54
  6.   ClientWidth = 528
  7.   Color = clBlack
  8.   Font.Color = clBlack
  9.   Font.Height = -8
  10.   Font.Name = 'Small Fonts'
  11.   Font.Style = []
  12.   FormStyle = fsStayOnTop
  13.   PopupMenu = PopupMenu1
  14.   OnClose = FormClose
  15.   OnCreate = FormCreate
  16.   OnHide = FormHide
  17.   OnResize = FormResize
  18.   PixelsPerInch = 96
  19.   TextHeight = 10
  20.   object bImage: TDrawPanel
  21.     Left = 0
  22.     Top = 0
  23.     Width = 528
  24.     Height = 54
  25.     Align = alClient
  26.     BevelOuter = bvNone
  27.     Color = clBlack
  28.     Font.Color = clBlack
  29.     Font.Height = -8
  30.     Font.Name = 'Lucida Sans Unicode'
  31.     Font.Style = []
  32.     ParentFont = False
  33.     TabOrder = 0
  34.     OnDblClick = bImageDblClick
  35.     OnMouseDown = bImageMouseDown
  36.     OnMouseMove = bImageMouseMove
  37.     OnMouseUp = bImageMouseUp
  38.     OnResize = bImageResize
  39.     OnRepaint = bImageRepaint
  40.   end
  41.   object PopupMenu1: TPopupMenu
  42.     OnPopup = PopupMenu1Popup
  43.     Left = 202
  44.     Top = 18
  45.     object mHide: TMenuItem
  46.       Caption = '&Hide'
  47.       ShortCut = 0
  48.       OnClick = mHideClick
  49.     end
  50.     object mOnTop: TMenuItem
  51.       Caption = '&Always on top'
  52.       Checked = True
  53.       ShortCut = 0
  54.       OnClick = mOnTopClick
  55.     end
  56.     object mZoom: TMenuItem
  57.       Caption = 'Auto-&Zoom'
  58.       Checked = True
  59.       ShortCut = 0
  60.       OnClick = mZoomClick
  61.     end
  62.     object mShort: TMenuItem
  63.       Caption = '&Thin view'
  64.       Checked = True
  65.       ShortCut = 0
  66.       OnClick = mShortClick
  67.     end
  68.     object Messages1: TMenuItem
  69.       Caption = '&Messages'
  70.       GroupIndex = 11
  71.       ShortCut = 0
  72.       object mNormal: TMenuItem
  73.         Caption = '&Normal priority'
  74.         Checked = True
  75.         ShortCut = 0
  76.         OnClick = mNormalClick
  77.       end
  78.       object mHigh: TMenuItem
  79.         Caption = '&High priority'
  80.         Checked = True
  81.         ShortCut = 0
  82.         OnClick = mNormalClick
  83.       end
  84.       object mLow: TMenuItem
  85.         Caption = '&Low priority'
  86.         Checked = True
  87.         ShortCut = 0
  88.         OnClick = mNormalClick
  89.       end
  90.       object N3: TMenuItem
  91.         Caption = '-'
  92.         ShortCut = 0
  93.       end
  94.       object mAgeLimits: TMenuItem
  95.         Caption = '&Age Limits...'
  96.         ShortCut = 0
  97.         OnClick = mAgeLimitsClick
  98.       end
  99.       object mmHideAll: TMenuItem
  100.         Caption = 'Hide &all'
  101.         ShortCut = 0
  102.         Visible = False
  103.         OnClick = mmHideAllClick
  104.       end
  105.       object mmShowHidden: TMenuItem
  106.         Caption = '&Show hidden'
  107.         Enabled = False
  108.         ShortCut = 0
  109.         Visible = False
  110.         OnClick = mmShowHiddenClick
  111.       end
  112.     end
  113.     object N1: TMenuItem
  114.       Caption = '-'
  115.       GroupIndex = 11
  116.       ShortCut = 0
  117.     end
  118.     object msFaster: TMenuItem
  119.       Tag = -1
  120.       Caption = '&Faster'
  121.       GroupIndex = 11
  122.       RadioItem = True
  123.       ShortCut = 0
  124.       OnClick = msFasterClick
  125.     end
  126.     object msNormal: TMenuItem
  127.       Caption = '&Normal'
  128.       Checked = True
  129.       GroupIndex = 11
  130.       RadioItem = True
  131.       ShortCut = 0
  132.       OnClick = msFasterClick
  133.     end
  134.     object msSlower: TMenuItem
  135.       Tag = 1
  136.       Caption = '&Slower'
  137.       GroupIndex = 11
  138.       RadioItem = True
  139.       ShortCut = 0
  140.       OnClick = msFasterClick
  141.     end
  142.     object N2: TMenuItem
  143.       Caption = '-'
  144.       GroupIndex = 11
  145.       ShortCut = 0
  146.     end
  147.     object Font1: TMenuItem
  148.       Caption = 'Font...'
  149.       GroupIndex = 11
  150.       ShortCut = 0
  151.       OnClick = Font1Click
  152.     end
  153.   end
  154.   object FontDialog1: TFontDialog
  155.     Font.Color = clBlack
  156.     Font.Height = -11
  157.     Font.Name = 'MS Sans Serif'
  158.     Font.Style = []
  159.     MinFontSize = 0
  160.     MaxFontSize = 0
  161.     Left = 144
  162.     Top = 16
  163.   end
  164. end
  165.