| 68 |
AHandredGroupBox: TGroupBox; |
AHandredGroupBox: TGroupBox; |
| 69 |
AHandredLabeledEdit: TLabeledEdit; |
AHandredLabeledEdit: TLabeledEdit; |
| 70 |
UpDown1: TUpDown; |
UpDown1: TUpDown; |
| 71 |
|
HTMLGroupBox: TGroupBox; |
| 72 |
|
AddKeywordCheckBox: TCheckBox; |
| 73 |
procedure OkBottonClick(Sender: TObject); |
procedure OkBottonClick(Sender: TObject); |
| 74 |
procedure FormCreate(Sender: TObject); |
procedure FormCreate(Sender: TObject); |
| 75 |
procedure CDeleteButtonClick(Sender: TObject); |
procedure CDeleteButtonClick(Sender: TObject); |
| 138 |
MoveHistoryMaxEdit.Text := IntToStr( GikoSys.Setting.MoveHistorySize ); |
MoveHistoryMaxEdit.Text := IntToStr( GikoSys.Setting.MoveHistorySize ); |
| 139 |
// 先頭表示レス数 |
// 先頭表示レス数 |
| 140 |
AHandredLabeledEdit.Text := IntToStr( GikoSys.Setting.HeadResCount ); |
AHandredLabeledEdit.Text := IntToStr( GikoSys.Setting.HeadResCount ); |
| 141 |
|
// 関連キーワード追加フラグ |
| 142 |
|
AddKeywordCheckBox.Checked := GikoSys.Setting.AddKeywordLink; |
| 143 |
end; |
end; |
| 144 |
|
|
| 145 |
procedure TKuroutOption.SaveSetting; |
procedure TKuroutOption.SaveSetting; |
| 176 |
StrToIntDef( AHandredLabeledEdit.Text , 1); |
StrToIntDef( AHandredLabeledEdit.Text , 1); |
| 177 |
|
|
| 178 |
GikoSys.Setting.KuroutSettingTabIndex := PageControl1.ActivePageIndex; |
GikoSys.Setting.KuroutSettingTabIndex := PageControl1.ActivePageIndex; |
| 179 |
|
// 関連キーワード追加フラグ |
| 180 |
|
GikoSys.Setting.AddKeywordLink := AddKeywordCheckBox.Checked; |
| 181 |
|
|
| 182 |
end; |
end; |
| 183 |
|
|
| 184 |
procedure TKuroutOption.RecvBufferSizeExit(Sender: TObject); |
procedure TKuroutOption.RecvBufferSizeExit(Sender: TObject); |