From 3b455ce118c5c4457c3ab0e82c83830b8b3e89aa Mon Sep 17 00:00:00 2001
From: alexs75 <alexs75@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Thu, 14 May 2020 20:44:46 +0000
Subject: [PATCH] RxFPC:fix RxDBGrid.ReadOnly after removal of
 TCustomCombobox.ReadOnly property.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7457 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/rx/trunk/rxdb/rxdbgrid.pas | 17 +++++++----------
 1 file changed, 7 insertions(+), 10 deletions(-)

diff --git a/components/rx/trunk/rxdb/rxdbgrid.pas b/components/rx/trunk/rxdb/rxdbgrid.pas
index 03c56ec4c..daa924403 100644
--- a/components/rx/trunk/rxdb/rxdbgrid.pas
+++ b/components/rx/trunk/rxdb/rxdbgrid.pas
@@ -7122,16 +7122,13 @@ begin
   FPropertyStorageLink.OnLoad := @OnIniLoad;
 
   FFilterListEditor := TFilterListCellEditor.Create(nil);
-  with FFilterListEditor do
-  begin
-    Name := 'FilterListEditor';
-    Visible := False;
-    Items.Append('');
-    ReadOnly := True;
-    AutoComplete := True;
-    OnChange := @FFilterListEditorOnChange;
-    OnCloseUp := @FFilterListEditorOnCloseUp;
-  end;
+  FFilterListEditor.Name := 'FilterListEditor';
+  FFilterListEditor.Visible := False;
+  FFilterListEditor.Items.Append('');
+  //FFilterListEditor.ReadOnly := True;
+  FFilterListEditor.AutoComplete := True;
+  FFilterListEditor.OnChange := @FFilterListEditorOnChange;
+  FFilterListEditor.OnCloseUp := @FFilterListEditorOnCloseUp;
 
   FFilterColDlgButton:=TFilterColDlgButton.Create(nil);
   FFilterColDlgButton.Name := 'FilterColDlgButton';