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.4 by h677, Mon Aug 18 08:13:38 2003 UTC revision 1.5 by yoffy, Wed Aug 27 17:23:49 2003 UTC
# Line 231  type Line 231  type
231          FAbonReplaceul : Boolean; //<ul>タグを<br>タグに置換するか          FAbonReplaceul : Boolean; //<ul>タグを<br>タグに置換するか
232          FPopUpAbon     : Boolean; //レスポップアップ時のあぼ〜ん有効          FPopUpAbon     : Boolean; //レスポップアップ時のあぼ〜ん有効
233    
234        // スレッド絞込フィールドの幅
235        FSelectComboBoxWidth : Integer;
236    
237                  function GetMainCoolSet(Index: Integer): TCoolSet;                  function GetMainCoolSet(Index: Integer): TCoolSet;
238                  function GetBoardCoolSet(Index: Integer): TCoolSet;                  function GetBoardCoolSet(Index: Integer): TCoolSet;
239                  function GetBrowserCoolSet(Index: Integer): TCoolSet;                  function GetBrowserCoolSet(Index: Integer): TCoolSet;
# Line 428  type Line 431  type
431          property AbonReplaceul : Boolean read FAbonReplaceul write FAbonReplaceul;          property AbonReplaceul : Boolean read FAbonReplaceul write FAbonReplaceul;
432          property PopUpAbon     : Boolean read FPopUpAbon write FPopUpAbon;          property PopUpAbon     : Boolean read FPopUpAbon write FPopUpAbon;
433    
434        // スレッド絞込フィールドの幅
435        property SelectComboBoxWidth : Integer read FSelectComboBoxWidth write FSelectComboBoxWidth;
436    
437          end;          end;
438    
439    
# Line 746  begin Line 752  begin
752                          CoolSet.FCoolBreak := ini.ReadBool('MainCoolBar', 'Break' + IntToStr(i), False);                          CoolSet.FCoolBreak := ini.ReadBool('MainCoolBar', 'Break' + IntToStr(i), False);
753                          MainCoolSet[i] := CoolSet;                          MainCoolSet[i] := CoolSet;
754                  end;                  end;
755        FSelectComboBoxWidth := ini.ReadInteger( 'ListCoolBar', 'SelectWidth', 127 );
756                  for i := 0 to LIST_COOLBAND_COUNT - 1 do begin                  for i := 0 to LIST_COOLBAND_COUNT - 1 do begin
757                          CoolSet.FCoolID := ini.ReadInteger('ListCoolBar', 'ID' + IntToStr(i), -1);                          CoolSet.FCoolID := ini.ReadInteger('ListCoolBar', 'ID' + IntToStr(i), -1);
758                          CoolSet.FCoolWidth := ini.ReadInteger('ListCoolBar', 'Width' + IntToStr(i), -1);                          CoolSet.FCoolWidth := ini.ReadInteger('ListCoolBar', 'Width' + IntToStr(i), -1);
# Line 967  begin Line 974  begin
974                          ini.WriteBool('MainCoolBar', 'Break' + IntToStr(i), CoolSet.FCoolBreak);                          ini.WriteBool('MainCoolBar', 'Break' + IntToStr(i), CoolSet.FCoolBreak);
975                  end;                  end;
976                  ini.EraseSection('ListCoolBar');                  ini.EraseSection('ListCoolBar');
977        ini.WriteInteger( 'ListCoolBar', 'SelectWidth', FSelectComboBoxWidth );
978                  for i := 0 to LIST_COOLBAND_COUNT - 1 do begin                  for i := 0 to LIST_COOLBAND_COUNT - 1 do begin
979                          CoolSet := ListCoolSet[i];                          CoolSet := ListCoolSet[i];
980                          ini.WriteInteger('ListCoolBar', 'ID' + IntToStr(i), CoolSet.FCoolID);                          ini.WriteInteger('ListCoolBar', 'ID' + IntToStr(i), CoolSet.FCoolID);

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

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