mist. ich probiere gleich mal die funktion hier aus der code-lib aus wenn ich die noch finde.
edit:
ok also selbst mit dieser funktion dauert es 4 bis 5 sekunden:
http://www.delphipraxis.net/332578-post.html#392510
kann es sein dass du eine SSD hast?