1object IDETodoWindow: TIDETodoWindow 2 Left = 714 3 Height = 300 4 Top = 510 5 Width = 837 6 ActiveControl = lvTodo 7 Caption = 'IDETodoWindow' 8 ClientHeight = 300 9 ClientWidth = 837 10 KeyPreview = True 11 OnCloseQuery = FormCloseQuery 12 OnCreate = FormCreate 13 OnKeyDown = FormKeyDown 14 OnShow = DoUpdateToDos 15 Position = poScreenCenter 16 SessionProperties = 'cboShowWhat.ItemIndex;chkListed.Checked;chkPackages.Checked;chkSourceEditor.Checked;chkUsed.Checked;lvTodo.Columns' 17 LCLVersion = '2.1.0.0' 18 object lvTodo: TListView 19 Left = 6 20 Height = 240 21 Top = 54 22 Width = 825 23 Align = alClient 24 AutoSortIndicator = True 25 BorderSpacing.Around = 6 26 Columns = < 27 item 28 Caption = 'Type' 29 Width = 40 30 end 31 item 32 Caption = 'Description' 33 Width = 400 34 end 35 item 36 Caption = 'Priority' 37 Width = 40 38 end 39 item 40 Caption = 'Module' 41 Width = 60 42 end 43 item 44 Caption = 'Line' 45 Width = 40 46 end 47 item 48 Caption = 'Owner' 49 end 50 item 51 Caption = 'Category' 52 end> 53 ReadOnly = True 54 RowSelect = True 55 ScrollBars = ssAutoBoth 56 SortType = stData 57 TabOrder = 1 58 ViewStyle = vsReport 59 OnClick = lvTodoClick 60 OnCompare = lvTodoCompare 61 end 62 object ToolBar: TToolBar 63 Left = 0 64 Height = 48 65 Top = 0 66 Width = 837 67 AutoSize = True 68 ButtonHeight = 46 69 ButtonWidth = 47 70 Caption = 'ToolBar' 71 ParentShowHint = False 72 ShowCaptions = True 73 ShowHint = True 74 TabOrder = 0 75 object tbRefresh: TToolButton 76 Left = 1 77 Top = 2 78 Action = acRefresh 79 AutoSize = True 80 end 81 object tbGoto: TToolButton 82 Left = 48 83 Top = 2 84 Action = acGoto 85 AutoSize = True 86 end 87 object tbExport: TToolButton 88 Left = 95 89 Top = 2 90 Action = acExport 91 AutoSize = True 92 end 93 object N1: TToolButton 94 Left = 142 95 Height = 46 96 Top = 2 97 Caption = 'N1' 98 Style = tbsDivider 99 end 100 object grbOptions: TGroupBox 101 AnchorSideTop.Side = asrCenter 102 Left = 262 103 Height = 39 104 Top = 2 105 Width = 221 106 AutoSize = True 107 Caption = 'Options' 108 ClientHeight = 19 109 ClientWidth = 217 110 TabOrder = 0 111 object chkListed: TCheckBox 112 Left = 0 113 Height = 19 114 Top = 0 115 Width = 51 116 Align = alLeft 117 Caption = '&Listed' 118 Checked = True 119 OnChange = DoUpdateToDos 120 State = cbChecked 121 TabOrder = 0 122 end 123 object chkUsed: TCheckBox 124 Left = 51 125 Height = 19 126 Top = 0 127 Width = 46 128 Align = alLeft 129 Caption = '&Used' 130 Checked = True 131 OnChange = DoUpdateToDos 132 State = cbChecked 133 TabOrder = 1 134 end 135 object chkSourceEditor: TCheckBox 136 Left = 97 137 Height = 19 138 Top = 0 139 Width = 51 140 Align = alLeft 141 Caption = 'Editor' 142 Checked = True 143 OnChange = DoUpdateToDos 144 State = cbChecked 145 TabOrder = 2 146 end 147 object chkPackages: TCheckBox 148 Left = 148 149 Height = 19 150 Top = 0 151 Width = 69 152 Align = alLeft 153 Caption = '&Packages' 154 OnChange = DoUpdateToDos 155 TabOrder = 3 156 end 157 end 158 object tbHelp: TToolButton 159 Left = 483 160 Top = 2 161 Action = acHelp 162 end 163 object pnlShowWhat: TPanel 164 Left = 147 165 Height = 46 166 Top = 2 167 Width = 115 168 BevelOuter = bvNone 169 ClientHeight = 46 170 ClientWidth = 115 171 TabOrder = 1 172 object lblShowWhat: TLabel 173 Left = 0 174 Height = 15 175 Top = 3 176 Width = 29 177 Caption = 'Show' 178 ParentColor = False 179 end 180 object cboShowWhat: TComboBox 181 AnchorSideLeft.Control = pnlShowWhat 182 AnchorSideTop.Control = lblShowWhat 183 AnchorSideTop.Side = asrBottom 184 Left = 4 185 Height = 23 186 Top = 22 187 Width = 106 188 BorderSpacing.Around = 4 189 ItemHeight = 15 190 ItemIndex = 0 191 Items.Strings = ( 192 'All' 193 'ToDo Only' 194 'Done Only' 195 'Notes Only' 196 'ToDo and Done' 197 'ToDo and Notes' 198 'Done and Notes' 199 ) 200 OnChange = DoUpdateToDos 201 TabOrder = 0 202 Text = 'All' 203 end 204 end 205 end 206 object ActionList: TActionList 207 Left = 648 208 Top = 10 209 object acGoto: TAction 210 Caption = 'Goto' 211 OnExecute = acGotoExecute 212 end 213 object acRefresh: TAction 214 Caption = 'Refresh' 215 OnExecute = DoUpdateToDos 216 end 217 object acExport: TAction 218 Caption = 'Export' 219 OnExecute = acExportExecute 220 end 221 object acHelp: TAction 222 Caption = 'acHelp' 223 OnExecute = acHelpExecute 224 end 225 end 226 object SaveDialog: TSaveDialog 227 OnShow = SaveDialogShow 228 DefaultExt = '.csv' 229 Filter = 'csv|*.csv' 230 Options = [ofCreatePrompt, ofEnableSizing, ofViewDetail] 231 Left = 584 232 Top = 11 233 end 234 object XMLPropStorage: TXMLPropStorage 235 StoredValues = <> 236 Active = False 237 OnRestoringProperties = XMLPropStorageRestoringProperties 238 OnRestoreProperties = XMLPropStorageRestoreProperties 239 Left = 544 240 Top = 11 241 end 242end 243