Tema: OnCloseQuery
Ver Mensaje Individual
  #1  
Antiguo 21-11-2005
JXJ JXJ is offline
Miembro
 
Registrado: abr 2005
Posts: 2.475
Reputación: 24
JXJ Va por buen camino
Question OnCloseQuery ¿Cómo mostrar los mensajes de Delphi en español'

¿Como hago para que se muestre el texto en
español y algun otro idioma dentro de los caption
de los botones. cerrar aceptar y cancelar.?
Esto al momento de cerrar el programa
en el evento OnCloseQuery

uso este codigo


Código Delphi [-]
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
case MessageDlg(Format(sSaveChanges, [Caption]), mtConfirmation, [mbYes, mbNo, mbCancel], 0) of
mrYes:
CanClose := true;
mrNo:
CanClose := true;
mrCancel:
CanClose := false;
end;
 
end;

vale gracias.

Titulo corregido.

Última edición por JXJ fecha: 21-11-2005 a las 19:30:52.
Responder Con Cita