diff --git a/packages/fcl-db/tests/sqldbtoolsunit.pas b/packages/fcl-db/tests/sqldbtoolsunit.pas index 691fb37cc8..c9b2ac3603 100644 --- a/packages/fcl-db/tests/sqldbtoolsunit.pas +++ b/packages/fcl-db/tests/sqldbtoolsunit.pas @@ -652,16 +652,15 @@ begin // which leads to the rollback not referring to the right transaction=>SQL error // Use SQL92 ISO standard INFORMATION_SCHEMA: FConnection.ExecuteDirect( - 'if exists (select * from INFORMATION_SCHEMA.TABLES where TABLE_TYPE=''BASE TABLE'' AND TABLE_NAME=''' + ATableName + ''') '+ - 'begin '+ - 'drop table ' + ATableName + ' '+ - 'end'); + 'if exists (select * from INFORMATION_SCHEMA.TABLES where TABLE_TYPE=''BASE TABLE'' AND TABLE_NAME=''' + ATableName + ''')'+ + ' drop table ' + ATableName ); end; ssMySQL: begin FConnection.ExecuteDirect('drop table if exists ' + ATableName); end; - ssPostgresql: + ssPostgreSQL, + ssSQLite: begin FConnection.ExecuteDirect('drop table if exists ' + ATableName); FTransaction.CommitRetaining;