[ecfisa]

Hola.

No conozco la sintáxis SQL de Access pero te pongo un ejemplo que espero te dé una idéa:

Código Delphi [-]
...
 if ComboBox1.ItemIndex <= ComboBox2.ItemIndex then
    with IBQuery do
    begin
      Close;
      SQL.Clear;
      SQL.Add('SELECT * FROM LA_TABLA ');
      SQL.Add('WHERE EXTRACT(MONTH FROM EL_CAMPO_FECHA) BETWEEN :PFECHA1 AND :PFECHA2 ');
      SQL.Add('ORDER BY CAMPO_FECHA');
      ParamByName('PFECHA1').Value := ComboBox1.ItemIndex+1; 
      ParamByName('PFECHA2').Value := ComboBox2.ItemIndex+1;
      Open;
    end;
...

Si usas ADO, mínimamente tendrías que cambiar :

Código Delphi [-]
 
  with ADOQuery do
  begin
     ...
     Parameters.ParamByname(...

Saludos.