[ecfisa]

Hola Lucas.

Reemplazá la consulta por:

Código Delphi [-]
  with ADOQuery1 do
  begin
    Close;
    SQL.Text:='SELECT * FROM EMPLEADOS WHERE APELLIDO LIKE '+QuotedStr(Edit1.Text + '%');
    Open;
  end;

Saludos.