tFontDialog - Restricting Font Name

Is there a way to restrict font names in the standard TFontDialog box? For
example, if I only wanted to use 'Arial' font, could I have that as the
only
selection possible? Ideally it would be as easy as restricting font size
is, but
I expect it is much harder. Thanks.

Scott