Hola.
Te pongo un ejemplo que usa la tabla
employee que viene con
Delphi:
Código Delphi
[-]
procedure TForm1.btnBuscarClick(Sender: TObject);
begin
Query1.Close;
Query1.SQL.Text := 'SELECT * FROM EMPLOYEE WHERE LastName LIKE :PARAM';
Query1.ParamByName('PARAM').AsString := '%' + Edit1.Text + '%' ;
Query1.Open;
end;
Muestra:
Saludos