diff --git a/ideintf/propedits.pp b/ideintf/propedits.pp
index c2472b7f64..5d429eebbd 100644
--- a/ideintf/propedits.pp
+++ b/ideintf/propedits.pp
@@ -5073,7 +5073,7 @@ begin
   try
     Filter:=GetStrProp(GetComponent(0), 'Filter');
     if ShowModal=mrOk then begin
-      SetStrProp(GetComponent(0), 'Filter', Filter);
+      SetStrValue(Filter);
       Modified;
     end;
   finally