[Crazy Noise]

опять таки же, не проверял »

Благодарю! Проверил, работает.

Сейчас зациклился на MsgBox. Где-то что-то не правильно делаю, либо вообще не туда полез.
Т.к ключ должен быть в любом случае, то значит должна быть проверка на то введён ключ в инсталляторе или нет
т.е если в инсталляторе окошки пусты, либо не хватает буквы или цифры то при нажатии на далее выводил сообщение MsgBox('Вы должны ввести ключ.', mbError, MB_OK);, либо же кнопка далее была бы не активна до тех пор пока весь ключ не будет введён, вот что-то одно.

читать дальше »

Код:

function NextButtonClick(CurPageID:integer): Boolean;
begin
  case CurPageID of
    SerialPage.ID:
    begin
      CreateDir(ExpandConstant('{userdocs}\GameEX'));
      SaveStringToFile(ExpandConstant('{userdocs}\GameEX\keysgame.ini'), EditsNumber, False);
      MsgBox('Вы должны ввести ключ.', mbError, MB_OK);
    end;
  end;
   Result := True;
end;

function ShouldSkipPage(PageID: Integer): Boolean;
begin
  case PageID of
    SerialPage.ID: Result := FileExists(ExpandConstant('{userdocs}\GameEX\keysgame.ini'));
  end;
end;