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.9 by yoffy, Wed Sep 8 15:52:10 2004 UTC revision 1.10 by yoffy, Thu Sep 16 14:09:52 2004 UTC
# Line 35  begin Line 35  begin
35                          Result := CompareInt(CategoryItem1.No, CategoryItem2.No)                          Result := CompareInt(CategoryItem1.No, CategoryItem2.No)
36                  else                  else
37                          Result := AnsiCompareText(CategoryItem1.Title, CategoryItem2.Title);                          Result := AnsiCompareText(CategoryItem1.Title, CategoryItem2.Title);
38            else
39                    Result := CompareInt(CategoryItem1.No, CategoryItem2.No)
40          end;          end;
41    
42          if not SortOrder then          if not SortOrder then
# Line 60  begin Line 62  begin
62    
63          gccLastModified:          gccLastModified:
64                  Result := CompareDate(BoardItem1.RoundDate, BoardItem2.RoundDate);                  Result := CompareDate(BoardItem1.RoundDate, BoardItem2.RoundDate);
65            else
66                    Result := CompareInt(BoardItem1.No, BoardItem2.No)
67          end;          end;
68    
69          if not SortOrder then          if not SortOrder then

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10

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