Board index » delphi » Error in the Windows Run Time Library
m...@shift-f7.com (Mike Dymond)
Delphi Developer |
Sun, 25 Apr 1999 03:00:00 GMT
Error in the Windows Run Time LibraryHi I am trying to get information about the size of the scrollbars from SystemParametersInfo(SPI_GETNONCLIENTMETRICS, 0, @NonClientMetrics, where NonClientMetrics has been set up as a TNonClientMetrics. However there seems to be a bug in the definition of typedef struct tagNONCLIENTMETRICS { Quote} NONCLIENTMETRICS, FAR* LPNONCLIENTMETRICS; type PNonClientMetrics = ^TNonClientMetrics; TNonClientMetrics = packed record cbSize: UINT; iBorderWidth: BOOL; iScrollWidth: BOOL; iScrollHeight: BOOL; iCaptionWidth: BOOL; iCaptionHeight: BOOL; lfCaptionFont: TLogFont; iSmCaptionWidth: BOOL; iSmCaptionHeight: BOOL; lfSmCaptionFont: TLogFont; iMenuWidth: BOOL; iMenuHeight: BOOL; lfMenuFont: TLogFont; lfStatusFont: TLogFont; lfMessageFont: TLogFont; end; iScrollHeight is an Integer in one and a Boolean in the other!!! I have changed the definition of TNonClientMetrics in Windows.pas but Cheers Mike ********************************************************************* |