Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/Option.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.94 by h677, Sun Feb 20 06:47:14 2011 UTC revision 1.95 by h677, Tue Feb 22 13:37:51 2011 UTC
# Line 886  begin Line 886  begin
886    
887          //Be2ch認証          //Be2ch認証
888          BeUserIDEdit.Text := GikoSys.Setting.BeUserID;          BeUserIDEdit.Text := GikoSys.Setting.BeUserID;
889          BeCodeEdit.Text := GikoSys.Setting.BeCode;          BeCodeEdit.Text := GikoSys.Setting.BePassword;
890          BeAutoLoginCheckBox.Checked := GikoSys.Setting.BeAutoLogin;          BeAutoLoginCheckBox.Checked := GikoSys.Setting.BeAutoLogin;
891          //履歴の最大保存数          //履歴の最大保存数
892          MaxRecordCountEdit.Text := IntToStr(GikoSys.Setting.MaxRecordCount);          MaxRecordCountEdit.Text := IntToStr(GikoSys.Setting.MaxRecordCount);
# Line 1189  begin Line 1189  begin
1189          GikoSys.Setting.UseUndecided := UseUndecidedCheckBox.Checked;          GikoSys.Setting.UseUndecided := UseUndecidedCheckBox.Checked;
1190          //Be2ch          //Be2ch
1191          GikoSys.Setting.BeUserID := BeUserIDEdit.Text;          GikoSys.Setting.BeUserID := BeUserIDEdit.Text;
1192          GikoSys.Setting.BeCode := BeCodeEdit.Text;          GikoSys.Setting.BePassword := BeCodeEdit.Text;
1193                  GikoSys.Setting.BeAutoLogin := BeAutoLoginCheckBox.Checked;                  GikoSys.Setting.BeAutoLogin := BeAutoLoginCheckBox.Checked;
1194          //履歴の最大保存数          //履歴の最大保存数
1195          GikoSys.Setting.MaxRecordCount := Max(StrToInt64Def(MaxRecordCountEdit.Text,100),1);          GikoSys.Setting.MaxRecordCount := Max(StrToInt64Def(MaxRecordCountEdit.Text,100),1);

Legend:
Removed from v.1.94  
changed lines
  Added in v.1.95

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26