Select não funciona
Bom dia Pessoal,
Estou tentando fazer um select em uma tabela de acordo com o item selecionado em um dbgrid, consultando pelo código. No SQLQuery, deixei o parametro SQL limpo e estou passando a instrução em tempo de execução, como mostra o código abaixo. Porém, não está funcionando. O que posso estar fazendo de errado?
Fico no aguardo,
Form_Relatorio_Fornecedor.SQLQuery1.Close;
Form_relatorio_fornecedor.sqlquery1.Active := false;
Form_Relatorio_Fornecedor.SQLQuery1.SQL.Clear;
Form_Relatorio_Fornecedor.SQLQuery1.SQL.Add('SELECT * FROM Fornecedor Where CodigoFornecedor = ' + DBGrid1.Columns[0].Field.Text);
Form_relatorio_fornecedor.sqlquery1.Active := true;
Form_Relatorio_fornecedor.SQLQuery1.ExecSQL;
Form_Relatorio_fornecedor.quickrep1.Preview;
Form_Relatorio_Fornecedor.SQLQuery1.open;
Eder Pardeiro
Curtidas 0
Respostas
Emerson Nascimento
22/12/2010
há comandos demais aí...
Form_Relatorio_Fornecedor.SQLQuery1.Close;
Form_Relatorio_Fornecedor.SQLQuery1.SQL.Clear;
Form_Relatorio_Fornecedor.SQLQuery1.SQL.Add('SELECT * FROM Fornecedor Where CodigoFornecedor = ' + DBGrid1.Columns[0].Field.Text);
Form_Relatorio_fornecedor.SQLQuery1.Open;
Form_Relatorio_fornecedor.quickrep1.Preview;
Form_Relatorio_Fornecedor.SQLQuery1.Close;
Form_Relatorio_Fornecedor.SQLQuery1.SQL.Clear;
Form_Relatorio_Fornecedor.SQLQuery1.SQL.Add('SELECT * FROM Fornecedor Where CodigoFornecedor = ' + DBGrid1.Columns[0].Field.Text);
Form_Relatorio_fornecedor.SQLQuery1.Open;
Form_Relatorio_fornecedor.quickrep1.Preview;
GOSTEI 0