基本的过程 如下:
w_client.ClientDataset_TEL.active:=false; w_client.ClientDataset_TEL.Close;
w_client.SOCKETConnection1.AppServer.closedb;自己的函数 关闭连接
whereclause:='where 宿舍 like'+'"'+edit4.text+'%'+'"';
whereclause:=whereclause+' and'+' 寝室like '+'"'+edit1.text+'%'+'"';
sql:='select * from TEL_A ';
           sql:=sql+whereclause+';';写查询语句
with  w_client.ClientDataSet_TEL do
     begin
        commandtext:=sql;  用commandtext 来查询
        Execute ;
     if w_client.SOCKETConnection1.AppServer.Opendb then begin
        Open;
        active:=true;打开表
     end;这个是具体的操作  你的sql 语句可以具体而言!!!