delphi - How to pass parameters to an ADOQuery object? -


i using adoquery in delphi 7 , oracle. getting error while passing parameters adoquery. have used following line. please me identify error.

adoquery.sql.text:= 'select * temp_table '+         'where column1 in (select column table2 id=:id) , id=:id'; adoquery.parameters.parambyvalue('id').value= 'abc'; adoquery.open; 

when open query following error:

parameter object improperly defined. inconsistent or incomplete information provided.

we have same problem, ended "masking" class tparameters this:

declaration:

tmyparameter = class(tparameter) private   function getasvalue: variant;   procedure setasvalue(const value: variant); public   property value: variant read getasvalue write setasvalue; end; 

implementation:

procedure tmyparameter.setasvalue(const value: variant); var   ipar: integer;  begin   ipar:= 0 collection.count - 1     if (name = tparameter(collection.items[ipar]).name)       tparameter(collection.items[ipar]).value:= value; end;  function tmyparameter.getasvalue: variant; begin   result:= inherited value; end; 

and how use:

tmyparameter(adoquery.parameters.parambyname('id')).asvalue:= 'abc'; 

i hope helps.


Comments

Popular posts from this blog

objective c - Change font of selected text in UITextView -

php - Accessing POST data in Facebook cavas app -

c# - Getting control value when switching a view as part of a multiview -