sqlite3 delete on cascade with Delphi XE Zeosdb Tztable



我有两个表Client, command

sqlite3中的DDL如下,

CREATE TABLE Client ( 
    id_client  INT              NOT NULL,
    nom        varchar(10),
    PRIMARY KEY ( id_client ) 
);

CREATE TABLE Commande ( 
    id_commande   INT     NOT NULL,
    id_client     INTEGER REFERENCES Client ( id_client ) ON DELETE CASCADE
                                                          ON UPDATE CASCADE,
    PRIMARY KEY ( id_commande ) 

);

我使用TzTable1为客户端和TzTable2为命令因此,当我通过调用Tztable1.delete ;
从client表中删除客户端时,,它不会从命令表中删除关联的命令!!

我不知道问题在哪里!

我猜你将不得不在调用Tztable1.delete后重新打开TzTable2,以反映发生在DB级别的更改。

最新更新