各位大大,小弟的以下程序不能返回结果,并且系统提示:
在此上下文中不允许使用‘x’,此处只允许使用常量,表达式,变量,不允许使用别名!
望更正,重谢!procedure TForm1.Button1Click(Sender: TObject);
var
x,y:tdatetime;
begin
x:=strtodatetime(edit1.Text) ;
y:=strtodatetime(edit2.Text) ;
adoquery1.SQL.Clear ;
adoquery1.SQL.Add('insert into basicinformation (starttime,endtime) values (x,y)');
adoquery1.execsql;end;end.

解决方案 »

  1.   

    老大
    你那是字符呀
    用参数吧
    adoquery1.SQL.Add('insert into basicinformation (starttime,endtime) values (:x,:y)');
    parameters.parambyname('X'):=....
    parameters.parambyname('Y'):=....
      

  2.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
    x,y:tdatetime;
    begin
    //x:=strtodatetime(edit1.Text) ;
    //y:=strtodatetime(edit2.Text) ;
    adoquery1.SQL.Clear ;
    adoquery1.SQL.Add('insert into basicinformation (starttime,endtime) values ('''+edit1.Text+''','''+edit2.Text+''')');
    adoquery1.execsql;end;end.