Ver Mensaje Individual
  #2  
Antiguo 23-04-2006
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 29
Lepe Va por buen camino
En teoría, antes de guardar (hacer el post), usas TTable.Lookup para buscar ese texto en toda la tabla.

Código Delphi [-]
var
  ExisteTarifas: Variant;
begin
    ExisteTarifas := tblTarifas.Lookup('FidCliente', TblClientesIdCliente.AsString,
      'FidCliente');
    if not (vartype(ExisteTarifas) in [varnull]) then
      //si  existen tarifas preguntar borrado

En la práctica es una lata, ya que pueden poner una letra de más o de menos, y entonces la búsqueda no sirve de nada.

Algo que no se recomienda, podría ser un "Autocompleta" en el nombre, así, conforme va escribiendo el usuario, ya sabe los que existen y pone cuidado en no repertirlo.
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita