Hola que tal
a mi parecer el motivo del error puede ser por el espacio entre los : (dos puntos) y el parametro
Código Delphi
[-]Q_RubroSalida.Close;
Q_RubroSalida.SQL.Clear;
Q_RubroSalida.SQL.Add('Select A.Comercio');
Q_RubroSalida.SQL.Add('From Salidas A, rubrosSalida B');
Q_RubroSalida.SQL.Add('where (B.rubro =:rubroselec) and (A.Id_rubroSalida = B.id_rubroSalida);
Q_RubroSalida.parambyname('rubroselec').asString:= elijorubro.text;
Q_RubroSalida.Active:=true
prueba quitando el espacio.
Saludos