1inherited ThreadsDlg: TThreadsDlg 2 Left = 345 3 Top = 428 4 Width = 774 5 BorderStyle = bsSizeToolWin 6 Caption = 'Threads' 7 ClientWidth = 774 8 object lvThreads: TListView[0] 9 Left = 0 10 Height = 214 11 Top = 26 12 Width = 774 13 Align = alClient 14 Columns = < 15 item 16 Width = 20 17 end 18 item 19 Caption = 'Id' 20 end 21 item 22 Caption = 'TargetId' 23 Width = 100 24 end 25 item 26 Caption = 'State' 27 end 28 item 29 Caption = 'Source' 30 Width = 150 31 end 32 item 33 Caption = 'Line' 34 end 35 item 36 Caption = 'Function' 37 Width = 300 38 end> 39 ReadOnly = True 40 RowSelect = True 41 SortType = stText 42 TabOrder = 0 43 ViewStyle = vsReport 44 OnDblClick = lvThreadsDblClick 45 end 46 object ToolBar1: TToolBar[1] 47 Left = 0 48 Height = 26 49 Top = 0 50 Width = 774 51 Caption = 'ToolBar1' 52 ShowCaptions = True 53 TabOrder = 1 54 object tbCurrent: TToolButton 55 Left = 1 56 Top = 2 57 Caption = 'tbCurrent' 58 OnClick = tbCurrentClick 59 end 60 object tbGoto: TToolButton 61 Left = 70 62 Top = 2 63 Caption = 'tbGoto' 64 OnClick = lvThreadsDblClick 65 end 66 end 67end 68