Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/Setting.pas

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

revision 1.82 by h677, Mon Oct 25 13:51:55 2004 UTC revision 1.83 by yoffy, Wed Oct 27 00:10:12 2004 UTC
# Line 57  type Line 57  type
57          /// スレッド一覧表示範囲          /// スレッド一覧表示範囲
58          TGikoThreadRange = (gtrAll, gtrSelect, gtrLog, gtrNew);          TGikoThreadRange = (gtrAll, gtrSelect, gtrLog, gtrNew);
59    
60            //! スパムフィルターアルゴリズム
61            TGikoSpamFilterAlgorithm = (
62                    gsfaNone, gsfaPaulGraham, gsfaGaryRobinson, gsfaGaryRobinsonFisher);
63    
64          /// カテゴリリストのカラム ID          /// カテゴリリストのカラム ID
65          type    TGikoBBSColumnID = (gbbscTitle);          type    TGikoBBSColumnID = (gbbscTitle);
66          /// カテゴリリストのカラム名          /// カテゴリリストのカラム名
# Line 419  type Line 423  type
423                  FRemoteTrapAtt : Boolean;                  FRemoteTrapAtt : Boolean;
424                  FReadTimeOut: Integer;                  FReadTimeOut: Integer;
425    
426                    //! 使用するスパムフィルター
427                    FSpamFilterAlgorithm : TGikoSpamFilterAlgorithm;
428    
429                  function GetMainCoolSet(Index: Integer): TCoolSet;                  function GetMainCoolSet(Index: Integer): TCoolSet;
430                  function GetBoardCoolSet(Index: Integer): TCoolSet;                  function GetBoardCoolSet(Index: Integer): TCoolSet;
431                  function GetBrowserCoolSet(Index: Integer): TCoolSet;                  function GetBrowserCoolSet(Index: Integer): TCoolSet;
# Line 715  type Line 722  type
722                  property LocalTrapAtt : Boolean read FLocalTrapAtt write FLocalTrapAtt;                  property LocalTrapAtt : Boolean read FLocalTrapAtt write FLocalTrapAtt;
723                  property RemoteTrapAtt : Boolean read FRemoteTrapAtt write FRemoteTrapAtt;                  property RemoteTrapAtt : Boolean read FRemoteTrapAtt write FRemoteTrapAtt;
724                  property ReadTimeOut: Integer read FReadTimeOut write FReadTimeOut;                  property ReadTimeOut: Integer read FReadTimeOut write FReadTimeOut;
725                    //! 使用するスパムフィルタ
726                    property SpamFilterAlgorithm : TGikoSpamFilterAlgorithm
727                            read FSpamFilterAlgorithm write FSpamFilterAlgorithm;
728    
729  end;  end;
730    
# Line 1271  begin Line 1281  begin
1281                  FRemoteTrapAtt := ini.ReadBool('Trap', 'RemoteTrap', False);                  FRemoteTrapAtt := ini.ReadBool('Trap', 'RemoteTrap', False);
1282                  FReadTimeOut := ini.ReadInteger('HTTP', 'ReadTimeOut', 10000);                  FReadTimeOut := ini.ReadInteger('HTTP', 'ReadTimeOut', 10000);
1283    
1284                    // 使用するスパムフィルタ
1285                    FSpamFilterAlgorithm := TGikoSpamFilterAlgorithm(
1286                            ini.ReadInteger( 'Abon', 'SpamFilterAlgorithm', Ord( gsfaNone ) ) );
1287    
1288                  ini.UpdateFile;                  ini.UpdateFile;
1289          finally          finally
# Line 1615  begin Line 1628  begin
1628                  ini.WriteBool('Trap', 'LocalTrap', FLocalTrapAtt);                  ini.WriteBool('Trap', 'LocalTrap', FLocalTrapAtt);
1629                  ini.WriteBool('Trap', 'RemoteTrap', FRemoteTrapAtt);                  ini.WriteBool('Trap', 'RemoteTrap', FRemoteTrapAtt);
1630                  ini.WriteInteger('HTTP', 'ReadTimeOut', FReadTimeOut);                  ini.WriteInteger('HTTP', 'ReadTimeOut', FReadTimeOut);
1631    
1632                    // 使用するスパムフィルタ
1633                    ini.WriteInteger( 'Abon', 'SpamFilterAlgorithm', Ord( FSpamFilterAlgorithm ) );
1634    
1635                  ini.UpdateFile;                  ini.UpdateFile;
1636          finally          finally
1637                  ini.Free;                  ini.Free;

Legend:
Removed from v.1.82  
changed lines
  Added in v.1.83

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