From 8e6f81cbd0b961969115d3e117fb2fcd0ce15731 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Micha=C3=ABl=20Van=20Canneyt?= <michael@freepascal.org>
Date: Tue, 21 Feb 2023 16:59:59 +0100
Subject: [PATCH] * No filter on blob

---
 packages/fcl-db/jsondataset.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/packages/fcl-db/jsondataset.pas b/packages/fcl-db/jsondataset.pas
index 82e2555..f4f2e51 100644
--- a/packages/fcl-db/jsondataset.pas
+++ b/packages/fcl-db/jsondataset.pas
@@ -1382,7 +1382,8 @@ Var
 begin
   Result:=FilterExpressionClass.Create(Self);
   for I:=0 to Fields.Count-1 do
-    Result.Identifiers.AddVariable(Fields[i].FieldName,FieldTypeToExpressionType(Fields[i].DataType),@GetFilterField);
+    if not (Fields[i].DataType in [ftBlob,ftMemo]) then
+      Result.Identifiers.AddVariable(Fields[i].FieldName,FieldTypeToExpressionType(Fields[i].DataType),@GetFilterField);
   Result.Identifiers.AddFunction('IsNull','B','S',@GetFilterIsNull);
   Result.Expression:=Filter;
 end;