Добавил интеграции с ОБС

2025-08-07 21:58:46 +03:00
parent a4cbf1c709
commit 193e4cb2fa
14 changed files with 534 additions and 229 deletions
@@ -498,7 +498,11 @@ var
  Value: TValue;
  Param: TFDParam;
 begin
-  if Length(Items) = 0 then Exit;
+  if Length(Items) = 0 then
+  begin
+    FConnection.ExecSQL('DELETE FROM ' + TableName);
+    exit;
+  end;

  EnsureTableForRecord(TableName, TypeInfo(T));