Edit einträge in ListView einlesen...

[Robert_G]

Das Beispiel erzeugt 2 Spalten (Edit & Memo).
Der Inhalt von Edit1 wird als ListItem angefügt und bekommt ein SubItem mit dem Inhalt von Memo1.

Delphi-Quellcode:

  With ListView1 Do
  Begin
    Columns.Clear;
    Columns.Add.Caption := 'Edit';
    Columns.Add.Caption := 'Memo';

    ShowColumnHeaders := True;
    ViewStyle := vsReport;

    With Items.Add Do
    Begin
      Caption := Edit1.Text;
      SubItems.Add(Memo1.Text);
    End;

  End;