Windows API function (4) in VCL: adjustwindowrectex

Adjustwindowrectex is used in forms and dbctrls units.

The edge size that adjustwindowrectex can obtain based on the window style.

Test:

VaR R: trect; begin setrect (R, 0, 0, 0, 0); {This rectangle is not a global variable and needs to be blank initially} adjustwindowrectex (r, {return value of the rectangle structure bearing} getwindowlong (handle, gwl_style), {window style} false, {with or without menus} getwindowlong (handle, gwl_exstyle) {window extended style }); showmessagefmt ('% d, % d', [R. left, R. top, R. right, R. bottom]); {result:-4,-30, 4, 4} {indicates that the window width is 4, and the title bar height is 30} {if a menu is specified, the result is: -4,-50, 4, 4; indicates that the menu height is 20} end;