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
