Question RxDBGrid, sorting (rdgAllowSortForm), PostgreSQL, mixed-cases field names

Using rxdbgrid in CodeTyphon 7.10.
RxDBGrid sorting option (rdgAllowSortForm) for Postgresql database dataset with TSQLQuery is not working properly if field name contains mixed cases (lower and upper cases), because then fields names should be enclosed with double quotes.
I have temporarily solved this in unit exsortsql, in procedure TSQLQuerySortEngine.SortList, by replacing S:=S + ListField; with the S:=S + AnsiQuotedStr(ListField,'"');