High DPI für eigene Controls?

[uups]

z.B. so erstelle ich ein Button für die GUI der Komponente:

Delphi-Quellcode:

FButtonFirst := TButton.Create(FPanelButtonsFirstPrew);
with FButtonFirst do
begin
  Parent := FPanelButtonsFirstPrew;
  Width := MulDiv(16, Screen.PixelsPerInch, 96);
  Height := MulDiv(16, Screen.PixelsPerInch, 96);
  Top := MulDiv(4, Screen.PixelsPerInch, 96);
  Left := MulDiv(8, Screen.PixelsPerInch, 96);
  OnClick := ButtonFirstClick;
end;