Código SQL

Preciso que ao selecionar em uma combobox um mês, exiba todas as vendas este mês, então fiz este código, mas dá um erro de sintaxe perto da palavra FROM!!!

Alguém sabe o que pode ser??? OBS: Minha combo tem como opções os mês desta maneira: 1, 2, etc...

dmData.qryConsVenda.Close; dmData.qryConsVenda.SQL.Clear; dmData.qryConsVenda.SQL.Text := 'Select * From TBL_VENDAS Where extract(month from data) = :Mes'; dmData.qryConsVenda.Parameters[0].Value := cmbMes.Text; dmData.qryConsVenda.Open; rvpjConsVendas.Execute;

Valeu!!!

Wellington