paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-12 13:50:06 +02:00
Code Issues Packages Projects Releases Wiki Activity

EditorOptions: Removed Gutter-Hints => not implemented

Browse Source 
git-svn-id: trunk@21300 -
This commit is contained in:
martin 2009-08-18 23:28:31 +00:00
parent 1d33c7ea11
commit 16a9141cef
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ide/frames/editor_general_misc_options.pas
View File

@ -65,7 +65,7 @@ begin
with EditorOptionsGroupBox do with EditorOptionsGroupBox do
begin begin
// visual effects // visual effects
Items.Add(dlgShowGutterHints); //Items.Add(dlgShowGutterHints); // unimplemented
Items.Add(lisShowSpecialCharacters); Items.Add(lisShowSpecialCharacters);
// spaces // spaces
Items.Add(dlgTrimTrailingSpaces); Items.Add(dlgTrimTrailingSpaces);
@ -92,7 +92,7 @@ begin
Checked[Items.IndexOf(lisShowSpecialCharacters)] := eoShowSpecialChars in SynEditOptions; Checked[Items.IndexOf(lisShowSpecialCharacters)] := eoShowSpecialChars in SynEditOptions;
Checked[Items.IndexOf(dlgTrimTrailingSpaces)] := eoTrimTrailingSpaces in SynEditOptions; Checked[Items.IndexOf(dlgTrimTrailingSpaces)] := eoTrimTrailingSpaces in SynEditOptions;
Checked[Items.IndexOf(dlgCloseButtonsNotebook)] := ShowTabCloseButtons; Checked[Items.IndexOf(dlgCloseButtonsNotebook)] := ShowTabCloseButtons;
Checked[Items.IndexOf(dlgShowGutterHints)] := ShowGutterHints; //Checked[Items.IndexOf(dlgShowGutterHints)] := ShowGutterHints;
Checked[Items.IndexOf(dlgFindTextatCursor)] := FindTextAtCursor; Checked[Items.IndexOf(dlgFindTextatCursor)] := FindTextAtCursor;
Checked[Items.IndexOf(dlgCopyWordAtCursorOnCopyNone)] := CopyWordAtCursorOnCopyNone; Checked[Items.IndexOf(dlgCopyWordAtCursorOnCopyNone)] := CopyWordAtCursorOnCopyNone;
Checked[Items.IndexOf(dlgCopyPasteKeepFolds)] := eoFoldedCopyPaste in SynEditOptions2; Checked[Items.IndexOf(dlgCopyPasteKeepFolds)] := eoFoldedCopyPaste in SynEditOptions2;
@ -126,7 +126,7 @@ begin
UpdateOption(dlgTrimTrailingSpaces, eoTrimTrailingSpaces); UpdateOption(dlgTrimTrailingSpaces, eoTrimTrailingSpaces);
ShowTabCloseButtons := CheckGroupItemChecked(EditorOptionsGroupBox, dlgCloseButtonsNotebook); ShowTabCloseButtons := CheckGroupItemChecked(EditorOptionsGroupBox, dlgCloseButtonsNotebook);
CopyWordAtCursorOnCopyNone := CheckGroupItemChecked(EditorOptionsGroupBox, dlgCopyWordAtCursorOnCopyNone); CopyWordAtCursorOnCopyNone := CheckGroupItemChecked(EditorOptionsGroupBox, dlgCopyWordAtCursorOnCopyNone);
ShowGutterHints := CheckGroupItemChecked(EditorOptionsGroupBox, dlgShowGutterHints); //ShowGutterHints := CheckGroupItemChecked(EditorOptionsGroupBox, dlgShowGutterHints);
FindTextAtCursor := CheckGroupItemChecked(EditorOptionsGroupBox, dlgFindTextatCursor); FindTextAtCursor := CheckGroupItemChecked(EditorOptionsGroupBox, dlgFindTextatCursor);
TrimSpaceType := TSynEditStringTrimmingType(EditorTrimSpaceTypeCheckBox.ItemIndex); TrimSpaceType := TSynEditStringTrimmingType(EditorTrimSpaceTypeCheckBox.ItemIndex);
if EditorOptionsGroupBox.Checked[EditorOptionsGroupBox.Items.IndexOf if EditorOptionsGroupBox.Checked[EditorOptionsGroupBox.Items.IndexOf