| 209 |
StoredTaskTrayCB: TCheckBox; |
StoredTaskTrayCB: TCheckBox; |
| 210 |
GroupBox22: TGroupBox; |
GroupBox22: TGroupBox; |
| 211 |
LoopBrowserTabsCB: TCheckBox; |
LoopBrowserTabsCB: TCheckBox; |
| 212 |
|
GroupBox23: TGroupBox; |
| 213 |
|
IgnoreContextCheckBox: TCheckBox; |
| 214 |
procedure FormCreate(Sender: TObject); |
procedure FormCreate(Sender: TObject); |
| 215 |
procedure FormDestroy(Sender: TObject); |
procedure FormDestroy(Sender: TObject); |
| 216 |
procedure ApplyButtonClick(Sender: TObject); |
procedure ApplyButtonClick(Sender: TObject); |
| 874 |
StoredTaskTrayCB.Checked := GikoSys.Setting.StoredTaskTray; |
StoredTaskTrayCB.Checked := GikoSys.Setting.StoredTaskTray; |
| 875 |
// ブラウザタブの移動でループを許可するか |
// ブラウザタブの移動でループを許可するか |
| 876 |
LoopBrowserTabsCB.Checked := GikoSys.Setting.LoopBrowserTabs; |
LoopBrowserTabsCB.Checked := GikoSys.Setting.LoopBrowserTabs; |
| 877 |
|
// |
| 878 |
|
IgnoreContextCheckBox.Checked := GikoSys.Setting.GestureIgnoreContext; |
| 879 |
end; |
end; |
| 880 |
|
|
| 881 |
procedure TOptionDialog.SaveSetting; |
procedure TOptionDialog.SaveSetting; |
| 1166 |
GikoSys.Setting.StoredTaskTray := StoredTaskTrayCB.Checked; |
GikoSys.Setting.StoredTaskTray := StoredTaskTrayCB.Checked; |
| 1167 |
GikoSys.Setting.LoopBrowserTabs := LoopBrowserTabsCB.Checked; |
GikoSys.Setting.LoopBrowserTabs := LoopBrowserTabsCB.Checked; |
| 1168 |
|
|
| 1169 |
|
GikoSys.Setting.GestureIgnoreContext := IgnoreContextCheckBox.Checked; |
| 1170 |
end; |
end; |
| 1171 |
|
|
| 1172 |
procedure TOptionDialog.SettingApply; |
procedure TOptionDialog.SettingApply; |