home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / Runimage / Delphi50 / Bin / PROIDE50.BPL / 0 / RCDATA / TDEBUGLOGVIEW / TDEBUGLOGVIEW.txt
Encoding:
Text File  |  1999-08-11  |  1.9 KB  |  81 lines
  1. inherited DebugLogView: TDebugLogView
  2.   Left = 285
  3.   Top = 180
  4.   Width = 417
  5.   Height = 291
  6.   HorzScrollBar.Increment = 36
  7.   VertScrollBar.Increment = 23
  8.   Caption = 'Event Log'
  9.   PopupMenu = LogPopupMenu
  10.   Position = poScreenCenter
  11.   OnResize = FormResize
  12.   OnShow = FormShow
  13.   PixelsPerInch = 96
  14.   TextHeight = 13
  15.   object LogList: TStringGrid [0]
  16.     Left = 0
  17.     Top = 0
  18.     Width = 409
  19.     Height = 264
  20.     Align = alClient
  21.     ColCount = 1
  22.     FixedCols = 0
  23.     RowCount = 1
  24.     FixedRows = 0
  25.     Options = [goRangeSelect, goDrawFocusSelected, goThumbTracking]
  26.     TabOrder = 0
  27.     OnDrawCell = LogListDrawCell
  28.   end
  29.   object LogPopupMenu: TPopupMenu
  30.     HelpContext = 4755
  31.     OnPopup = LogPopupMenuPopup
  32.     Left = 56
  33.     Top = 72
  34.     object ClearLogItem: TMenuItem
  35.       Caption = '&Clear Events'
  36.       OnClick = ClearLogItemClick
  37.     end
  38.     object SaveLogItem: TMenuItem
  39.       Caption = '&Save Events to File...'
  40.       OnClick = SaveLogItemClick
  41.     end
  42.     object AddCommentItem: TMenuItem
  43.       Caption = '&Add Comment...'
  44.       OnClick = AddCommentItemClick
  45.     end
  46.     object N1: TMenuItem
  47.       Caption = '-'
  48.     end
  49.     object OptionsItem: TMenuItem
  50.       Caption = '&Properties'
  51.       OnClick = OptionsItemClick
  52.     end
  53.     object LocalMenuItem: TMenuItem
  54.       Caption = 'Local Menu'
  55.       Visible = False
  56.       OnClick = LocalMenuItemClick
  57.     end
  58.     object ZoomWindowItem: TMenuItem
  59.       Action = ZoomWindowCmd
  60.     end
  61.     object CloseWindowItem: TMenuItem
  62.       Caption = 'Close Window'
  63.       Visible = False
  64.       OnClick = CloseWindowItemClick
  65.     end
  66.     object N2: TMenuItem
  67.       Caption = '-'
  68.     end
  69.     object DockableItem: TMenuItem
  70.       Action = DockableCmd
  71.     end
  72.   end
  73.   object SaveLogDlg: TSaveDialog
  74.     HelpContext = 5631
  75.     Options = [ofOverwritePrompt, ofHideReadOnly, ofShowHelp, ofEnableSizing]
  76.     Title = 'Save Event Log to File'
  77.     Left = 24
  78.     Top = 72
  79.   end
  80. end
  81.