Código Delphi [-]Table1.Filter:='Codigo = 430999'; Table1.Filtered:=True;
Table1.Filter:='Codigo = 430999'; Table1.Filtered:=True;