Verificar id do produto pegando o id da DBLookUpComboBox

Eu queria pegar o id do produto da DBLookUpComboBox e jogar na query para pesquisar o preço do produto, a minha DBLookUpComboBox exibe o nome do produto mas o que é salvo é o id do produto(so postei isso pq n sei se é importante), e depois eu quero jogar o preço num dbedit e aki estao os comandos

DMTabelas.ZQueryProdutos.SQL.Clear;
DMTabelas.ZQueryProdutos.SQL.Add(
SELECT+
PRODUTOS.IDPRODUTO, PRODUTOS.VALOR_VENDA+
FROM+
PRODUTOS+
WHERE+
PRODUTOS.IDPRODUTO=+quotedstr(DBLookupComboBox1.Field.AsString));
DMTabelas.ZQueryProdutos.Active:=true;

DMTabelas.ZTProdutosValor_Venda.Value:=
DMTabelas.ZQueryProdutos.Fields.fieldbyname(Valor_Venda).AsFloat;