messagebox para cnfirmar accion

[voldemmor]

Hola amigos.
Uso D7
Tengo que realizar la actualizacion de un campo sobre una tabla, ver si ese profesor sigue activo o no.

eso no me dio problemas .

Mi duda es ya que necesito una confirmacion antes que realice la accion el usuario, he tratado de mostrar un

Código Delphi [-]
messagebox('desea realizar la salida del profesor', 'salidar',[msokcancel])

bueno lo de [msokcancel] no lo recuerdo muy bien, ya que en el trabajo no cuento con acceso a internet y estoy en un cyber, no creo que es el parametro asi pero la idea es esa,

Me da un error de que los parametros que envio son incompatibles.

Y ademas, ya que no puedo ver ni siquiera el mensaje de confirmacion o cancelacion no se como comprobar si pulso el OK (disculpen las mayusculas).

Agradeceria una peque explicacion o un ejemplillo.

gracias de antemano

[look]

Empezado por voldemmor

Hola amigos.
Uso D7
Tengo que realizar la actualizacion de un campo sobre una tabla, ver si ese profesor sigue activo o no.

eso no me dio problemas .


Mi duda es ya que necesito una confirmacion antes que realice la accion el usuario, he tratado de mostrar un Código Delphi [-]messagebox('desea realizar la salida del profesor', 'salidar',[msokcancel])



bueno lo de [msokcancel] no lo recuerdo muy bien, ya que en el trabajo no cuento con acceso a internet y estoy en un cyber, no creo que es el parametro asi pero la idea es esa,

Me da un error de que los parametros que envio son incompatibles.

Y ademas, ya que no puedo ver ni siquiera el mensaje de confirmacion o cancelacion no se como comprobar si pulso el OK (disculpen las mayusculas).

Agradeceria una peque explicacion o un ejemplillo.

gracias de antemano

Código Delphi [-]
  case MessageBox(Handle, 
                  PChar('desea realizar la salida del profesor'), 
                  PChar('salidar'),
                  MB_OKCANCEL + MB_ICONEXCLAMATION + MB_DEFBUTTON1 + MB_APPLMODAL) of
    IDOK:
      begin
      end;
    IDCANCEL:
      begin
      end;
  end;

[voldemmor]

Gracias compañero look se te agradece mucho
Y que la fuerza te acompañe

[Faust]

Otra opción es MessageDlg:

Código Delphi [-]
if MessageDlg('¿Está seguro que desea llevar al cabo esta acción?', mtWarning, [mbYes, mbNo], 0) = mrYes then
begin
  // Realizar la acción en caso de contestar Yes
end;

[voldemmor]

Empezado por Faust

Otra opción es MessageDlg:


Código Delphi [-]
if MessageDlg('¿Está seguro que desea llevar al cabo esta acción?', mtWarning, [mbYes, mbNo], 0) = mrYes then
begin
// Realizar la acción en caso de contestar Yes
end;

gracias por haberposteado esta otra opción, voy a probarla