From 13b4f9aa2d69eefae655c6ba9256b92406a309b1 Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Tue, 1 Apr 2014 00:34:22 +0000
Subject: [PATCH] IdeIntf: Fix AutoAddRows feature for ValueListEditor property
 editor.

git-svn-id: trunk@44576 -
---
 components/ideintf/keyvalpropeditdlg.lfm | 3 ++-
 components/ideintf/keyvalpropeditdlg.pas | 2 --
 2 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/components/ideintf/keyvalpropeditdlg.lfm b/components/ideintf/keyvalpropeditdlg.lfm
index 0659a65b98..c9435dbef7 100644
--- a/components/ideintf/keyvalpropeditdlg.lfm
+++ b/components/ideintf/keyvalpropeditdlg.lfm
@@ -69,7 +69,8 @@ object KeyValPropEditorFrm: TKeyValPropEditorFrm
       FixedCols = 0
       RowCount = 2
       TabOrder = 1
-      KeyOptions = [keyEdit, keyDelete]
+      KeyOptions = [keyEdit, keyAdd, keyDelete]
+      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goEditing, goAutoAddRows, goAlwaysShowEditor, goThumbTracking]
       Strings.Strings = (
         ''
       )
diff --git a/components/ideintf/keyvalpropeditdlg.pas b/components/ideintf/keyvalpropeditdlg.pas
index 3028ce7662..efd079823d 100644
--- a/components/ideintf/keyvalpropeditdlg.pas
+++ b/components/ideintf/keyvalpropeditdlg.pas
@@ -44,8 +44,6 @@ begin
   Caption := oisStringsEditorDialog;
   StatusLabel.Caption := ois0Lines0Chars;
   //SortButton.Caption := oisSort;
-  // This does not work :(
-  ValueListEdit.Options := ValueListEdit.Options + [goAutoAddRows];
 end;
 
 procedure TKeyValPropEditorFrm.SortButtonClick(Sender: TObject);