select 语句中变量赋值问题

start_day,i：tdate.  
  i:=start_day;  
  我想利用SELECT语句实现当数据库表中某一记录的值等于   i的值时把该记录找出来。 问题点数：20、回复次数：7Top

1 楼xzisgood（夏）回复于 2001-02-23 11:57:00 得分 0

mydate:tdatetime;  
  mydate:=datetime(i,'12:00:00')  
  query1.sql.add('select   *   from   tablename   where   datdiff(day,FieldName,:mydate)';Top

2 楼zsr（老牛）回复于 2001-02-23 12:21:00 得分 0

const    
      s:=   'select   *   from   %s   where   xxx=:thedate'  
  var  
      thedate:tdatetime;  
   
      query1.close;  
      thedate:=datetime(i,'12:00:00')  
      query1.sql.add(Format(s,[tablename,thedate]);  
      query1.open;Top

3 楼Scarlette（Lord of Borland）回复于 2001-02-23 12:28:00 得分 10

Var  
        I:   TDate;  
        TableName:   String;  
  Begin  
            With   Query1   Do  
            Begin  
                      SQL.Clear;  
                      SQL.Add('Select   *   From   '+TableName);  
                      SQL.Add('Where   Start_Day   =   :Start_Day');  
                      ParamByName('Start_Day').AsDateTime   :=   I;  
                      Open;  
            End;  
  End;Top

4 楼lmpeel（网上爬爬）回复于 2001-02-23 12:46:00 得分 10

Var  
      I:   TDate;  
      TableName:   String;  
  Begin  
          With   Query1   Do  
          Begin  
                      SQL.Clear;  
                      SQL.Add('Select   *   From   '+TableName);  
                      SQL.Add('Where   Start_Day   =   :Start_Day');  
                      Prepared   ;     //最好加上这一句  
                      ParamByName('Start_Day').AsDateTime   :=   I;  
                      Open;  
          End;  
  End;   Top

5 楼lwp_lwp（lwp_lwp）回复于 2001-02-23 18:13:00 得分 0

Var  
      I:   TDate;  
      TableName:   String;  
  Begin  
          Begin  
                query1.SQL.Clear;  
                query1.SQL.Add('Select   *   From   '+TableName);  
                query1.SQL.Add('Where   Start_Day   =   :day');  
                query1.ParamByName('dqy').AsDateTime   :=   I;  
                query1.Open;  
          End;  
  Top

6 楼shorthair（哥王）回复于 2001-02-23 19:07:00 得分 0

真的很感谢各位，本来抱着试一试的心理来这里请教，想不到还真得到了答案，我是DELPHI新手，看来我加入这个栏目是对的。全都给分！Top

7 楼chll（霖子）回复于 2001-02-23 21:48:00 得分 0

query.add('select   *   from   tablename   where   start_day='''+datetostr(i)+'''');Top

相关问题

• start
• sql
• query1
• tablename
• asdatetime
• tdate
• thedate
• parambyname
• day
• mydate

• 帖主：shorthair
• Scarlette
• lmpeel

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载