Problema con SELECT

[ecfisa]

Hola.

Proba de esta forma:

Código Delphi [-]
  with Query do
  begin
    Close;
    SQL.Clear;
    SQL.Add('SELECT SERVICIOS.DESCSERVICIOS ');
    SQL.Add('FROM SERVICIOS, VENTA ');
    SQL.Add('WHERE VENTA.ID_SERVICIOS = SERVICIOS.ID_SERVICIOS ');
    SQL.Add('AND VENTA.ID_MES = :MES');
    ParamByName('MES').AsString:=  suiDBLookupComboBox2.Text;
    Open;
  end;

Un saludo.