Einzelnen Beitrag anzeigen

norwegen60

Registriert seit: 23. Dez 2007
Ort: Schwarzwald
505 Beiträge
 
Delphi 12 Athens
 
#1

Abfrage mit Query schnell in TStringlist importieren

  Alt 23. Dez 2013, 12:28
Datenbank: MsSQL • Version: 2008 • Zugriff über: UniDac, ADO
Hallo zusammen,

hin und wieder benötige ich Daten einer DB in einer TStringlist. Gibt es neben
Delphi-Quellcode:
  while not UniQuery1.eof do
  begin
    slDB.Add(UniQuery1.Fields[0].AsString);
    UniQuery1.next;
  end;
eine Möglichkeit, mit der ich die Ergebnismenge direkt in eine TStringlist übernehmen kann. Obiger Code dauert ca. 0.06s per Datensatz => bei nur 1000 Datensätzen 60s


Hintergrund:
Große MsSQL Tabelle mit ca. 2 Mio Datensätzen
Auswahl über Pulldownliste mit Autovervollständigung
Wunsch, in Pulldownliste auch per Cursor rauf/runter blättern zu können
Liste sollte aber aktuelle Daten enthalten, wenn andernorts Daten eingegeben wurden (Refresh direkt beim Start der Einagbe würde mehrere s Dauern, egal wie Fetchall gesetzt ist)
Bisher verwendet: TDBLookupComboPlus, welche mit kleinen Datenmenge auch super funktioniert mit Möglichkeit per Rechtsklick Daten zu aktualisieren
Problem: Kunden möchten weiterhin auch einfach nur in der Pulldownliste per Cursor runter blättern können


Danke
Gerd
  Mit Zitat antworten Zitat