怎样将字体设为当前目录下的字体文件的字体？

Windows允许把不在Windows\Fonts目录中的字体加到系统中去，所以我想在程序中把当前目录下的字体加到系统字体列表中去应该就可以了，好像是写在注册表的“HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Fonts”下面。