// Get version information from the application

HINSTANCE hInst = AfxGetInstanceHandle();

TCHAR szFullPath[256];

GetModuleFileName(hInst, szFullPath, sizeof(szFullPath));

DWORD dwVerHnd;

DWORD dwVerInfoSize = GetFileVersionInfoSize(szFullPath, &dwVerHnd);

if (dwVerInfoSize != 0) {

// If we were able to get the information, process it

HANDLE hMem = GlobalAlloc(GMEM_MOVEABLE, dwVerInfoSize);

LPVOID lpvMem = GlobalLock(hMem);

GetFileVersionInfo(szFullPath, dwVerHnd, dwVerInfoSize, lpvMem);

TCHAR szGetName[256];

lstrcpy(szGetName, _T("\\StringFileInfo\\040904b0\\"));

int cchRoot = lstrlen(szGetName);

// Walk through the dialog items that we want to replace

static WORD idcs[] = {IDC_COPYRIGHT, IDC_VERSION};

for (int i = 0; i < 2; i++) {

TCHAR szResult[256];

::GetDlgItemText(hDlg, idcs[i], szResult, sizeof(szResult));

lstrcpy(&szGetName[cchRoot], szResult);

LPTSTR lszVer = NULL;

UINT cchVer = 0;

BOOL fRet = VerQueryValue(lpvMem, szGetName, (void**)&lszVer, &cchVer);

if (fRet && cchVer != 0 && lszVer != NULL) {

// Replace dialog item text with version info

lstrcpy(szResult, lszVer);

::SetDlgItemText(hDlg, idcs[i], szResult);

}

}

GlobalUnlock(hMem);

GlobalFree(hMem);

}

//{{AFX_DATA_INIT(CAbout)

// NOTE: the ClassWizard will add member initialization here

//}}AFX_DATA_INIT

CPropertyPage::DoDataExchange(pDX);

//{{AFX_DATA_MAP(CAboutPage)

// NOTE: the ClassWizard will add DDX and DDV calls here

//}}AFX_DATA_MAP

CDialog::OnInitDialog();

InitDlg(GetSafeHwnd());

return TRUE;