Club Builder

[MCA]

¿como puedo hacer para que al introducir un elemento que ya esta dentro de la base de datos me aparezca un mensaje de error escrito en español ??

[_Tugui]

Ahí va un ejemplo:

AnsiString cadena = "nombre";

TLocateOptions opciones;
opciones.Clear();
bool dato = ModuloDatos->MiTabla->Locate("Nombre",cadena,opciones);
if (dato){
Application->MessageBoxA("Ya existe un registro con estos
datos.","¡Aviso!",MB_OK | MB_ICONSTOP);
}
else {
ModuloDatos->MiTabla->Insert();
ModuloDatos->MiTablaNombre->Value = cadena;
ModuloDatos->MiTabla->Post();
}

/*En la ayuda del Builder viene información detallada sobre la función Locate().*/
Saludos