¿Cómo cambiar el título del mensaje MsgBox en el tiempo de ejecución?

Necesito cambiar el título predeterminado de un cuadro de mensaje MsgBox en el tiempo de ejecución. Actualmente muestra constantemente el valor de la directiva SetupAppTitle como un título:

 [Setup] SetupAppTitle=myAppName 

Pero esto se especifica en tiempo de comstackción. ¿Cómo hacer esto en tiempo de ejecución, por ejemplo, desde una sección [Code] ?

No creo que cambiar el título de la aplicación (si es posible) sería una buena idea solo para mostrar el título del diálogo. Entonces usaría Windows MessageBox que incluso es usado por MsgBox . Aquí hay un ejemplo simple para las versiones Ansi / Unicode de Inno Setup:

 [Code] const MB_ICONERROR = $10; MB_ICONQUESTION = $20; MB_ICONWARNING = $30; MB_ICONINFORMATION = $40; #ifdef UNICODE #define AW "W" #else #define AW "A" #endif function MessageBox(hWnd: HWND; lpText, lpCaption: string; uType: UINT): Integer; external 'MessageBox{#AW}@user32.dll stdcall'; procedure ButtonOnClick(Sender: TObject); begin MessageBox(0, 'Message Text', 'Message Caption', MB_OK or MB_ICONINFORMATION); end; 

Así es como finalmente lo hice:

 [Code] { https://msdn.microsoft.com/en-us/library/windows/desktop/ms645505.aspx } { Use Windows MessageBox() function as an MsgBox() replacement. } { MessageBoxW is the UNICODE version of this API call. } const { these are not exported in Inno Setup! } MB_ICONERROR = $00000010; MB_ICONWARNING = $00000030; MB_ICONINFORMATION = $00000040; MB_ICONQUESTION = $00000020; function _MessageBoxW_(hWnd: Integer; lpText, lpCaption: String; uType: Cardinal): Integer; external 'MessageBoxW@user32.dll stdcall'; { Usage: SysMsgBox('Error', 'Shit happens!', MB_OK or MB_ICONERROR); } { res =: SysMsgBox('Question', 'blah blah', MB_YESNO or MB_ICONQUESTION); } function SysMsgBox(const Caption, Message: String; const Flags: Integer): Integer; begin Result := _MessageBoxW_(StrToInt(ExpandConstant('{wizardhwnd}')), Message, Caption, Flags); end; 

¡Gracias a todos por vuestra ayuda!

Intereting Posts