Wie kann ich beim Installieren die DPI Eigenschaften setzen?

[TigerLilly]

Neu kompiliert + nicht signiert etc:

Task-Manager sagt: Unbekannt in der Spalte DPI.

Sysinternals gibt aus:

Code:

        Verified:       Unsigned
        Link date:      23:22 19.06.1992
        Publisher:      n/a
        Company:        dato Denkwerkzeuge
        Description:    nut.s nutritional.software
        Product:        n/a
        Prod version:   1.0.0.0
        File version:   1.0.0.45
        MachineType:    32-bit

Und das Phänomen gibt es ja auch auf den Kunden-PCs + die haben die Einstellungen noch nie geändert.

Und so sieht das aus: Einmal mit den unveränderten Eigenschaften und einmal mit geänderten DPI Einstellungen - Skalierung 150%

[TigerLilly]

Zitat:

Zitat von Uwe Raabe (Beitrag 1534808)

Hast du mal versucht, die Anwendung umzubenennen?

Ja, auch - aber das ist bei allen EXEs so, die von mir mit D2006 erzeugt werden, darum habe ich das auch nie hinterfragt, sondern als Standardverhalten abgetan.

[dummzeuch]

Es liegt aber definitiv nicht daran, dass Delphi 2006 generell ein solches Problem hat. Ich habe gerade testweise ein neues Projekt damit erstellt und es wird skaliert wie erwartet.

[TigerLilly]

Vielleicht weil das ein XP-Rechner ist?

[Uwe Raabe]

Bei XP gibt es aber weder die Möglichkeit zu skalieren, noch eine Kompatibilitätseinstellung für Hohe DPI. Lediglich die Schriftgröße lässt sich einstellen.

Wenn es bei dir mit einem einfachen D2006 Programm reproduzierbar ist, dann häng doch so ein Programm einfach mal hier an.

[TigerLilly]

Ich hatte nicht recht. Ein neu kompiliertes Programm, das nur aus einem Form (und damit keinen Bibliothekscode verwendet) besteht, verhält sich so, wie Ihr behauptet habt. Da habt Ihr mir schon mal geholfen. :- )

Irgendwo in den Tiefen unseres Codes versteckt sich also ein "Hi! Ich bin DPI aware". Das muss irgendeine 3rd Party Lib sein. Wie könnte ich das finden?

[TigerLilly]

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.

[Uwe Raabe]

Zitat:

Zitat von TigerLilly (Beitrag 1534819)

Verstehe ich nicht - warum tun die das? Die wissen doch nichts über den Rest der Software und die anderen Komponenten.

Das ist mir allerdings auch ein Rätsel. Insbesondere bei einer Delphi-Version die per se gar kein High-DPI kann.

Schön dass du es doch noch gefunden hast.

Es ist auch interessant zu sehen, wie sich die eigentliche Frage "Wie kann ich beim Installieren die DPI Eigenschaften setzen?" entwickelt hat zu "Verstehe ich nicht - warum tun die das?"

[ULIK]

Das wird aber unter XP gar nicht ausgeführt! Und wenn dann würde es System-DPI aware setzen (https://learn.microsoft.com/de-de/wi...rocessdpiaware)

[TigerLilly]

Zitat:

Zitat von ULIK (Beitrag 1534822)

Das wird aber unter XP gar nicht ausgeführt! Und wenn dann würde es System-DPI aware setzen (https://learn.microsoft.com/de-de/wi...rocessdpiaware)

Aber unter Windows 10 und 11 wird es ausgeführt.