procedure TFormHouseList. Action13Execute (Sender: TObject);
Var
SSQL: String;
The begin
SSQL:='select * from Houselist where housetype=' 'idle' ';
SSQL: SSQL=+ 'and userid=' + inttostr (Form1. Uid) + 'order by id desc;
DataModule2. AQHouseList. Close;//close ADOQuery1, for SQL update
DataModule2. AQHouseList. SQL. The Clear;//to empty the SQL statement
DataModule2. AQHouseList. SQL. The Add (SSQL);//add a new SQL
DataModule2. AQHouseList. Open;//new SQL effective
end;
CodePudding user response:
Can put the AdoQuery and SQL statements to sit for the parameter in operation,If only this process you can hand in the Adoquery and UID,
CodePudding user response:
Detailed code?