freepascal.ru

Нашёл небольшой баг в сортировщике TRxSortSqlDB:
Если запрос оканчивается на ; (точку с запятой), то сортировка не будет работать, потому что регулярка внутри exsortsql добавляет ORDER BY после неё, не удаляя её из запроса.
Как-то привык все SQL-запросы завершать, поэтому было неочевидно, пока не посмотрел дебаггером
Решение на стороне приложения простое, типа такого, но было бы здорово поправить и библиотеку.

А что в сортировщике править? Патчик сделаешь?

там в одну строку вся доработка

cmd:= StringReplace((ADataSet as TSQLQuery).SQL.Text,';','',[rfReplaceAll]);
вместо cmd:= (ADataSet as TSQLQuery).SQL.Text;

Хотя, это решает только мою проблему, но не решает возможные другие.
Более логичен алгоритм, если искать в cmd первое вхождение точки с запятой и вырезать всё, что правее неё.

А если в тексте запроса встретится конструкция:

Оноже перекорёжит весь текст.
Так не очень хорошо.

А можно как-нибудь прикруть сортитовщик к IBX

А он умеет внутри себя без переоткрытия запрса сортировать?