Delphi6好像不认识数据库中的NULL关键字啊,应该怎么改才能使原来用5开发的程序通过编译?

解决方案 »

  1.   

    用Variant类型的变量来操作你的值为NULL的字段
    procedure TForm.QueryClick(Sender: TObject);
    var
      ls   :   Variant;
      sql_str   :  string; 
     begin
        ls  :=   null   ;
        ...
        sql_str := ' INSERT  INTO   mytable(typy)    VALUES(:typy) ' ;
        ADOQuery.Parameters.ParamByName('type').value   :=   ls  ; 
        ADOQuery.ExecSQL;
        ...
     end;