Issue #3212: Consider schema name in default objects sorting, so the tree displays the same order as we have in the database tab when sorted by "Name" column.

This commit is contained in:
Ansgar Becker
2013-06-26 04:24:51 +00:00
parent 9495f504c1
commit 9acc474e9a

View File

@@ -4957,7 +4957,7 @@ end;
function TDBObjectComparer.Compare(const Left, Right: TDBObject): Integer;
begin
// Simple sort method for a TDBObjectList
Result := CompareAnyNode(Left.Name, Right.Name);
Result := CompareAnyNode(Left.Schema+'.'+Left.Name, Right.Schema+'.'+Right.Name);
end;