Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/Sort.pas

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

revision 1.1 by hi_, Sat Aug 9 13:51:12 2003 UTC revision 1.2 by h677, Wed Aug 13 10:11:56 2003 UTC
# Line 50  begin Line 50  begin
50                          Result := AnsiCompareText(BoardItem1.Title, BoardItem2.Title)                          Result := AnsiCompareText(BoardItem1.Title, BoardItem2.Title)
51          else if SortIndex = 1 then          else if SortIndex = 1 then
52                  Result := CompareInt(BoardItem1.Count, BoardItem2.Count)                  Result := CompareInt(BoardItem1.Count, BoardItem2.Count)
53          else if SortIndex = 2 then      else
                 Result := CompareBool(BoardItem1.Round, BoardItem2.Round)  
         else  
54                  Result := CompareDate(BoardItem1.RoundDate, BoardItem2.RoundDate);                  Result := CompareDate(BoardItem1.RoundDate, BoardItem2.RoundDate);
55    
56          if not SortOrder then          if not SortOrder then

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

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