You can get a list of fonts available on your system by using the command Font List. The said command populates a text or string array with the list of fonts. For instance, the code below will populate a drop-downlist object 'mfonts' with fonts available on your system:

If (Form event=On Load )
   ARRAY TEXT(mfonts;0)
   FONT LIST(mfonts)
End if