fizemos uma fucnao para isso, no fastreport e automatico?
function GetMonitorDPI: integer;
var
DC: hDC;
begin
DC := GetDC(0);
try
Result := GetDeviceCaps(DC, LOGPIXELSX);
finally
ReleaseDC(0, DC);
end;
end;
function GetSystemScalingFactor: Double;
var
dpi: integer;
escalaSistema: Double;
begin
dpi := GetMonitorDPI;
escalaSistema := dpi / 96; // 96 DPI é 100% de escala padrão
Result := escalaSistema * 100; // Retorna a escala final
end;
como usei
ACBrBoletoFCFortes1.AlterarEscalaPadrao := true;
// criei uma var dpi: integer;
dpi := Round(GetMonitorDPI * (GetSystemScalingFactor/100));
ACBrBoletoFCFortes1.NovaEscala := dpi;