paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-15 21:19:07 +02:00
Code Issues Packages Projects Releases Wiki Activity

EditorOptions: PreviewSyn would not always show correct "every nth LineNum only"

Browse Source 
git-svn-id: trunk@21219 -
This commit is contained in:
martin 2009-08-13 23:27:18 +00:00
parent e993b0b561
commit 8a5cb23dc0
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ide/frames/editor_display_options.pas
View File

@ -281,11 +281,13 @@ procedure TEditorDisplayOptionsFrame.ReadSettings(AOptions: TAbstractIDEOptions)
begin begin
with AOptions as TEditorOptions do with AOptions as TEditorOptions do
begin begin
// init the spin-edit first, since it does not trigger on change,
// but is copied when checkboxes are initalized
ShowOnlyLineNumbersMultiplesOfSpinEdit.Value := ShowOnlyLineNumbersMultiplesOf;
GutterSeparatorIndexSpinBox.Value := GutterSeparatorIndex;
VisibleRightMarginCheckBox.Checked := VisibleRightMargin; VisibleRightMarginCheckBox.Checked := VisibleRightMargin;
VisibleGutterCheckBox.Checked := VisibleGutter; VisibleGutterCheckBox.Checked := VisibleGutter;
ShowLineNumbersCheckBox.Checked := ShowLineNumbers; ShowLineNumbersCheckBox.Checked := ShowLineNumbers;
ShowOnlyLineNumbersMultiplesOfSpinEdit.Value := ShowOnlyLineNumbersMultiplesOf;
GutterSeparatorIndexSpinBox.Value := GutterSeparatorIndex;
VisibleRightMarginCheckBox.Checked := VisibleRightMargin; VisibleRightMarginCheckBox.Checked := VisibleRightMargin;
SetComboBoxText(RightMarginComboBox, IntToStr(RightMargin)); SetComboBoxText(RightMarginComboBox, IntToStr(RightMargin));
SetComboBoxText(EditorFontComboBox, EditorFont); SetComboBoxText(EditorFontComboBox, EditorFont);