我需要在新的CreateInputDirPage
中禁用浏览按钮。
代码:
DataDirPage := CreateInputDirPage(wpSelectDir,
'Select DB', '¿Folder?',
'Select Folder',
False, '');
DataDirPage.Add('');
功能NextButtonClick
:
if (CurPageID = 6) then
DataDirPage.DirBrowseButton.Enable := False;
使用TInputDirWizardPage.Buttons
属性访问浏览按钮:
DataDirPage.Buttons[0].Enabled := False;
不对页面ID进行硬编码,请使用wpSelectDir
而不是6
。