shopdata.Moidif.SQL.Clear;
shopdata.Moidif.SQL.Add('select * from card where cardid=(:cid)');
shopdata.Moidif.Params[0].AsString:='000005';
shopdata.Moidif.ExecSQL;
shopdata.Moidif.Active:=true;
edit1.Text:=shopdata.Moidif.SQL.Text;
结果还是select * from card where cardid=(:cid)