有什么函数可以将输入的字符串'A4'得到DMPAPER_A4 ？

我正在使用XE2中的fastreport制作动态报表，我能通过用户选择的打印机，而得到该打印机的纸张类型，以下拉列表框显示：Letter、Legal、Executive、A4、A5、10 号信封....，但fastreport的纸张设置是通过形如：
page.PaperSize:=DMPAPER_A4 而设置的，而我的是字符串，怎么样对应起来？
我想一定有一个转换函数的吧。只是我找不到。
看Winapi.Windows中定义了各纸张类型，比如：A4对应 DMPAPER_A4 = 9 ; A3对应 DMPAPER_A3 = 8;
而10 号信封则对应 DMPAPER_ENV_10 = 20; { Envelope #10 4 18 x 9 12 } 如果实在没办法，我当然可以用笨办法，自己写个函数去对应，但总觉得不可靠，因为纸张太多，称呼可能也不一样。如果你知道，请告诉我，谢谢！