developer/VC/WTL80/Samples/Wizard97Test/Wizard/TestWizardFilePreviewPage.cpp

   1
   2 #include "stdafx.h"
   3 #include "TestWizardFilePreviewPage.h"
   4
   5 ///////////////////////////////////////////////////////////////////////////////
   6 // CFileListViewCtrl - a sortable list view of the resulting files
   7
   8 LRESULT CFileListViewCtrl::OnCreate(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& /*bHandled*/)
   9 {
  10         LRESULT result = DefWindowProc();
  11         if(result == -1)
  12         {
  13                 return -1;
  14         }
  15
  16         this->Initialize();
  17         return result;
  18 }
  19
  20 LRESULT CFileListViewCtrl::OnDestroy(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& bHandled)
  21 {
  22         this->Uninitialize();
  23
  24         bHandled = FALSE;
  25         return 0;
  26 }
  27
  28 LRESULT CFileListViewCtrl::OnContextMenu(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM lParam, BOOL& bHandled)
  29 {
  30         bHandled = TRUE;
  31
  32         int indexSelectedNearMenu = -1;
  33
  34         POINT ptPopup = {GET_X_LPARAM(lParam), GET_Y_LPARAM(lParam)};
  35         if(ptPopup.x == -1 && ptPopup.y == -1)
  36         {
  37                 // They used the context menu key or Shift-F10 to bring up the context menu
  38                 indexSelectedNearMenu = this->GetNextItem(-1, LVNI_SELECTED);
  39                 RECT rect = {0};
  40                 if(indexSelectedNearMenu >= 0)
  41                 {
  42                         // If there is a selected item, popup the menu under the first selected item,
  43                         // if not, pop it up in the top left of the list view
  44                         this->GetItemRect(indexSelectedNearMenu, &rect, LVIR_BOUNDS);
  45                         ::MapWindowPoints(m_hWnd, NULL, (LPPOINT)&rect, 2);
  46                         ptPopup.x = rect.left;
  47                         ptPopup.y = rect.bottom;
  48                 }
  49         }
  50         else
  51         {
  52                 POINT ptClient = ptPopup;
  53                 ::MapWindowPoints(NULL, m_hWnd, &ptClient, 1);
  54
  55                 LVHITTESTINFO hti = { 0 };
  56                 hti.pt = ptClient;
  57                 indexSelectedNearMenu = this->HitTest(&hti);
  58         }
  59
  60         if(indexSelectedNearMenu > 0)
  61         {
  62                 // TODO: Handle multiple selection
  63                 CString fullPath;
  64                 this->GetItemText(indexSelectedNearMenu, ListColumn_FullPath, fullPath);
  65
  66                 // Build up the menu to show
  67                 //CMenu mnuContext;
  68                 //if(mnuContext.CreatePopupMenu())
  69                 //{
  70                 //}
  71         }
  72
  73         return 0;
  74 }
  75
  76 void CFileListViewCtrl::Initialize(void)
  77 {
  78         this->InitializeListColumns();
  79 }
  80
  81 void CFileListViewCtrl::InitializeListColumns(void)
  82 {
  83         CRect rcList;
  84         this->GetClientRect(&rcList);
  85
  86         int width = rcList.Width();
  87         int columnWidth = 0;
  88         int remainingWidth = width;
  89
  90         // NOTE: We'll take the default sort type (LVCOLSORT_TEXT)
  91         // for the "Name" and "Folder" columns.
  92         // LVCOLSORT_TEXT uses lstrcmp, which uses the currently
  93         // selected user locale for sorting. This matches the sorting
  94         // in the file list in Windows Explorer. With lstrcmp:
  95         //    "a" < "A" and "A" < "b" and "b" < "B"
  96         // By comparison, with _tcscmp the sort order is in "ASCII" order:
  97         //    "A" < "a" and "Z" < "a"
  98         // LVCOLSORT_TEXTNOCASE uses lstrcmpi, which sorts:
  99         //    "a" == "A" and "A" < "b" and "b" == "B"
 100
 101         columnWidth = ::MulDiv(width, 20, 100);  // 20%
 102         this->InsertColumn(ListColumn_Name, _T("Name"), LVCFMT_LEFT, columnWidth, ListColumn_Name);
 103         //baseClass::SetColumnSortType(ListColumn_Name, LVCOLSORT_TEXT);
 104         remainingWidth -= columnWidth;
 105
 106         columnWidth = ::MulDiv(width, 50, 100);  // 50%
 107         this->InsertColumn(ListColumn_Folder, _T("In Folder"), LVCFMT_LEFT, columnWidth, ListColumn_Folder);
 108         //baseClass::SetColumnSortType(ListColumn_Folder, LVCOLSORT_TEXT);
 109         remainingWidth -= columnWidth;
 110
 111         columnWidth = ::MulDiv(width, 15, 100);  // 15%
 112         this->InsertColumn(ListColumn_LastModified, _T("Date Modified"), LVCFMT_LEFT, columnWidth, ListColumn_LastModified);
 113         baseClass::SetColumnSortType(ListColumn_LastModified, LVCOLSORT_DATETIME);
 114         remainingWidth -= columnWidth;
 115
 116         columnWidth = remainingWidth;
 117         this->InsertColumn(ListColumn_Size, _T("Size"), LVCFMT_LEFT, columnWidth, ListColumn_Size);
 118         baseClass::SetColumnSortType(ListColumn_Size, LVCOLSORT_CUSTOM);
 119
 120         // Hidden columns
 121         // (We could go to more work to keep these truly hidden,
 122         //  but for now, we'll allow column size adjusts, Ctrl+NumPad+
 123         //  and the like to reveal the columns).
 124         this->InsertColumn(ListColumn_SizeBytes, _T("Size in Bytes"), LVCFMT_LEFT, 0, ListColumn_SizeBytes);
 125         baseClass::SetColumnSortType(ListColumn_SizeBytes, LVCOLSORT_DECIMAL);
 126
 127         this->InsertColumn(ListColumn_FullPath, _T("Full Path"), LVCFMT_LEFT, 0, ListColumn_FullPath);
 128         //baseClass::SetColumnSortType(ListColumn_FullPath, LVCOLSORT_TEXT);
 129 }
 130
 131 void CFileListViewCtrl::Uninitialize(void)
 132 {
 133 }
 134
 135 BOOL CFileListViewCtrl::SubclassWindow(HWND hWnd)
 136 {
 137         ATLASSERT(m_hWnd == NULL);
 138         ATLASSERT(::IsWindow(hWnd));
 139         BOOL returnValue = baseClass::SubclassWindow(hWnd);
 140         if(returnValue)
 141         {
 142                 this->Initialize();
 143         }
 144         return returnValue;
 145 }
 146
 147 HWND CFileListViewCtrl::UnsubclassWindow(BOOL bForce)
 148 {
 149         this->Uninitialize();
 150
 151         return baseClass::UnsubclassWindow(bForce);
 152 }
 153
 154 int CFileListViewCtrl::CompareItemsCustom(LVCompareParam* pItem1, LVCompareParam* pItem2, int iSortCol)
 155 {
 156         int result = 0;
 157
 158         // Deal with all of the custom sort columns
 159         switch(iSortCol)
 160         {
 161         case ListColumn_Size:
 162                 {
 163                         // Sort based on ListColumn_SizeBytes
 164
 165                         // NOTE: There's other ways to use a "proxy column" for sorting, this is just one
 166                         //  (mainly, just to give an example of CompareItemsCustom).
 167                         //  Another way would be to have DoSortItems run on the hidden column,
 168                         //  but then SetSortColumn for the visible column.
 169
 170                         CString sizeInBytesLHS, sizeInBytesRHS;
 171                         this->GetItemText(pItem1->iItem, ListColumn_SizeBytes, sizeInBytesLHS);
 172                         this->GetItemText(pItem2->iItem, ListColumn_SizeBytes, sizeInBytesRHS);
 173
 174                         __int64 difference = _ttoi64(sizeInBytesRHS) - _ttoi64(sizeInBytesLHS);
 175                         if(difference < 0)
 176                                 result = 1;
 177                         else if(difference > 0)
 178                                 result = -1;
 179                         else
 180                                 result = 0;
 181                 }
 182                 break;
 183         }
 184
 185         return result;
 186 }
 187
 188 void CFileListViewCtrl::OnFileFound(LPCTSTR directory, LPWIN32_FIND_DATA findFileData)
 189 {
 190         TCHAR fileFullPath[MAX_PATH+1] = {0};
 191         ::PathCombine(fileFullPath, directory, findFileData->cFileName);
 192
 193         ULARGE_INTEGER fileSize = { findFileData->nFileSizeLow, findFileData->nFileSizeHigh };
 194
 195         this->AddFile(directory, findFileData->cFileName, fileFullPath, findFileData->ftLastWriteTime, fileSize.QuadPart);
 196 }
 197
 198 int CFileListViewCtrl::AddFile(LPCTSTR fileFullPath)
 199 {
 200         int index = -1;
 201
 202         WIN32_FILE_ATTRIBUTE_DATA attributes = {0};
 203         if(::GetFileAttributesEx(fileFullPath, GetFileExInfoStandard, &attributes))
 204         {
 205                 TCHAR fileSpec[MAX_PATH+1] = {0};
 206                 TCHAR directory[MAX_PATH+1] = {0};
 207
 208                 ::lstrcpyn(fileSpec, fileFullPath, MAX_PATH);
 209                 ::lstrcpyn(directory, fileFullPath, MAX_PATH);
 210
 211                 ::PathStripPath(fileSpec);
 212                 ::PathRemoveFileSpec(directory);
 213
 214                 ULARGE_INTEGER fileSize = { attributes.nFileSizeLow, attributes.nFileSizeHigh };
 215
 216                 index = this->AddFile(directory, fileSpec, fileFullPath, attributes.ftLastWriteTime, fileSize.QuadPart);
 217         }
 218
 219         return index;
 220 }
 221
 222 int CFileListViewCtrl::AddFile(LPCTSTR directory, LPCTSTR fileSpec, LPCTSTR fileFullPath, FILETIME lastWriteTimeUTC, ULONGLONG fileSize)
 223 {
 224         FILETIME localTime = {0};
 225         SYSTEMTIME st = {0};
 226         ::FileTimeToLocalFileTime(&lastWriteTimeUTC, &localTime);
 227         ::FileTimeToSystemTime(&localTime, &st);
 228
 229         int hour12 = st.wHour;
 230         if(st.wHour == 0)
 231                 hour12 = 12;
 232         else if(st.wHour > 12)
 233                 hour12 -= 12;
 234
 235         CString lastModified;
 236         lastModified.Format(_T("%d/%d/%d %d:%.2d %s"),
 237                 st.wMonth, st.wDay, st.wYear,
 238                 hour12, st.wMinute, (st.wHour > 11) ? _T("PM") : _T("AM"));
 239
 240         TCHAR size[32] = {0};
 241         ::StrFormatByteSize64(fileSize, size, 31);
 242
 243         CString sizeBytes;
 244         sizeBytes.Format(_T("%I64u"), fileSize);
 245
 246         int index = this->GetItemCount();
 247         this->InsertItem(index, fileSpec);
 248         this->SetItemText(index, ListColumn_Folder, directory);
 249         this->SetItemText(index, ListColumn_LastModified, lastModified);
 250         this->SetItemText(index, ListColumn_Size, size);
 251         this->SetItemText(index, ListColumn_SizeBytes, sizeBytes);
 252         this->SetItemText(index, ListColumn_FullPath, fileFullPath);
 253
 254         return index;
 255 }
 256
 257 void CFileListViewCtrl::AutoResizeColumns(void)
 258 {
 259         this->SetColumnWidth(ListColumn_Name, LVSCW_AUTOSIZE_USEHEADER);
 260         this->SetColumnWidth(ListColumn_Folder, LVSCW_AUTOSIZE_USEHEADER);
 261         this->SetColumnWidth(ListColumn_LastModified, LVSCW_AUTOSIZE_USEHEADER);
 262         this->SetColumnWidth(ListColumn_Size, LVSCW_AUTOSIZE_USEHEADER);
 263         this->SetColumnWidth(ListColumn_SizeBytes, 0);
 264         this->SetColumnWidth(ListColumn_FullPath, 0);
 265 }
 266
 267
 268 ///////////////////////////////////////////////////////////////////////////////
 269 // CTestWizardFilePreviewPage - Wizard page to preview the files located by the path/filter
 270
 271 LRESULT CTestWizardFilePreviewPage::OnInitDialog(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& /*bHandled*/)
 272 {
 273         CWaitCursor waitCursor;
 274
 275         this->InitializeControls();
 276         this->InitializeValues();
 277
 278         return 1;
 279 }
 280
 281 LRESULT CTestWizardFilePreviewPage::OnDestroy(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& bHandled)
 282 {
 283         // Be sure the base gets the message too
 284         bHandled = FALSE;
 285
 286         this->UninitializeControls();
 287         return 0;
 288 }
 289
 290 LRESULT CTestWizardFilePreviewPage::OnClickPreview(WORD /*wNotifyCode*/, WORD /*wID*/, HWND /*hWndCtl*/, BOOL& /*bHandled*/)
 291 {
 292         CWaitCursor waitCursor;
 293
 294         m_listFiles.EnableWindow(TRUE);
 295
 296         this->UpdateFileList();
 297
 298         return 0;
 299 }
 300
 301 void CTestWizardFilePreviewPage::InitializeControls(void)
 302 {
 303         m_listFiles.SubclassWindow(this->GetDlgItem(IDC_LIST_FILES));
 304
 305         m_buttonPreview = this->GetDlgItem(IDC_BTN_PREVIEW);
 306
 307         m_listFiles.EnableWindow(FALSE);
 308 }
 309
 310 void CTestWizardFilePreviewPage::UninitializeControls(void)
 311 {
 312         m_listFiles.UnsubclassWindow();
 313 }
 314
 315 void CTestWizardFilePreviewPage::InitializeValues(void)
 316 {
 317         m_listFiles.DeleteAllItems();
 318 }
 319
 320 bool CTestWizardFilePreviewPage::StoreValues(void)
 321 {
 322         return true;
 323 }
 324
 325 void CTestWizardFilePreviewPage::UpdateFileList()
 326 {
 327         CWaitCursor waitCursor;
 328
 329         m_listFiles.SetSortColumn(-1);
 330
 331         m_listFiles.SetRedraw(FALSE);
 332         m_listFiles.DeleteAllItems();
 333
 334         int fileCount = m_pTestWizardInfo->FindFiles(&m_listFiles);
 335
 336         if(fileCount < 1)
 337         {
 338                 m_listFiles.InsertItem(0, _T("(No existing files found for the path and filter)"));
 339         }
 340
 341         m_listFiles.AutoResizeColumns();
 342
 343         m_listFiles.SetRedraw(TRUE);
 344         m_listFiles.Invalidate();
 345 }
 346
 347 // Overrides from base class
 348 int CTestWizardFilePreviewPage::OnSetActive()
 349 {
 350         m_listFiles.EnableWindow(FALSE);
 351
 352         this->SetWizardButtons(PSWIZB_BACK | PSWIZB_NEXT);
 353
 354         // 0 = allow activate
 355         // -1 = go back to page that was active
 356         // page ID = jump to page
 357         return 0;
 358 }
 359
 360 int CTestWizardFilePreviewPage::OnWizardNext()
 361 {
 362         bool success = this->StoreValues();
 363         if(!success)
 364         {
 365                 // Any errors are already reported, and if appropriate,
 366                 // the control that needs attention has been given focus.
 367                 return -1;
 368         }
 369
 370         // 0  = goto next page
 371         // -1 = prevent page change
 372         // >0 = jump to page by dlg ID
 373
 374         return m_pTestWizardInfo->FindNextPage(IDD);
 375 }
 376
 377 int CTestWizardFilePreviewPage::OnWizardBack()
 378 {
 379         return m_pTestWizardInfo->FindPreviousPage(IDD);
 380 }
 381
 382 void CTestWizardFilePreviewPage::OnHelp()
 383 {
 384         m_pTestWizardInfo->ShowHelp(IDD);
 385 }