Die DevEx Library macht das.
Code:
if Win32MajorVersion >= 6 then
begin
FUser32DLL := GetModuleHandle(user32);
SetProcessDPIAware := GetProcAddress(FUser32DLL, 'SetProcessDPIAware');
if Assigned(SetProcessDPIAware) then
SetProcessDPIAware;
end;
Das gehört zu einer Initialisierungsroutine, die im Initialization-Teil aufgerufen wird.
Verstehe ich nicht - warum tun die das? Die wissen doch nichts über den Rest der Software und die anderen Komponenten.