| 183 |
GroupBox5: TGroupBox; |
GroupBox5: TGroupBox; |
| 184 |
BrowserMaxLabel: TLabel; |
BrowserMaxLabel: TLabel; |
| 185 |
BrowserMaxCombo: TComboBox; |
BrowserMaxCombo: TComboBox; |
|
TabSheet5: TTabSheet; |
|
|
GroupBox17: TGroupBox; |
|
|
SpaceToNBSPCheckBox: TCheckBox; |
|
|
AmpToCharRefCheckBox: TCheckBox; |
|
| 186 |
procedure FormCreate(Sender: TObject); |
procedure FormCreate(Sender: TObject); |
| 187 |
procedure FormDestroy(Sender: TObject); |
procedure FormDestroy(Sender: TObject); |
| 188 |
procedure ApplyButtonClick(Sender: TObject); |
procedure ApplyButtonClick(Sender: TObject); |
| 788 |
AddResAnchorCheckBox.Checked := GikoSys.Setting.AddResAnchor; |
AddResAnchorCheckBox.Checked := GikoSys.Setting.AddResAnchor; |
| 789 |
DeleteSyriaCheckBox.Checked := GikoSys.Setting.DeleteSyria; |
DeleteSyriaCheckBox.Checked := GikoSys.Setting.DeleteSyria; |
| 790 |
|
|
|
// エディタ |
|
|
SpaceToNBSPCheckBox.Checked := GikoSys.Setting.SpaceToNBSP; |
|
|
AmpToCharRefCheckBox.Checked := GikoSys.Setting.AmpToCharRef; |
|
|
|
|
| 791 |
end; |
end; |
| 792 |
|
|
| 793 |
procedure TOptionDialog.SaveSetting; |
procedure TOptionDialog.SaveSetting; |
| 1015 |
GikoSys.Setting.ShowNGLinesNum := ShowNGLineCheckBox.Checked; |
GikoSys.Setting.ShowNGLinesNum := ShowNGLineCheckBox.Checked; |
| 1016 |
GikoSys.Setting.AddResAnchor := AddResAnchorCheckBox.Checked; |
GikoSys.Setting.AddResAnchor := AddResAnchorCheckBox.Checked; |
| 1017 |
GikoSys.Setting.DeleteSyria := DeleteSyriaCheckBox.Checked; |
GikoSys.Setting.DeleteSyria := DeleteSyriaCheckBox.Checked; |
|
|
|
|
// エディタ |
|
|
GikoSys.Setting.SpaceToNBSP := SpaceToNBSPCheckBox.Checked; |
|
|
GikoSys.Setting.AmpToCharRef := AmpToCharRefCheckBox.Checked; |
|
| 1018 |
end; |
end; |
| 1019 |
|
|
| 1020 |
procedure TOptionDialog.SettingApply; |
procedure TOptionDialog.SettingApply; |