joaoc

Fiz esta consulta no delphi 6 mas apresenta um erro.... Sera que alguém pode me ajudar. procedure TForm2.Edit1Change(Sender: TObject); begin Query1.close; Query1.sql.clear; Query1.sql.add('select * from TbFuncionarios where Nome_func Like '+Edit1.Text+''); Query1.ExecSQL; Query1.open; end;