代码说明:
TNZCSFont component works basically the same as the Delphi TFont except: The Bold, Italic, Underline and Strikeout are booleans and not in a set, which is just a personal choice; You can capture any changes even if it is added to a TComponent that doesn't have a handle. Unlike the TFont onChange which often causes AV if you try to use it. This was the main reason for it because author wants to maintian control of font changes; You can assign both TNZCSFontClass and TFont to it; It doesn't use as much resources as the Delphi TFont; It doesn't have a FontCharSet, Pitch, Height fields because author has never used them, but these could be added.
【立即下载】
|