Например,
Font.Style = StringToSet('[fsBold, fsUnderline]');
, конечно, там должна быть информация о типах, но вы поняли идею. Я использую Delphi 2007.