tagNONCLIENTMETRICSA

type tagNONCLIENTMETRICSA = record

  cbSize: UINT;

  iBorderWidth: Integer;

  iScrollWidth: Integer;

  iScrollHeight: Integer;

  iCaptionWidth: Integer;

  iCaptionHeight: Integer;

  lfCaptionFont: LOGFONTA;

  iSmCaptionWidth: Integer;

  iSmCaptionHeight: Integer;

  lfSmCaptionFont: LOGFONTA;

  iMenuWidth: Integer;

  iMenuHeight: Integer;

  lfMenuFont: LOGFONTA;

  lfStatusFont: LOGFONTA;

  lfMessageFont: LOGFONTA;

end;