Hallo,
ich habe folgende Lösung für mich gefunden.
Zuerst erstellt man im sich im Spalteneditor vom ListView seine Spalten.
Dann legt man noch einen Button,mit folgendem Code an.
Delphi-Quellcode:
procedure TForm7.Button2Click(Sender: TObject);
begin
ListView1.Items.BeginUpdate;
aListItem := ListView1.Items.Add;
aListItem.Caption := LabeledEdit2.Text; //gibt die erste Spalte vom Datensatz an
aListItem.SubItems.Add(ADOQuery1.FieldByName('Artikelnummer').AsString);
aListItem.SubItems.Add(ADOQuery1.FieldByName('Lagerbestand').AsString);
.......usw
ListView1.Items.EndUpdate;
end;
Immer wenn der Button gedrückt wird,wird eine neue Zeile hinzugefügt,ohne die vorherige zu überschreiben.
Allen wünsche ich noch ein frohes Osterfest.
Mfg
AnfängerDelphi