三层的数据问题。(5分)

procedure TForm1.Button1Click(Sender: TObject);
var data levariant ;
begin
clientdataset1.RemoteServer.AppServer.getkh(edit1.text,data);
clientdataset1.Data :=data ;
end;
我以确定应用层已经启动，当我
getkh是根据edit1.text查询得到数据，在data传出来。在送到客户端。
但是提示invalid data packed,问题出在哪里了？

sql 语句错误！

用数据库的事件查看器跟踪一下，如没问题，getkh方法有问题。
如TDatasetProvider是否设置了允许更改sql语句。option选项.

多人接受答案了。