Zu wenig Arbeitsspeicher für DISTINCT

[Cuchulainn]

Ich habe folgende Funktion:

Delphi-Quellcode:

procedure TMenue.PHauptmenuLaden;
var Query: TQuery;
    IntZaehler: Integer;
begin
  Query := TQuery.Create(FrmMain);
  try
    with Query do
    begin
      Close;
      Sql.Clear;
      Sql.Add('SELECT DISTINCT MainMenu FROM "' + StrTabelle + '"');
      Open;
    end;
    for IntZaehler := 0 to Query.RecordCount - 1 do
    begin
      slHauptmenu.Add(Query.Fields.Fields[0].AsString);
      Query.Next;
    end;
  finally
    Query.Free;
  end;
end;

Ich bekomme die Fehlermeldung "Zu wenig Arbeitsspeicher für diese Operation". Aber nur, wenn ich das DISTINCT in der SQL-Anweisung habe. Ohne funktioniert es. Das kann doch nicht wirklich am Arbeitsspeicher liegen :gruebel:
Hat jemand eine Idee?

[Robert_G]

Hast du es schon mit ...

SQL-Code:

SELECT MainMenu
FROM   XYZ
GROUP BY MainMenu

...versucht?

OT: Zu wenig Arbeitsspeicher????
Wie ist denn der Server bestückt?

[r_kerber]

Ich habe eine derartige Fehlermeldung desöfteren erhalten, wenn mehrere BDE-Anwendungen gestartet waren und/oder in diesen mehrere Datenbank-Verbindung geöffnet waren (inklusive der Delphi-IDE selbst)!

[shmia]

Zitat:

Ich bekomme die Fehlermeldung "Zu wenig Arbeitsspeicher für diese Operation". Aber nur, wenn ich das DISTINCT in der SQL-Anweisung habe. Ohne funktioniert es. Das kann doch nicht wirklich am Arbeitsspeicher liegen

Doch! DISTINCT führt im Hintergrund eine Sortierung durch (oder zumindest eine
Liste der ausgegebenen Werte muss im Speicher gehalten werden).
Du kannst der Datenbank helfen, indem du einen Index auf das Feld MainMenu
legst.

SQL-Code:

CREATE INDEX IX_TabelleMainMenu ON Tabelle (MainMenu)

Mit dem Index kann das DBMS die Tabelle in sortierter Reihenfolge
durchlaufen und es wird kein zusätzlicher Speicher für die Entfernung
von Dupplikaten benötigt.

[Robert_G]

Natürlich :wall:
Der Index sollte da schon rein...

[Cuchulainn]

Zitat:

Zitat von Robert_G

Wie ist denn der Server bestückt?

Ich arbeite nicht mit einem Server, sondern nur mit einer lokalen Datenbank auf meinem Rechner. Der hat 256 MB Arbeitsspeicher.

Danke. Mit dem Index funktioniert es.