[Rodrigo_I]

a mi me sirvio con D7 y el Service Pack 3 de XP

solo agregar que se debe poner : uses Types, SysUtils, Windows;