inherited WatchWindow: TWatchWindow Left = 243 Top = 151 ActiveControl = WatchList AutoScroll = False Caption = '�Ď����ꗗ' ClientHeight = 122 ClientWidth = 413 Icon.Data = {} ParentFont = True PopupMenu = WatchMenu Position = poScreenCenter OnResize = FormResize PixelsPerInch = 96 TextHeight = 12 object WatchList: TDrawGrid Left = 0 Top = 0 Width = 413 Height = 122 Align = alClient ColCount = 1 FixedCols = 0 RowCount = 1 FixedRows = 0 Options = [goDrawFocusSelected, goThumbTracking] TabOrder = 0 OnDblClick = WatchListDblClick OnDrawCell = WatchListDrawCell IsControl = True end object WatchMenu: TPopupMenu HelpContext = 4730 OnPopup = WatchMenuPopup Left = 80 Top = 8 object EditWatchItem: TMenuItem Caption = '�Ď����̕ҏW(&E)...' HelpContext = 2250 OnClick = EditButtonClick end object AddWatchItem: TMenuItem Caption = '�Ď����̒lj�(&A)...' HelpContext = 2251 OnClick = AddWatchItemClick end object N2: TMenuItem Caption = '-' end object EnableWatch: TMenuItem Caption = '�Ď����̗L����(&N)' HelpContext = 2253 OnClick = EnableWatchClick end object DisableWatch: TMenuItem Caption = '�Ď����̖�����(&I)' HelpContext = 2254 OnClick = DisableWatchClick end object RemoveWatchItem: TMenuItem Caption = '�Ď����̍폜(&D)' HelpContext = 2252 OnClick = DeleteButtonClick end object N1: TMenuItem Caption = '-' end object EnableAllWatches: TMenuItem Caption = '���ׂĂ̊Ď����̗L����(&L)' HelpContext = 2255 OnClick = EnableAllWatchesClick end object DisableAllWatches: TMenuItem Caption = '���ׂĂ̊Ď����̖�����(&B)' HelpContext = 2256 OnClick = DisableAllWatchesClick end object DeleteAllWatches: TMenuItem Caption = '���ׂĂ̊Ď����̍폜(&T)' HelpContext = 2257 OnClick = ClearButtonClick end object N3: TMenuItem Caption = '-' end object StayOnTopItem: TMenuItem Caption = '��Ɏ�O�ɕ\��(&S)' OnClick = StayOnTopClick end object LocalMenuItem: TMenuItem Caption = 'Local Menu' Visible = False OnClick = LocalMenuItemClick end object ZoomWindowItem: TMenuItem Caption = 'Zoom Window' Visible = False OnClick = ZoomWindowItemClick end object AltAddWatchItem: TMenuItem Caption = 'AddWatch' Visible = False OnClick = AddWatchItemClick end object AltRemoveWatchItem: TMenuItem Caption = 'DeleteWatch' Visible = False OnClick = DeleteButtonClick end object AltEditWatchItem: TMenuItem Caption = 'EditWatch' Visible = False OnClick = EditButtonClick end end end