Probleme bei TListView!

[svenwel.de]

Hallo Zusammen

Ich hab da nen problem und hoffe, ihr könntet mir vllt. helfen.
Well, ich lese verschiedene Daten aus, welche in 2 Kategorien Unterteilt werden.

+ KATEGORIE 1
- a
- b
- C
- ...(n)
+ KATEGORIE 2
- a
- b
- c
- ...(n)

Dies wollte ich wie folgt realisieren:

Delphi-Quellcode:

 
procedure TForm1.Button1Click(Sender: TObject); 
var 
  NewItem: TListItem; 
begin 
   
  NewItem := ListView1.Items.Add; 
  with NewItem do 
  begin 
    Caption := 'KATEGORIE1'; 
    SubItems.Add('a'); { WIRD NICHT DARGESTELLT! }
    { a .. n }    
  end; 
end;

Irgendwie werden die Subitems nicht dargestellst.


danke

liebe grüße
sven