My solution:
LMDDsgDesigner.pas
{$IFDEF LMDCOMP28}
procedure TEngine.UpdateCaption(AVisible: Boolean; AUpdateFrame: Boolean);
begin
// Do nothing.
end;
procedure TEngine.UpdateDesigner;
begin
// Do nothing.
end;
function TEngine.DesignPPI(AControl: TWinControl): Integer;
begin
result := 96;
end;
function TEngine.GetDesignerHighDPIMode: TVCLDesignerHighDPIMode;
begin
result := hdmAutoScale;
end;
{$ENDIF}
LMDCmps.inc
// 11 Alexandria
{$IFDEF VER350}
{$DEFINE LMDCOMP_DETECT}
{$DEFINE LMDCOMP7}
{$DEFINE LMDCOMP9}
{$DEFINE LMDCOMP10}
{$DEFINE LMDCOMP11}
{$DEFINE LMDCOMP12}
{$DEFINE LMDCOMP14}
{$DEFINE LMDCOMP15}
{$DEFINE LMDCOMP16}
{$DEFINE LMDCOMP17}
{$DEFINE LMDCOMP18}
{$DEFINE LMDCOMP19}
{$DEFINE LMDCOMP20}
{$DEFINE LMDCOMP21}
{$DEFINE LMDCOMP22}
{$DEFINE LMDCOMP23}
{$DEFINE LMDCOMP24}
{$DEFINE LMDCOMP25}
{$DEFINE LMDCOMP26}
{$DEFINE LMDCOMP27}
{$DEFINE LMDCOMP28}
{$ENDIF}
Axel
![Delphi-PRAXiS [en]](https://en.delphipraxis.net/uploads/monthly_2018_12/logo.png.be76d93fcd709295cb24de51900e5888.png){kind=logo}
