Entwickler-Ecke :: Thema anzeigen - Selectanweisung gibt mir nicht alle Datensätze zurück

Krischa - Mi 20.05.09 09:39
Titel: Selectanweisung gibt mir nicht alle Datensätze zurück

Hi,
ich soll aus einer Datenbank Datensätze auslesen und in eine Combobox stecken.
ich habe folgenden Code:

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

  query1.SQL.Text:='SELECT NAME,KUNR,MATCH,ORT FROM '+kun1+' WHERE AKZ="S"';
  query1.Open;
  sre:= TStringList.Create;
  while not form1.table1.Eof do
  begin
    sre.add(query1.FieldByName('KUNR').Value+','+query1.FieldByName('NAME').Value+','+query1.FieldByName('MATCH').Value);
    sre.Sorted := true;
    sre.Duplicates := dupAccept;
    Form1.Table1.Next;
  end;
  Form1.Table1.First;
  combobox1.Items.AddStrings(sre);

Er liest den ersten Wert zwar aus und schreibt ihn in meine Stringlist(sre) aber die anderen Werte fässt er gar nicht an. Und wenn ich das sortieren weg lasse dann schreibt er mir 320 mal den ersten Treffer in die Liste. (320 Datensätze sind vorhanden)
Wo liegt mein Fehler?

Moderiert von Narses: Delphi-Tags hinzugefügt

---Moderiert von Narses: Beiträge zusammengefasst---

Ok habe es dochnoch geschafft das Problem selber zu lösen :)

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!