delphi - 是/否字段的默认值

Question

正在努力解决一个极其简单的问题，但是，由于 ADO 缺乏更具体的错误消息，我无法弄清楚。

我需要使用 SQL 在表中添加一个新列，列类型是 YESNO，但是，我也想将其默认值设置为 TRUE|YES 或任何杰出工程师认为的名称...这就是我所拥有的:

ALTER TABLE TABLENAME
ADD COLUMN VISIBLE YESNO DEFAULT YES; /* the engine complains, 1 is also not ok, true is not ok, what is OK? */

如果我删除默认之后的所有内容，SQL 将按预期执行...

谢谢!

编辑:

以防万一其他人碰上这堵“墙”，这是我的最终 SQL:

ALTER TABLE TABLENAME
ADD COLUMN VISIBLE YESNO -1;

Answer 1

您需要针对连接执行才能使用默认值，例如:

s = "ALTER TABLE TABLE1 ADD COLUMN VISIBLE YESNO DEFAULT true"
CurrentProject.Connection.Execute s

-1 也很好。如果你想显示一个复选框，你将需要VBA。