Mensajes en Español para mi BD

[Alcolea]

Hola a todos, tengo una tabla de la BD de mi programa donde almaceno los datos de los usuarios que pertenecen al mimo y lógicamente cada usuario es único por lo que al insertar uno nuevo si tiene el mismo nombre que alguno de los ya existente me aparece el mensaje en Inglés que es lo que quiero cambiar para el Español, pero ni idea de que poner en el evento BeforePost para lograr esto.

Ya había puesto este hilo y me habían respondido pero no tuve tiempo de copiarlo antes del problema del Servidor y mucho menos de agradecer al que tuvo la gentileza que espero que la vuelva a tener.

Gracias por adelantado.

[[Caral]]

Hola
Espero te sirva:

Código Delphi [-]
MessageBox(Handle, 
             PChar('Ha introducido un nombre que ya existe' + #13#10 + 
                   'Por Favor cambie por otro,---Gracias---'), 
             PChar('Cliente Duplicado'),
             MB_OK + MB_DEFBUTTON1 + MB_APPLMODAL);

Saludos

[Alcolea]

Gracias Caral pero no es a ese mensaje al que me refiero, lo que quiero saber es como poner en Español el mensaje de error, por ejemplo, cuando insertas en una BD un campo con valor duplicado y esto no es admitido, lo cual creo que debe hacerse por en el evento BeforePost de un componente Table al agregar un registro.

[[Caral]]

Hola
La verdad no entiendo que mensaje de error? es del sistema o es un mensaje que creas tu, cuando el valor es duplicado.
saludos

[[maeyanes]]

Puedes hacer algo por el estilo:

Código Delphi [-]
// Guardar un registro nuevo o los cambios a uno existente
procedure TForm1.Button1Click(Sender: TObject);
begin
  try
    Table1.Post
  except
    on E: Exception do
      // Aquí verificas el tipo de error y muestras el mensaje que necesites
  end
end;

Saludos...