No this is for the primary monitor, for multi-monitor support, please use
uses
WinApi.MultiMon;
procedure TTMSFNCRibbonForm32.FormResize(Sender: TObject);
var
r: TRect;
MonInfo: TMonitorInfo;
begin
if WindowState = TWindowState.wsMaximized then
begin
MonInfo.cbSize := SizeOf(MonInfo);
if GetMonitorInfo(MonitorFromWindow(Handle, MONITOR_DEFAULTTONEAREST), @MonInfo) then
begin
r := MonInfo.rcWork;
SetBounds(r.Left, r.Top, r.Right - r.Left, r.Bottom - r.Top);
end;
end;
end;