никто не делал такое? - процедура удаления всех писем в почтовом ящике (например mail.ru) старше 30 дней (например) - без их чтения и загрузки (не глядя) и без почтовых программ - напрямую... что-то типа (схематично):
pop.Сonnect;
Перебор Входящие; -> Если Date() - [Дата письма] > 30 Then pop.Delete(i);
pop.Disconnect;

http://www.sql.ru/forum/1243959/rabota-s-pop3-neposredstvenno