Zitat von
Bernd29bln:
Hallo,
Wie bekomme ich meine Memo einträge in mein listview .
Mein versuch der leider nicht Funzt:
WAS
funzt da nicht?
Zitat:
Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
var
i : Integer;
ListItem: TListItem;
begin
for i := 0 to Memo1.Lines.Count-1 do
Begin
ListItem := ListView1.Items.Add;
ListItem.Caption := Memo1.Lines.Strings[i];
ListItem.SubItems.Add(extractfilename(Memo1.Lines.Strings[i]));
end;
Formatier das mal gescheit bitte. Wo gehört zum Beispiel das letzte
end hin? Gehört das zur Schleife oder zur Prozedur?