is there a way to fix inno script with xtool when used with cls-diskspan.dll
when asked to enter setup.002 or 003 ect..
if you press cancel (the one inside) the setup just hang with xtool at 0%
function MyDiskRequest(APath, AFilename: String): String;
var
MsgResult: Integer;
begin
Result := APath;
if not FileExists(AddBackSlash(Result) + AFilename) then
repeat
MsgResult := MsgBox(GetMessage(1, AFilename,''), mbConfirmation, MB_OKCANCEL);
if MsgResult = mrCancel then
WizardForm.CancelButton.OnClick(nil);
if (MsgResult = mrOk) and (FileExists(AddBackSlash(Result) + AFilename) = False) then
if MsgBox(GetMessage(2,'',''), mbConfirmation, MB_YESNO) = mrYes then
if GetOpenFileName('', Result, Result, AFilename + '|' + AFilename, AFilename) then
Result := ExtractFileDir(Result);
until (FileExists(AddBackSlash(Result) + AFilename) = True) or (ISDoneError = True);
end;
