object ODForm: TODForm Left = 225 Top = 144 AutoScroll = False Caption = 'Object Debugger (beta 0.40)' ClientHeight = 372 ClientWidth = 274 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu1 OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate OnResize = FormResize PixelsPerInch = 96 TextHeight = 13 object PageControl1: TPageControl Left = 0 Top = 65 Width = 274 Height = 307 ActivePage = TabSheet1 Align = alClient TabOrder = 0 object TabSheet1: TTabSheet Caption = 'Properties' object ListSet: TListBox Left = 88 Top = 112 Width = 121 Height = 97 ExtendedSelect = False ItemHeight = 13 MultiSelect = True TabOrder = 7 OnClick = ListSetClick OnExit = RefreshOnExit end object EditCh: TEdit Left = 64 Top = 80 Width = 121 Height = 21 TabOrder = 6 Text = 'EditCh' OnExit = EditChExit end object EditStr: TEdit Left = 80 Top = 160 Width = 121 Height = 21 TabOrder = 5 Text = 'EditStr' OnExit = EditStrExit end object EditNum: TEdit Left = 72 Top = 128 Width = 121 Height = 21 TabOrder = 4 Text = 'EditNum' OnExit = EditNumExit OnKeyPress = EditNumKeyPress end object ComboEnum: TComboBox Left = 72 Top = 152 Width = 145 Height = 21 ItemHeight = 13 TabOrder = 3 OnChange = ComboEnumChange OnDblClick = ComboEnumDblClick OnExit = RefreshOnExit end object ComboCursor: TComboBox Left = 72 Top = 120 Width = 145 Height = 21 ItemHeight = 13 TabOrder = 2 OnChange = ComboCursorChange OnExit = RefreshOnExit end object ComboColor: TComboBox Left = 72 Top = 88 Width = 121 Height = 21 ItemHeight = 13 TabOrder = 1 OnChange = ComboColorChange OnDblClick = ComboColorDblClick OnExit = RefreshOnExit end object sgProp: TStringGrid Left = 0 Top = 0 Width = 266 Height = 279 Align = alClient Color = clBtnFace ColCount = 2 DefaultColWidth = 120 DefaultRowHeight = 18 FixedCols = 0 RowCount = 12 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine] ScrollBars = ssVertical TabOrder = 0 OnDblClick = sgPropDblClick OnMouseDown = sgMouseDown OnSelectCell = sgPropSelectCell ColWidths = ( 109 120) RowHeights = ( 18 18 18 18 18 18 18 18 18 18 18 18) end end object TabSheet2: TTabSheet Caption = 'Events' object sgEvt: TStringGrid Left = 0 Top = 0 Width = 266 Height = 279 Align = alClient Color = clBtnFace ColCount = 2 DefaultColWidth = 120 DefaultRowHeight = 18 FixedCols = 0 RowCount = 12 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing] ScrollBars = ssVertical TabOrder = 0 OnMouseDown = sgMouseDown OnSelectCell = sgPropSelectCell ColWidths = ( 109 120) RowHeights = ( 18 18 18 18 18 18 18 18 18 18 18 18) end end object TabSheet3: TTabSheet Caption = 'Data' object sgData: TStringGrid Left = 0 Top = 0 Width = 266 Height = 279 Align = alClient Color = clBtnFace ColCount = 2 DefaultColWidth = 120 DefaultRowHeight = 18 FixedCols = 0 RowCount = 12 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing] ScrollBars = ssVertical TabOrder = 0 OnMouseDown = sgMouseDown OnSelectCell = sgDataSelectCell ColWidths = ( 109 95) RowHeights = ( 18 18 18 18 18 18 18 18 18 18 18 18) end end end object Panel1: TPanel Left = 0 Top = 0 Width = 274 Height = 65 Align = alTop TabOrder = 1 object cbComps: TComboBox Left = 8 Top = 34 Width = 259 Height = 21 Style = csDropDownList ItemHeight = 13 Sorted = True TabOrder = 0 OnChange = cbCompsChange end object cbForms: TComboBox Left = 8 Top = 8 Width = 257 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 1 OnChange = cbFormsChange end end object ColorDialog1: TColorDialog Ctl3D = True Left = 96 Top = 288 end object FontDialog1: TFontDialog Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MinFontSize = 0 MaxFontSize = 0 Left = 32 Top = 289 end object MainMenu1: TMainMenu Left = 164 Top = 289 object File1: TMenuItem Caption = '&File' ShortCut = 0 object Minimize1: TMenuItem Caption = '&Minimize' ShortCut = 0 OnClick = Minimize1Click end end object Options1: TMenuItem Caption = '&Options' ShortCut = 0 object RefreshForms1: TMenuItem Caption = 'Refresh &Forms' ShortCut = 0 OnClick = RefreshForms1Click end object RefreshComponents1: TMenuItem Caption = 'Refresh &Components' ShortCut = 0 OnClick = RefreshComponents1Click end object RefreshValues1: TMenuItem Caption = 'Refresh &Values' ShortCut = 0 OnClick = RefreshValues1Click end object N1: TMenuItem Caption = '-' ShortCut = 0 end object TopMost1: TMenuItem Caption = '&TopMost' ShortCut = 0 OnClick = TopMost1Click end end object Help1: TMenuItem Caption = '&Help' ShortCut = 0 object Info1: TMenuItem Caption = '&Info...' ShortCut = 0 OnClick = Info1Click end object About1: TMenuItem Caption = '&About...' ShortCut = 0 OnClick = About1Click end end end object Timer1: TTimer Interval = 500 OnTimer = Timer1Timer Left = 212 Top = 289 end end