Getting the menu font attributes


I want to create a menu that's like office 97'ones just using delphi4's
components. So I use a control bar and a toolbar. It works fine, except for
the font. How to get the standard font attributes under windows?

Any help would be appreciated