Problemas en busqueda

[vtdeleon]

Saludos

Es extraño este código :

Código Delphi [-]
    cRut:=Md.tbCompra.FieldByName('Rut').AsString;
    cTipDoc:=Md.tbCompra.FieldByName('TipDoc').AsString;
    nDoc:=Md.tbCompra.FieldByName('NumDoc').AsInteger;
    Md.tbCompra.IndexName:='CompCom';
    If MD.tbCompra.FindKey([cRut,cTipDoc,nDoc])=True THEN
      ShowMessage('El registro ya existe');

Estás mandado a buscar DATOS qeu están en la misma tabla, y es claro que te diga que existan.

Me parece que falta otra tabla!

[destrukthor]

Y como verificas q la informacion no quede duplicada.
Como sabes cuando un conjundo de datos digitados esta duplicado en el momento de Agregar un registro o modificarlo.
Me puedes dar alguna señal
REcuerda q ingresos con TDbEdit y sus componentes.
Gracias.

[destrukthor]

Pero creo q mi problema radica en q ocupo mucho los DBEdit y esos a su vez no me permiten la validacion de los datos q se ingresas a las tablas ya q los hace directo sobre ellas.
Creo q tendre q hacerlo a la antiguita ingresarlos a un MarkEdit o Edit y transferirlos a las tablas, claro esta despues de validar la información digitada.
Es un poco largo y arcaico pero no veo otra solucion.
Gracias a todos por la ayuda...

[PepeLolo]

Una manera muy simple y que siempre aplico a rajatabla es la siguiente:
a) TQuery para consultas de validación, independiente de la tabla sobre la que actuas
b) Dependiendo del tipo de Control (DataWare, no DataWare)
b.1) Validación en el evento OnValidate del TField, usando el TQuery indicado.
b.2) En el evento "OnExit" del control, usando el TQuery indicado.

Siguiendo esta simple regla, NO PROBLEM jamas.

un saludo.