Readygo技术搜索引擎 网络搜索 efish 2008-1-17 1:59:53

DELPHI中定义通用的SQL函数?

楼主jxfzy（剑心）2004-03-25 14:05:19 在 Delphi / 数据库相关 提问

想做一个函数,功能如下:  
   
  通过传递的参数生成一条SQL语句  
   
  要尽量满足各种情况的查询  
   
  返回结果集 问题点数：100、回复次数：7Top

1 楼mars_han（ChanelNo.5）回复于 2004-03-25 14:16:20 得分 30

x   ->   function   myselect(var   x:string):ur   sequeltype  
            begin   result:=   {select   *   from   x   where   ...}   end;  
  ......  
  y   ->   function   myselect(var   y:string):ur   sequeltype  
            begin   result:=   {update   ...}   end;  
   
  大概就是这样喽。  
  Top

2 楼insert2003（高级打字员）回复于 2004-03-25 14:58:46 得分 20

如果要满足各种情况的查询，传送的参数最好是字符数组的。  
  Top

3 楼jxfzy（剑心）回复于 2004-03-25 15:26:04 得分 0

to   insert2003(高级打字员)  
     
  我想可能要用数组,例如字段名什么的Top

4 楼hero820914（阿伟）回复于 2004-03-25 16:59:38 得分 10

同意楼上两位Top

5 楼soaringsouth（栈桥捉鳖）回复于 2004-03-25 17:59:32 得分 20

最好不要用字符数组  
  用variant数组，这样能判断该字段值是什么类型的，就容易匹配sql字符串了  
  都是字符，和你手写有什么区别呢？Top

6 楼menggirl（我是锄禾,你是当午）回复于 2004-03-25 18:30:14 得分 20

用variant数组  
  x   ->   function   myselect(var   x:string):ur   sequeltype  
            begin   result:=   {select   *   from   x   where   ...}   end;  
  ......  
  y   ->   function   myselect(var   y:string):ur   sequeltype  
            begin   result:=   {update   ...}   end;  
   
  呵呵Top

7 楼bigery（bigery）回复于 2004-03-26 10:23:37 得分 0

学习，这个是好东西，特别是多重查询时候，很哟好处！Top