1

我想根据实例报告在完成/退出对话框上显示消息。

安装时如果出现问题,我想在完成屏幕上显示错误消息,否则显示成功消息。

我正在调用一个自定义操作来验证实例,并基于它在完成屏幕上设置变量的值。但每次在完成屏幕上,都会显示默认变量值。

代替下图中的 none,我想显示动态内容。

在此处输入图像描述

4

1 回答 1

1

这是我将动态许可协议显示到可滚动文本控件中的功能。您也许可以使用其中的一些来获得您想要做的事情:

 extern "C" UINT __stdcall GetLicense(MSIHANDLE hInstall)
{
HRESULT hr = S_OK;
UINT er = ERROR_SUCCESS;
BYTE* pbData = NULL;
DWORD cbData = 0;
LPWSTR szValueBuf = NULL;
char szDistributorName[MAX_PATH];
PMSIHANDLE hView, hRecord;
CString szLicense;

hr = WcaInitialize(hInstall, "GetLicense");
ExitOnFailure(hr, "Failed to initialize");

WcaLog(LOGMSG_STANDARD, "Initialized.");

hr = ExtractBinary(L"License", &pbData, &cbData);
ExitOnFailure(hr, "failed to extract binary data");

hr = WcaGetProperty(L"DISTRIBUTORNAME", &szValueBuf);
ExitOnFailure(hr, "Failed to get the driver information");

wcstombs(szDistributorName, szValueBuf, 260);
szLicense = pbData;

int nRet = szLicense.Replace("[DISTRIBUTORNAME]", szDistributorName);

LPCTSTR query = _T("SELECT * FROM `Control` ")
    _T(" WHERE `Dialog_` = 'LicenseAgreementDlg' AND `Control` = 'LicenseText' ");
UINT ret = MsiDatabaseOpenView(WcaGetDatabaseHandle(), query, &hView);

if (ERROR_SUCCESS != ret)
{
    return ERROR_INSTALL_FAILURE;
}

ret = MsiViewExecute(hView, 0);

if (ERROR_SUCCESS != ret)
{
    return ERROR_INSTALL_FAILURE;
}


ret = MsiViewFetch(hView, &hRecord);

if (ERROR_SUCCESS != ret)
{
    return ERROR_INSTALL_FAILURE;
}

ret = MsiViewModify(hView, MSIMODIFY_DELETE, hRecord);

if (ERROR_SUCCESS != ret)
{
    return ERROR_INSTALL_FAILURE;
}

ret = MsiRecordSetStringA(hRecord, 10, szLicense);

if (ERROR_SUCCESS != ret)
{
    return ERROR_INSTALL_FAILURE;
}

ret = MsiViewModify(hView, MSIMODIFY_INSERT_TEMPORARY, hRecord);

if (ERROR_SUCCESS != ret)
{
    return ERROR_INSTALL_FAILURE;
}

return ERROR_SUCCESS;

LExit:
er = SUCCEEDED(hr) ? ERROR_SUCCESS : ERROR_INSTALL_FAILURE;
return WcaFinalize(er);
}
于 2013-01-14T09:37:37.510 回答