Nett, aber völlig an der Frage vorbei.
Der TE wollte wissen, wie er aus dem string DEFAULT_CHARSET, welcher in der
dfm Datei als Wert für die Property Charset von TFont steht, einen Zahlenwert erhält. Denn Charset ist vom Typ TFontCharset, welcher laut
RTTI vom Typ tkInteger ist, denn TFontCharset ist als 0..255 definiert. In der
dfm könnte nämlich auch RUSSIAN_CHARSET oder so stehen. Die möglichen Werte sind in der Graphics.pas im implementation Part in einem array namens FontCharsets gespeichert. Dafür sind die Funktionen CharsetToIdent und IdentToCharset da.