ADOQuery1.sql.text := 'select * from albaranes where format(fecha, '''yyyy''')=:paramanyo and format(fecha, '''MM''')=:parammes';
ADOQuery1.parameters.paramByName('paramanyo').Value := 2005
ADOQuery1.parameters.paramByName('parammes').Value := 11
ADOQuery1.open;