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.62 by h677, Sat Sep 18 03:37:47 2004 UTC revision 1.63 by h677, Sun Sep 19 05:43:09 2004 UTC
# Line 788  begin Line 788  begin
788                                  DatOchiSortCombo.ItemIndex := 5                                  DatOchiSortCombo.ItemIndex := 5
789                          else                          else
790                                  DatOchiSortCombo.ItemIndex := 6;                                  DatOchiSortCombo.ItemIndex := 6;
791                    gbcLastModified:
792                            if GikoSys.Setting.DatOchiSortOrder then
793                                    DatOchiSortCombo.ItemIndex := 7
794                            else
795                                    DatOchiSortCombo.ItemIndex := 8;
796          else          else
797                  DatOchiSortCombo.ItemIndex := 0;                  DatOchiSortCombo.ItemIndex := 0;
798          end;          end;
# Line 1034  begin Line 1039  begin
1039                          GikoSys.Setting.DatOchiSortOrder := false;                          GikoSys.Setting.DatOchiSortOrder := false;
1040                          GikoSys.Setting.DatOchiSortIndex := Ord( gbcCreated );                          GikoSys.Setting.DatOchiSortIndex := Ord( gbcCreated );
1041                     end;                     end;
1042                    7:      begin  //スレ最終更新日時(昇順)
1043                            GikoSys.Setting.DatOchiSortOrder := true;
1044                            GikoSys.Setting.DatOchiSortIndex := Ord( gbcLastModified );{gbcLastModified}
1045                            end;
1046                    8:      begin  //スレ最終更新日時(降順)
1047                            GikoSys.Setting.DatOchiSortOrder := false;
1048                            GikoSys.Setting.DatOchiSortIndex := Ord( gbcLastModified );{gbcLastModified}
1049                            end;
1050          end;          end;
1051    
1052          GikoSys.Setting.WriteSystemSettingFile;          GikoSys.Setting.WriteSystemSettingFile;

Legend:
Removed from v.1.62  
changed lines
  Added in v.1.63

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