Active window font

How to change the font of the menu of the active window from code? Normally, you do this via Display properties>Appearance>.....

Thanks.