以前的代码如下:procedure XXXX;
var selectQuery:TQuery;
strSQL:string;
begin
selectQuery:=TQuery.Create(nil);
selectQuery.DatabaseName:='XXXX';
strSQL:='XXXXXX';
selectQuery.Close;
selectQuery.SQL.Clear;
selectQuery.SQL.Add(strSQL);
...................................................
........................................................
selectQuery.Close;
end;现在我想改成ADO组件ADOQuery,如何改?我开始是直接把var selectQuery:TQuery;
写成:var selectQuery:TADOQuery;
好象不行啊,请问各位高手如何改啊?另外问一个白痴问题,这个是在过程中Create一个TQuery组件,这和在窗体上拉一个TQuery组件放到窗体上有何区别?
var selectQuery:TQuery;
strSQL:string;
begin
selectQuery:=TQuery.Create(nil);
selectQuery.DatabaseName:='XXXX';
strSQL:='XXXXXX';
selectQuery.Close;
selectQuery.SQL.Clear;
selectQuery.SQL.Add(strSQL);
...................................................
........................................................
selectQuery.Close;
end;现在我想改成ADO组件ADOQuery,如何改?我开始是直接把var selectQuery:TQuery;
写成:var selectQuery:TADOQuery;
好象不行啊,请问各位高手如何改啊?另外问一个白痴问题,这个是在过程中Create一个TQuery组件,这和在窗体上拉一个TQuery组件放到窗体上有何区别?
有一些库是BDE更方便点的
不知道你具体是用的什么库
selectQuery.Connection := xxxxxx;
selectQuery.sql.text := 'select * from xxxx';
selectQuery.open;