Ver Mensaje Individual
  #5  
Antiguo 18-10-2010
Avatar de RebeccaGL
RebeccaGL RebeccaGL is offline
Miembro
 
Registrado: ene 2008
Posts: 199
Reputación: 19
RebeccaGL Va por buen camino
Código Delphi [-]
If (DM.TablaAutos.Locate('Patente',Edt_Num.Text,[])) Then
Begin
  ShowMessage('El vehiculo pertenece a un Socio.');
  Edt_Num.SetFocus();
end;

 
Mira este Ejemplo.
 
if (DM.TableAutos.Locate('IDSocio; Patente',
      VarArrayOf([TablaSocio('IDSocio').AsFloat,
                      Edt_Num.Text]),
                      [loCaseInsensitive, loPartialKey])) then
Begin
  ShowMessage('El vehiculo pertenece a un Socio.');
  Edt_Num.SetFocus();
end;

Y no quites el MasterSource;
Asegurate de que los campos de enlace esten asi.

LinkedField := 'IDSocio';
MasterFields := 'IDSocio';
Responder Con Cita