Consulta a Excel

[Alejandro Horns]

Hola a todos me gustaria como poder pasar mi consulta que me despliega en un dbgrid a excel

ej si tengo

with query1 do
begin
close;
sql.clear;
sql.add('Select nombre, apellido');
sql.add('from Cliente');
sql.add(where Nombre = 'RAUL');
ParambyName('Nombre').AsString := ENombre.Text;
open;
end;

este resultado me lo muestra en un dbgrid , pero me gustaria pasar esos resultados a un libro excel, si alguien puede guiarme o tiene algun pequeño ejemplo se lo agradecere

gracias por la ayuda!!!