Function mehrmals ausführen (For each?)

[DarkItachi]

Hallöchen!

Ich mache es kurz:

Ich habe eine Listview mit mehreren Items drin..
Wenn ein Item ausgewählt ist, dann öffnet sich auch nur ein Fenster..

Delphi-Quellcode:

Form3.Create(self);
var createform3 : TForm3;
begin
if listview1.SelCount= 1 then begin
createform3:= Form3.Create(self);
createform3.Show;
createform3.Caption:= listview1.Selected.SubItems.Strings[1];
end;

Ok, dass ist ganz einfach gewesen für mich!

Jetzt habe ich eingestellt, dass man mehrere Items in Listview auswählen kann.
Wenn man jetzt auf 'preview' drückt, dann soll auch für jedes ausgewähltes Item ein Fenster öffnen!
Ich habe das zuerst so versucht:

Delphi-Quellcode:

if Listview1.SelCount> 1 then begin
  createform3:= Form3.Create(self);
Listview1.SelCount * createform3.Show;
for each...?

Wie kann ich denn jetzt für jedes item eine eigene Form öffnen? Mit eigener Caption?
Ich weiß das dieses Multiplikationszeichen nicht anwendbar ist, aber mir ist nicht anderes eingefallen?

Kann mir mal wieder jemand helfen?^^

MfG