窗口置顶:

SetWindowPos(Form_showerr.Handle,HWND_TOPMOST,0,0,0,0,SWP_NOMOVE or SWP_NOSIZE);

数据集的locate方法:

uses memdata;

DataModule1.UniQuery_hklist.LocateEx('普查机构代码;户籍归属地派出所代码;户号;姓名',VarArrayOf([dzm,pccode,hh,xm]),[lxPartialCompare])