[sac]

Para ayudar a alguno que lo necesite a mi me funcionó de ésta manera:

Código Delphi [-]
Query1.close;   
Query1.sql.clear;   
Query1.SQL.Add('Select ...');   
Query1.SQL.Add('From ....'); //Luego anidé un if con mis 4 posibles consultas por campo cambiando el where y order   
if variable1 then 
begin 
  query1.sql.add('where Edad = :Pedad');  
  query1.sql.add('order by Nombre');   
end 
else //y Saliendo del if  
  Query1.Open; 
  DBGrid1.DataSource:=DS_...;  
end;

También podría haber usado un case en lugar del if
Espero que se haya entendido pero de ésta manera me funcionó