Delphi ZeosLib:热门启用Sqlite3 foreign_keys?

时间:2015-12-17 12:36:11

标签: delphi sqlite foreign-keys zeos

我正在使用ZEOSDBO-7.1.4和Delphi 7来管理我的应用程序sqlite3数据库。 我创建了一些外键以允许DELETE CASCADE从详细信息表中删除行。但默认情况下禁用外键,因此您必须在开始使用DB时启用它。 我在Connect之后尝试过ExceuteDirect('PRAGMA foreign_keys = ON'),但它没有帮助。然后我试图在事务打开之后和查询之前调用PRAGMA,但它也没有帮助。

如何在Delphi中使用ZEOSDbo启用Sqlite3 foreign_keys?

1 个答案:

答案 0 :(得分:0)

ZEOSDBO来源的答案!

在打开连接之前,只需向连接对象提供属性foreign_keys=True

代码:

...    
FDbConnection.Protocol := 'sqlite-3';
FDbConnection.Properties.Add('foreign_keys=TRUE');
FDbConnection.Connect;