исходника никто и не кидал, это выложен скомпилированый модуль, чтобы не напрягать пользователей изучением принципа его работы, а дать время почитать книжку по Delphi и изучить что такое dcu файл, который содержит в себе функцию:
Код:
procedure FillSysListView32(hListView: THandle; AStrings: TStrings);
т.е. передав ей переменую типа TStringList и пробежавшись по всем ее Strings можно хоть в Excel загнать.