Listview ein Image aus ImageList zuweisen

[ereetzer]

Nabend,

habe unten stehenden Code um Items einer Listview hinzuzufügen.

Beim Abschnitt wo ich ein Image zuweisen will krieg ich aber eine Zugriffsverletzung
"Lesen von 0000000C".

Geht das so überhaupt? Oder wie bekomme ich in Abhängigkeit der Dateiendung das Image
dem jeweiligen Item zugewiesen?

Delphi-Quellcode:

procedure TForm1.FindFileFileMatch(Sender: TObject;
  const FileInfo: TFileDetails);
begin
  with ListView1.Items.Add do
  begin
    Caption := IntToStr(ListView1.Items.Count);
    SubItems.Add(FileInfo.Location);
    SubItems.Add(FileInfo.Name);
    if LongBool(FileInfo.Attributes and FILE_ATTRIBUTE_DIRECTORY) then
      SubItems.Add('Folder')
    else
      SubItems.Add(FormatFileSize(FileInfo.Size));

      SubItems.Add(DateTimeToStr(FileInfo.ModifiedTime));
  end;

    if AnsiUpperCase(ExtractFileExt(FileInfo.Name)) = AnsiUpperCase('.mp3') then Listview1.Items.Item[ListView1.ItemIndex].ImageIndex := 0
      else
        Listview1.Items.Item[ListView1.ItemIndex].ImageIndex := -1;

  if not FindFile.Threaded then
    Application.ProcessMessages;
end;

besten Gruß
ereetzer