Código Delphi [-] Form1.table1.filter := '(Nombre = '+QuotedStr(form1.Table2.fieldbyname('Nombre').asstring)+') And (Apellidop = '+QuotedStr(form1.Table2.fieldbyname('apellidop').asstring)+')';
Form1.table1.filter := '(Nombre = '+QuotedStr(form1.Table2.fieldbyname('Nombre').asstring)+') And (Apellidop = '+QuotedStr(form1.Table2.fieldbyname('apellidop').asstring)+')';