paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-05 05:37:14 +01:00
Code Issues Packages Projects Releases Wiki Activity

IdeIntf: Fix AutoAddRows feature for ValueListEditor property editor.

Browse Source 
git-svn-id: trunk@44576 -
This commit is contained in:
juha 2014-04-01 00:34:22 +00:00
parent 18858b8e2d
commit 13b4f9aa2d
2 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/ideintf/keyvalpropeditdlg.lfm
View File

@ -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 = (
''
)

2
components/ideintf/keyvalpropeditdlg.pas
View File

@ -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);