服务器端(Delphi)生成Dataset流：functionTDBService.ExecSqlQuery(constaSQL:UnicodeString):Binary;vardaDataset:IDADataset;daConn:IDAConnection;begindaConn:=Connection;ifdaConn.InTransactionthenraiseException.Create('服务器忙！');Result:=Binary.Create;trydaDataset:=daConn.NewDataset(aSQL);