Ver Mensaje Individual
  #6  
Antiguo 15-12-2009
Avatar de afunez2007
afunez2007 afunez2007 is offline
Miembro
 
Registrado: oct 2007
Ubicación: La Ceiba, Honduras
Posts: 170
Reputación: 17
afunez2007 Va por buen camino
Lightbulb

Creo que ya vi por donde viene el asunto probe con el siguiente codigo y si que cambian el idioma de los botones yes/no a si/no
Código Delphi [-]
case MessageDlg('Seguro que desea salir del sistema?',  mtConfirmation,
  [mbYes, mbNo], 0) of
  mrYes:
    begin
      CLOSE;
    end;
  mrNo:
    begin

    end;
end;

Pero si lo hago con un application.messagebox no funciona:
Código Delphi [-]
case Application.MessageBox('Seguro que desea salir del sistema?', 'Seguro', 
  MB_YESNO + MB_ICONQUESTION) of
  IDYES:
    begin
      close;
    end;
  IDNO:
    begin

    end;
end;

Si lo hago con un MessageBox tampoco funciona
Código Delphi [-]
case MessageBox(Handle, 'Seguro que desea salir del sistema?', 'Seguro', 
  MB_YESNO + MB_ICONQUESTION) of
  IDYES:
    begin
      close;
    end;
  IDNO:
    begin

    end;
end;

en conclusion solo los MessageDlg funciona bien, en el caso de otros mensajes si ya vi por ejemplo, famoso "invalid integer value., si que lo traduce a " no es un valor entero valido.

Gracias por el aporte, si esta bueno

Saludos
__________________
Si robas, roba un beso, si mientes que sea por amor y si engañas que sea a la muerte!!
Responder Con Cita