[DELPHI] Como fazer o Edit salvar em uma Query? E Operação de multiplicação de campos...

Bom dia a todos :

Estou treinando no Delphi e me deparei com uma coisa que não estou conseguindo resolver... normalmente é facil gravar um DBEdit em uma tabela firebird atraves de uma Query. Porem em um exercicio que estou fazendo, eu preciso salvar de um Edit comum...

Vamos lá:

Então eu tenho:
1- Conexão
2- QROrcamento (query de Orçamento)
3- DSOrcamento (Datasource de Orçamento)
4- QRRegistro (Query de Registro)
5- DSRegistro (Datasource de Registro)
6- QREstoque (Query de Estoque)
7- DSEstoque (Datasource de Estoque)

Eu gostaria de fazer uma tabela de Orçamento... onde na tela, puxaria as informações da tabela Registro (ID e Cliente [O cliente esta sendo usado um LookupCombobox])
e depois de selecionar o cliente, selecionaria o produto, puxado da tabela Estoque (ID do produto, descrição, valor unitario etc...); Ao mesmo tempo informar a quantidade na tela e adicionar a tabela Orçamento. Porem tudo isso tem que ser feito usando Edit's.

No botão de salvar eu coloquei assim:

procedure Tfrm_orcamento2.Button2Click(Sender: TObject);
begin
if QREstoque.RecordCount <> 0 then
begin
QROrcamento.Close;
QROrcamento.SQL.Clear;
QROrcamento.SQL.Add('select * from orcamento where produto');
QROrcamento.SQL.Add('= :pProduto');
QROrcamento.ParamByName('pProduto').AsString := edtPRODUTO.Text;
QROrcamento.SQL.Add('select * from orcamento where ID_Produto');
QROrcamento.SQL.Add('= : pIDProduto');
QROrcamento.ParamByName('pIDProduto').AsString := edtID_PRODUTO.Text;
QROrcamento.SQL.Add('select * from orcamento where quantidade');
QROrcamento.SQL.Add('= : pquantidade');
QROrcamento.ParamByName('pquantidade').AsString := edt_QUANTIDADE.Text;
QROrcamento.Post;

end
else
begin
ShowMessage('Favor inserir o porduto para o orçamento');
end;


Mas está retornando o seguinte:

QROrcamento: Parameter 'pIDProduto' not found.


Alguem tem alguma sugestão?