Windows 10 und DPI

[jaenicke]

Du hast gar kein Manifest eingebunden (bei Delphi 7 die Unit XPMan einbinden oder das Manifest auf das Formular legen). Wie sieht es denn dann aus?

[Roadmap]

Hallo Sebastian,

nein das XPMan(ifest) ändert an dem Verhalten gar nichts. Alleine das Fenster wird schon um 25% vergrössert dargestellt und alle Inhalte darin gescaled?!?!

[Luckie]

Und was ist, wenn es der Benutzer so haben will, weil er zum Beispiel sehbehindert ist?

[Roadmap]

Luckie, ich verstehe Deinen Einwand! Allerdings ist es so das jedes meiner D7-Programme ohne das ich es will so ausgeführt wird. Unter Windows 7 war eben dies nicht der Fall, da es mit Scaled:=False komplett abgefangen werden konnte. Es mag sein, dass es auch Anwendnungszwecke dafür gibt, für den beschränkten Userkreis meiner Programm allerdings nicht. Zudem wäre es schön wenn ich da auch Einfluss darauf nehmen könnte wie mein Programm angezeigt werden könnte!

Doch nochmal zurück zum Thema: Es muss doch möglich sein, dieses Verhalten grundsätzlich abzustellen, jemand eine Idee?

Weiterhin ist es zumindest bei Windows 10 jetzt so, dass die Einstellung mit mehr als 96DPI (also 125% oder 150%) selbstständig von Windows bei der Installation gewählt wird, wenn dies als sinnvoll erachtet wird. Scheint eine Kombi aus Auflösung und Bildschirmgrösse zu sein, die das veranlasst.

[Bernhard Geyer]

Du musst im manifest einen neuen Eintrag ('ne GUID) für Win10 ergänzen (so wie auch ein Eintrag für W7, W8 nötig wäre).

Hier der Entsprechende Artikel: http://blogs.msdn.com/b/chuckw/archi...t-madness.aspx

[SneakyBagels]

Hiermit muss ich mich heute auch rumschlagen.
Manifest erstellt, Vista bis 10 kompatibel, angeblich. Es wird auch ins Programm eingebunden.
{$R WindowsManifest\Programmname.manifest.res} Muss das in jede Unit?

Aber ein Screen.PixelsPerInch ergibt selbst bei 150% Auflösung immer 96.
Wo ist der Fehler?

Delphi-Quellcode:

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3">
  <assemblyIdentity
    version="11.0.0.0"
    name="Programmname"
    type="*"/>
  <description>Programm-Beschreibung</description>
  <trustInfo xmlns="urn:schemas-microsoft-com:asm.v2">
    <security>
      <requestedPrivileges>
        <requestedExecutionLevel
          level="asInvoker"
          uiAccess="false"/>
      </requestedPrivileges>
    </security>
  </trustInfo>
  <compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">
    <application>
      <!-- Windows Vista -->
      <supportedOS Id="{e2011457-1546-43c5-a5fe-008deee3d3f0}"/>
      
      <!-- Windows 7 -->
      <supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}"/>
      
      <!-- Windows 8 -->
      <supportedOS Id="{4a2f28e3-53b9-4441-ba9c-d69d4a4a6e38}"/>
      
      <!-- Windows 8.1 -->
      <supportedOS Id="{1f676c76-80e1-4239-95bb-83d0f6d0da78}"/>
      
      <!-- Windows 10 -->
      <supportedOS Id="{8e0f7a12-bfb3-4fe8-b9a5-48fd50a15a9a}"/>
    </application>
  </compatibility>
  <asmv3:application>
    <asmv3:windowsSettings xmlns="http://schemas.microsoft.com/SMI/2005/WindowsSettings">
      <dpiAware>True</dpiAware>
    </asmv3:windowsSettings>
  </asmv3:application>
  <dependency>
    <dependentAssembly>
      <assemblyIdentity
        type="win32"
        name="Microsoft.Windows.Common-Controls"
        version="6.0.0.0"
        publicKeyToken="................................."
        language="*"
        processorArchitecture="*"/>
    </dependentAssembly>
  </dependency>
</assembly>

[haentschman]

Moin...

Zitat:

Aber ein Screen.PixelsPerInch ergibt selbst bei 150% Auflösung immer 96.

siehe https://forum.delphi-treff.de/index....e-herausfinden

Zitat:

Was ich nicht gemacht hatte ist, den PC nach der Umstellung neu zu starten.
Erst danach ist die Anzeige in der Registrie aktualisiert.