insert 插入日期如何作

Question

query1.close;
        query1.sql.clear;
        query1.sql.add('insert into workk');
        query1.sql.add('(date) values ');
        query1.sql.add('(:Date)');
        Query1.ParamByName('Date').AsDateTime := Now; 
        query1.ExecSQL;

Answer 1

query1.close;
        query1.sql.clear;
        query1.sql.add('insert into workk');
        query1.sql.add('(date) values ');
        query1.sql.add('(:Date)');
        Query1.ParamByName('Date').AsDateTime := Now; 
        query1.ExecSQL;

Answer 2

你是什么数据库呢？如果是Access的话，改为#'2001-01-02#

Answer 3

query1.close;
        query1.sql.clear;
        query1.sql.add('insert into workk');
        query1.sql.add('(date) values ');
        query1.sql.add('(:date1)');
        query1.FieldByName('date1').asstring:='2001-01-02';
        query1.ExecSQL;

Answer 4

你用一个变量把它存起来。
var
date:string;
begin
date:='2001-01-02';
query1.close;
        query1.sql.clear;
        query1.sql.add('insert into workk');
        query1.sql.add('(date) values ');
        query1.sql.add('('+date+')');
        query1.ExecSQL;

Answer 5

with query do 
beign
close; 
sql.clear; 
add('insert into workk');
query1.sql.add('(date) values '); 
sql.add('(:Date)');
ParamByName('Date').AsDateTime := Now; 
ExecSQL;  
end;