Also nach bisl Testerei hab ich jetzt die folgenden Lösung (hätte ich auch früher drauf kommen können)...
Ich habe vorhin festgestellt das wenn ich mein summiertes Mengen Feld (welches als Integer in der Datenbank definiert ist) über den Alias Namen in der Order By Klausel sortiere, dass ich dann das richtige Sortier Ergebnis erhalte.
Also habe ich mich jetzt gegen die "IndexFieldName" Funktion der TUniQuery entschieden und sortiere im OnTitleClick des DBGrids wieder über einen
SQL Befehl (ich denke die Lösung ist vertretbar, da meine SQLite auf dem Client liegt und so kein Unterschied entsteht ob ich auf dem Client die Ergebnis Menge sortiere oder mir das Ergebnis neu sortiert hole)
Meiner Meinung nach ist in der DevArt Komponente ein Bug und es ist nicht ein Fehler der SQLite Developer wie es AlexP im DevArt Forum (in dem Beitrag den baumina gepostet hat) darstellt...
Hier anbei mein Source für den Sort:
Delphi-Quellcode:
//Get Sort Column Number and Name
If Column.
Index = giSortColumn
Then
Begin
If gsSortOrder = '
ASC'
Then gsSortOrder := '
DESC'
Else gsSortOrder := '
ASC';
End Else
Begin
gsSortOrder := '
ASC';
End;
giSortColumn := Column.
Index;
sFieldName := Column.FieldName;
//Sort via SQL
Try
With (sqlitefile_query1)
Do
Begin
Active := False;
datsrc_test.DataSet :=
Nil;
SQL.Clear;
SQL.Add('
Select ');
SQL.Add('
COMMON, COM_NO, COM_KZ, SUM(COMSTT) as "Test" ');
SQL.Add('
From DATCOM ');
SQL.Add('
Group By COMMON, COM_NO, COM_KZ ');
SQL.Add('
Order By ' + sFieldName + '
' + gsSortOrder);
datsrc_test.DataSet := sqlitefile_query1;
Active := True;
End;
Except
On E:
Exception Do
Begin
MessageDlg(E.
Message, mtError, [mbOK], 0);
Exit;
End;
End;