Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Inno setup: MessageBox de advertencia (https://www.clubdelphi.com/foros/showthread.php?t=93603)

Soa Pelaez 26-11-2018 21:38:07

Inno setup: MessageBox de advertencia
 
Buen día amig@s


Requiero generar un setup y que al iniciarlo me saque un mensaje de advertencia con si y no, y si el usuario acepta continue con la respectiva instalación, por ahora realice esto con inno setup, pero el mensaje de advertencia me aparece luego de dar si por primera vez, aparece nuevamente el mensaje y luego de dar si otra vez ahi si continua con la instalación.

Código Delphi [-]
function InitializeSetup(): Boolean;
var
   respuesta : Integer;
begin
        respuesta := MsgBox('Debe cerrar los programas relacionados a la instalación, ¿Desea continuar', mbConfirmation, MB_YESNO);
        if(respuesta = IDYES)then begin
           Result := True
        else
          Result := False;
end;

procedure InitializeWizard;
begin
      InitializeSetup;
end;

Esto está realizado en pascal, en inno setup.


Les agradecería su ayuda.

Casimiro Notevi 27-11-2018 01:09:40

Te aconsejo que eches un vistazo a los muchos ejemplos que vienen con el mismo.


La franja horaria es GMT +2. Ahora son las 17:01:07.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi