Cita:
Empezado por ecfisa
Hola.
Podes hacer:
Código Delphi [-]
procedure Tregistro.BitBtn8Click(Sender: TObject);
begin
with ADOTable1 do
begin
Filtered:= False;
Filter := 'NAME LIKE ' + QuotedStr(Edit1.Text + '%');
Filtered:= True;
end;
end;
Saludos.
|
Me sale un error, me dice "Project Project1.exe raised Class EOleExection With message ´No se encontro el elemento en la coleccion que corresponde al nombre o el ordinal solicitado´. Process Stopped.