IBQuery e DBGrid

Question

Sauda�oes,  Gostaria de saber como fa�o para mostrar o resultado de uma IBQuery em umDBGrid.tenho o segunte codigo mas nada acontece:procedure TFormPrinc.BitBtnQueryCodClick(Sender: TObject);begin   D...

Max_ribeiro · Answer

O problema � que vc est� passando o par�metro antes de gerar a SQL. Altere o c�digo para:

// Cria��o da SQL

DM.IBQueryCod.Close;
DM.IBQueryCod.SQL.Clear;
DM.IBQueryCod.SQL.Add(� select * from IMOBILIZADOS �);
DM.IBQueryCod.SQL.Add(� where COD_IMOB = :paramCOD �);

// Depois de criada a SQL � que vc passa o par�metro
// Repare que acrescentei Params

DM.IBQueryCod.Params.ParamByName(�paramCod�).AsInteger := StrToInt(Edit5.Text);

try
DM.IBQueryCod.Prepared := True;
DM.IBQueryCod.Open;
except
on EIBError do
begin
MessageDlg(�Nao foi possivel executar esta consulta...�, mtError, [mbOK],0);
Abort;
Exit;
end;
end;

end;