Codigo SQL para consulta por LookupComboBox

Delphi

07/05/2003

Aí, meu problema é o seguinte.
Tenho uma tabela de produtos com campos: NomeProduto,
ValorProduto, CodFornec e NomeFornecedor(Lookup).
Na tabela fornecedores tem os campos: ForCodigo e ForNome.
Fiz um form para consulta de produtos por fornecedor
com uma lookupcombobox para escolha do fornecedor desejado.
Como ficaria o codigo SQL para fazer tal consulta? Tentei
o seguinte codigo:
´ Select NomeProduto, ValorProduto from Produtos join
Fornecedores on CodFornec = ForCodigo
Where ForNome = Dblookupcombobox.text´ , mas nao retorna
nenhum valor.

Alguem pode me auxiliar.
Obrigado.


Eduunai

Eduunai

Curtidas 0

Respostas

Crash

Crash

07/05/2003

Aí, meu problema é o seguinte. Tenho uma tabela de produtos com campos: NomeProduto, ValorProduto, CodFornec e NomeFornecedor(Lookup). Na tabela fornecedores tem os campos: ForCodigo e ForNome. Fiz um form para consulta de produtos por fornecedor com uma lookupcombobox para escolha do fornecedor desejado. Como ficaria o codigo SQL para fazer tal consulta? Tentei o seguinte codigo: ´ Select NomeProduto, ValorProduto from Produtos join Fornecedores on CodFornec = ForCodigo Where ForNome = Dblookupcombobox.text´ , mas nao retorna nenhum valor. Alguem pode me auxiliar. Obrigado.


coloque assim:

SELECT
D.NOMEPRODUTO,
D.VALORPRODUTO
FROM PRODUTOS D
LEFT JOIN FORNECEDORES E
ON (D.CODFORNEC = E.FORCOD)
WHERE
E.FORNOME like :parNOME

ae vc passa o seguinte valor ao parametro criado:

Tabela.ParamByName(´parNOME´).Value:= ´¬´ + Dblookupcombobox.text + ´¬´;
Tabela.Open;

O certo nao é usar um DBLookupComboBox mais sim um edit normal

flws


GOSTEI 0
POSTAR