Código Delphi [-]ADOTable1.Filter := 'Matricula = ' + Edit1.Text;
ADOTable1.Filter := 'Matricula = ' + Edit1.Text;