procedure TWinControl.UpdateBounds;
var
  ParentHandle: HWnd; // 4字节
  Rect: TRect; // 16字节
  WindowPlacement: TWindowPlacement; // 44字节
begin
  // 非最小化状态下，取得Win控件显示区域
  if IsIconic(FHandle) then // API
  begin
    WindowPlacement.Length := SizeOf(WindowPlacement);
    GetWindowPlacement(FHandle, @WindowPlacement); // API，传递的是指针
    Rect := WindowPlacement.rcNormalPosition;
  end else
    GetWindowRect(FHandle, Rect); // API，取得客户区，注意第二个参数是结构体本身，而不是结构体指针，在Delphi里直接使用
end;