Text in Listbox an eine bestimmte Stelle setzen

[Sprint]

Ich würde auch sagen, das da ein TListView angebrachter ist. Und so schwer ist es auch nicht zu bedienen. Hier maö ein kleines Beispiel wie das aussehen könnte.

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin

    ListView1.ViewStyle := vsReport;

    with ListView1.Columns.Add do
    begin
      Caption := 'Name';
      Width := 150;
    end;

    with ListView1.Columns.Add do
    begin
      Caption := 'Telefon';
      Width := 100;
    end;

end;

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin

  with ListView1.Items.Add do
  begin
    Caption := Edit1.Text;
    SubItems.Add(Edit2.Text);
  end;

end;

Zwei TEdit (Edit1, Edit2), ein TButton (Button1) und ein TListView (ListView1).