На этом шаге мы приведем реализацию функции DeleteContents().
Поскольку STUpload - SDI-приложение, любые данные объекта документа должны удаляться функцией DeleteContents().
m_DocList.RemoveAll();
CMainFrame * pWnd =
dynamic_cast< CMainFrame * > (AfxGetMainWnd());
if( pWnd )
{
pWnd->UpdateFundList( m_DocList );
// В файле нет никаких записей, поэтому окно ценных бумаг
// не открываем...
pWnd->SetFundsVisible( FALSE );
// ...и восстанавливаем значение переменной текущей ценной
// бумаги
SetCurrentFund("");
}

Рис.1. Переопределенная функция CSTUploadDoc::DeleteContents()
Текст измененного приложения можно взять здесь (67,8 Кб).
На следующем шаге мы рассмотрим уведомление об изменении документа.