Listbox Problem

[Brueckenhauer]

Ich führe eine mysql abfrage aus und habe dort mehrere Zeilen als ergebnis, wie kann ich eine Zeile nach der andere in die Listbox bekommen? In jeder zeile habe ich mehrere Spalten die ich gerne mit einem - trennen würde.

Ich hoffe ihr könnt mir weiterhelfen.

[Matze]

Wo befinden sich denn die Zeilen?

Könntest du das mit den Spalten etwas genauer erklären? WO befinden sich die Spalten? In einem ListView?

[Sharky]

Hai Brueckenhauer,

Zitat von Brueckenhauer:

... wie kann ich eine Zeile nach der andere in die Listbox bekommen? ...

Dieser Code hier trägt z.B. alle Felder einer Zeile der Tabelle in eine TListBox ein:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  ndx : Integer;
  tmp : String;
begin
  ListBox1.Clear;
  Query1.Close;
  Query1.SQL.Text := 'SELECT * FROM meintest';
  Query1.Open;
  While not (Query1.Eof) do // Alle Zeilen durchlaufen
  begin
    tmp := '';
    for ndx := 0 to Query1.Fields.Count -1 do  // Alle Felder durchlaufen
    begin
      tmp := tmp + Query1.Fields[ndx].AsString;  // String aufbauen
      if (ndx < Query1.Fields.count -1) then  // Trennzeichen einfügen
       tmp := tmp + ' - ';
    end;
    ListBox1.Items.Add(tmp);  // In die ListBox eintragen
    Query1.Next;  // Nächster Datensatz
  end;
end;

[Brueckenhauer]

thx, das hat super funktioniert....