Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Ветеран


Сообщения: 1133
Благодарности: 581

Профиль | Отправить PM | Цитировать


Цитата lexikon:
может быть как то возможно увеличить размер окна? »
Семёрки у меня нет, т.е. проверить негде, попробуйте прописать сообщение заново:
Пример
Код: Выделить весь код
[Setup]
AppName=My Program
AppVerName=My Program v 1.5
DefaultDirName={pf}\My Program
OutputDir=.
Compression=lzma/ultra
InternalCompressLevel=ultra
SolidCompression=yes

[Languages]
Name: rus; MessagesFile: compiler:Languages\Russian.isl

[Code]
#ifdef UNICODE
type
  PChar = PAnsiChar;
#endif

function MessageBox(hWnd: HWND; lpText, lpCaption: PChar; uType: UINT): Integer;
  external 'MessageBoxA@user32.dll stdcall';

#ifndef IS_ENHANCED
const
  MB_ICONQUESTION = $00000020;
#endif

procedure CancelButtonClick(CurPageID: Integer; var Cancel, Confirm: Boolean);
begin
  Confirm:= False;
  Cancel:= False;
  if MessageBox(WizardForm.Handle, SetupMessage(msgExitSetupMessage),
    SetupMessage(msgExitSetupTitle), MB_ICONQUESTION or MB_YESNO or MB_DEFBUTTON2) = IDYES then
    Cancel:= True;
end;


P.S.
Если результат будет таким же, то можно создать отдельную форму с сообщением.

-------
Книги нужны, чтобы напоминать человеку, что его оригинальные мысли не так уж новы... Авраам Линкольн.


Последний раз редактировалось Serega, 30-01-2010 в 23:48. Причина: дабавил описание


Отправлено: 23:14, 30-01-2010 | #1125