Hi Igotcha!
Leider habe ich kein Codeschnipsel, den Du als fertige Lösung verwendet könntest.
Du kannst aber einfach jeweils eine TQery für jede SELECT-Anweisung erstellen, etwa so:
Delphi-Quellcode:
...
Var
ist_data: TQuery;
prognose_data: TQuery;
result_data: TQuery;
...
begin
...
ist_data.SQL.Clear;
ist_data := TQuery.Create(self);
ist_data.SQL.Add('select … ');
ist_data.SQL.Add('from ist_data … ');
ist_data.Prepare;
ist_data.Open;
...
prognose_data.SQL.Clear;
prognose_data := TQuery.Create(self);
prognose_data.SQL.Add('select … ');
prognose_data.SQL.Add('from prognose_data … ');
prognose_data.Prepare;
prognose_data.Open;
...
result_data.SQL.Clear;
result_data := TQuery.Create(self);
result_data.SQL.Add('select … ');
result_data.SQL.Add('from ist_data, prognose_data … ');
result_data.Prepare;
result_data.Open;
...
Dadurch erstellst du “Views”, die du weiter verarbeiten könntest.
Und am Ende:
Delphi-Quellcode:
...
ist _query.Close;
ist _query.Destroy;
prognose _query.Close;
prognose _query.Destroy;
result _query.Close;
result_query.Destroy;
...
Kleine Unreinheit: "apr0" soll "apri" heißen (sorry).
Viele Grüße
Markus
