---------------------------------------------------------------------------
| 399 | } |
| 400 | //--------------------------------------------------------------------------- |
| 401 | void __fastcall TStorageFileList::Clear(void) |
| 402 | { |
| 403 | for(int i=0; i<Count; i++) |
| 404 | delete (TStorageFile *)Items[i]; |
| 405 | TList::Clear(); |
| 406 | } |
| 407 | //--------------------------------------------------------------------------- |
| 408 | void __fastcall TStorageFileList::Add(TStorageFile * p) |
| 409 | { |
no outgoing calls
no test coverage detected