Gut ich habe mal die Einstellungen getroffen.
Delphi-Quellcode:
procedure TF_UsersStatistic.LoadUserStatistic(
Query: TADOQuery);
var Bubble: TBubbleSeries;
begin
Query.SQL.Clear;
Query.SQL.Add('
SELECT DISTINCTROW usr_users.usr_ID, usr_users.usr_Username, bev_beverages.bev_ID, bev_beverages.bev_name, Sum(odt_details.odt_Count) AS [Anzahl]');
Query.SQL.Add('
FROM bev_beverages INNER JOIN ((usr_users INNER JOIN ord_orders ON usr_users.[usr_ID] = ord_orders.[ord_usr_ID]) INNER JOIN odt_details ON ord_orders.[ord_id] = odt_details.[odt_ord_ID]) ON bev_beverages.[bev_ID] = odt_details.[odt_bev_ID]');
Query.SQl.Add('
GROUP BY usr_users.usr_ID, usr_users.usr_Username, bev_beverages.bev_ID, bev_beverages.bev_name');
Query.Open;
Query.First;
Bubble := TBubbleSeries.Create(Self);
Bubble.ParentChart := Chart;
while Query.Eof
do
begin
with Bubble
do
begin
AddBubble(
Query.FieldByName('
usr_users.usr_ID').AsFloat,
Query.FieldByName('
bev_beverages.bev_ID').AsFloat,
Query.FieldByName('
Anzahl').AsFloat);
end;
Query.Next;
end;
end;
Ich wollte mich erstmal an den Versuch wagen mit den Zahlen zu arbeiten, um dann in nachhinein die Einstellungen zu treffen.
Leider stellt er gar nichts dar und ich wundere mich, dass hier nicht mal ein Bubble angezeigt wird. Jemand vllt eine Idee, weshalb da gar nichts angezeigt wird?