paradox的INSERT语句

Question

insert into tab_xx(now_date)values('12/12/2001')

Answer 1

SQL.Add('insert into tab_xx(now_date)values(:vDate)');
Params[0].asDate := StrtoDate('2001-12-12');  

Answer 2

给你一个函数，可以轻松实现日期格式转换。
function TMainForm.ChangeDate(DT: Tdate): string;
var
  str, tmp          : string;
begin
  str := datetimetostr(DT);
  if pos('-', str) = 3 then {如果'-'出现的位置为第3位，即为00-8-20格式}
    begin
      tmp := copy(str, 1, 2);
      str := copy(str, 4, length(str) - 3);
      str[Pos('-', Str)] := '/';
      result := str + '/' + tmp;
    end
  else if pos('-', str) = 5 then {如果'-'出现的位置为第5位，即为2000-8-20格式}
    begin
      tmp := copy(str, 1, 4);
      str := copy(str, 6, length(str) - 5);
      str[Pos('-', Str)] := '/';
      result := str + '/' + tmp;
    end;
end;
完全没有问题。

Answer 3

paradox数据库中的时间类型的字段格式是MM/DD/YYYY，在对它才做是最好先Format，再对表进行操作，例：S_Date := FormatDateTime('MM''/''DD''/''YYYY', MinDate);

Answer 4

paradox数据库中的时间类型的字段格式是MM/DD/YYYY，在对它才做是最好先Format，再对表进行操作，例：S_Date := FormatDateTime('MM''/''DD''/''YYYY', MinDate);