RxDBGrid: fix work TRxCollumn.SortFields

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2904 8e941d3f-bd1b-0410-a28a-d453659cc2b4

components/rx/trunk/languages/rxdconst.es.po

@@ -74,6 +74,8 @@ msgid "Field '%s' not used in filter expression"
 msgstr "Campo '%s' no usado en expresión de filtro"
 
 #: rxdconst.sexprbadnulltest
+#, fuzzy
+#| msgid "NULL-values enabled in '=' и '<>'"
 msgid "NULL-values enabled in '=' и '<>'"
 msgstr "Valor nulo habilitado en '=' y '<>'"
 

components/rx/trunk/languages/rxdconst.ru.po

@@ -74,6 +74,8 @@ msgid "Field '%s' not used in filter expression"
 msgstr "Поле '%s' не может быть использовано в выражении фильтрации"
 
 #: rxdconst.sexprbadnulltest
+#, fuzzy
+#| msgid "NULL-values enabled in '=' и '<>'"
 msgid "NULL-values enabled in '=' и '<>'"
 msgstr "NULL-значения разрешены только в выражениях '=' и '<>'"
 

components/rx/trunk/languages/rxdconst.uk.po

@@ -83,6 +83,8 @@ msgid "Field '%s' not used in filter expression"
 msgstr "Поле '%s' не може бути використане в виразі фільтрації"
 
 #: rxdconst.sexprbadnulltest
+#, fuzzy
+#| msgid "NULL-values enabled in '=' и '<>'"
 msgid "NULL-values enabled in '=' и '<>'"
 msgstr "NULL-значення дозволені тільки у виразах '=' і '<>'"
 

components/rx/trunk/rxdbgrid.pas

@@ -2579,7 +2579,7 @@ var
 begin
   if (FSortColumns.Count = 0) then exit;
   FSortingNow:=true;
-  if FSortColumns.Count>1 then
+  if (FSortColumns.Count>1) or (Pos(';', FSortColumns[0].GetSortFields)>0) then
   begin
     SetLength(Asc, FSortColumns.Count);
     for i := 0 to FSortColumns.Count - 1 do