ViewVC Help
View File | Revision Log | View Changeset | Root Listing
root/Oni2/oup/current/DataAccess/Access_OUP_ADB.pas
(Generate patch)

Comparing oup/current/DataAccess/Access_OUP_ADB.pas (file contents):
Revision 135 by alloc, Wed Mar 28 17:57:12 2007 UTC vs.
Revision 155 by alloc, Sun Apr 1 21:14:29 2007 UTC

# Line 253 | Line 253 | var
253  
254   begin
255    list := TStringList.Create;
256 +  list.CaseSensitive := True;
257    list.Sorted := True;
258    for i := 0 to GetFileCount - 1 do
259    begin
# Line 270 | Line 271 | begin
271            ST_IDAsc, ST_IDDesc:     list.Add(id + ';' + name + ';' + extension);
272            ST_NameAsc, ST_NameDesc: list.Add(name + ';' + id + ';' + extension);
273            ST_ExtAsc, ST_ExtDesc:   list.Add(extension + ';' + id + ';' + name);
274 <          ST_ExtNameAsc, ST_ExtNameDesc: list.Add(name + ';' + extension + ';' + id);
274 >          ST_ExtNameAsc, ST_ExtNameDesc: list.Add(extension + ';' + name + ';' + id);
275          end;
276        end;
277      end;

Diff Legend

Removed lines
+ Added lines
< Changed lines (old)
> Changed lines (new)