Delphi 6-7 - Считывание тэгов из аудиофайлов

Нужен модуль для Delphi 6-7 для считывания/записи тэгов из всевозможных форматов аудиофайлов без использования различных DLL, ActiveX и прочего внешнего кода и пример использования. Поддержка Unicode тэгов обязательна.

Модуль должен быть лицензионно чист - не надо мне скидывать чужие проекты, утянутые с варезников shareware и commercial компоненты.

Вобщем-то проект не для разработки (потому как выйдет дорого), а для тех, кто хочет продать свои уже существующие (и лучше чтобы уже использованные в реальном проекте) наработки по этому вопросу.

В идеале процесс мне видится так - вы мне присылаете скомпилированный демонстрационный exe, который демонстрирует все возможности модуля, кратко описываете откуда взялся модуль (сам написал, доработал какой-нибудь определенный модуль итд), указываете свою цену. Я смотрю, выбираю лучшее предложение, получаю исходник с примером, удостоверяюсь, что всё компилируется и работает как в изначально присланном EXE и расплачиваюь в WebMoney.