Hi,
wie kann ich eine StringList in einer TListView anzeigen?
Denn mit 'Assign' ist dies nicht möglich!;

DelphiUser7

Hallo DelphiUser7,

das mußt Du leider mit der Hand machen:

zusammenfalten · markieren

Delphi-Quellcode:

VAR
   sl : TStringList;
   aListItem : TListItem;
   aNewColumn : TListColumn;
   i : Integer;
BEGIN
   sl := TStringList.Create;
   TRY
      sl.Add('a');
      sl.Add('b');
      sl.Add('c');
      ListView1.ViewStyle := vsReport;
      aNewColumn := ListView1.Columns.Add;
      aNewColumn.Caption := 'Überschrift';
      FOR i := 0 TO sl.Count - 1 DO
         BEGIN
            aListItem := ListView1.Items.Add;
            aListItem.Caption := sl.Strings[i];
         END;
   FINALLY
      sl.free;
   END;

Danke, das hat mir sehr geholfen;

DelphiUser7