VCL Controls Erscheinungsbild bei per Monitor V2

[THonscha]

Zitat von himitsu:

Zitat von user69:

Ich denk das ist ein Bug in VCL.Buttons.pas (in D10.4.1/2).
This change in VCL.Buttons.pas should fix that.

// LStyle.DrawText(DC, FThemeDetails, Text, TextRect, LFormats, LOptions); //according RSP-30755 (minor subfix) - fix Bitbtn and SpeedButton background color error in win7
LStyle.DrawText(DC, FThemeDetails, Text, TextRect, LFormats, LColor); //according RSP-30755 (minor subfix) - fix Bitbtn and SpeedButton background color error in win7

Hier der genaue/komplette Grund für die unterschieldiche Darstellung:

Delphi-Quellcode:

    if CheckPerMonitorV2SupportForWindow(Handle) then
      PPI := FCurrentPPI
    else
      PPI := 0;

    LStyle.DrawElement(Canvas.Handle, Details, R, nil, PPI);

Aber der eigentliche Grund ist natürlich, das DPI_AWARENESS_CONTEXT_PER_MONITOR_AWARE_V2 erst mit Windows 10 erfunden wurde und Windows 7 das nicht kennen kann.

Lösung: Wenn Programm in Windows < 10 ausgeführt, dann kein PerMonitorV2 verwenden

Danke Dir - werde ich morgen einbauen!

[TurboMagic]

Zitat von himitsu:

Hier der genaue/komplette Grund für die unterschieldiche Darstellung:

Delphi-Quellcode:

    if CheckPerMonitorV2SupportForWindow(Handle) then
      PPI := FCurrentPPI
    else
      PPI := 0;

    LStyle.DrawElement(Canvas.Handle, Details, R, nil, PPI);

Aber der eigentliche Grund ist natürlich, das DPI_AWARENESS_CONTEXT_PER_MONITOR_AWARE_V2 erst mit Windows 10 erfunden wurde und Windows 7 das nicht kennen kann.

Lösung: Wenn Programm in Windows < 10 ausgeführt, dann kein PerMonitorV2 verwenden

Ist das ein Bug in Delphi?
Falls ja, ist der schon gemeldet?
Falls nein, könnte den jemand der sich besser damit auskenn als ich melden?

Grüße
TurboMagic

[himitsu]

Das ist an 2 Stellen so eingebaut.
Denke mal jemand hat sich etwas dabei gedacht, als diese Komponente so kunterbunt umgebaut wurde.

Nja, aber ich vermute einfach Mal, dass es nicht mehr mit Windows 7 getestet wurde.

[TurboMagic]

Ist das nun ein Bug in der VCL oder nicht?

[himitsu]

Wenn du das meldest, geht der Status bestimmt auf "das ist halt so"

Der Bug "geht halt nicht", in aktuelle lebenden Windowsen, ist ja nicht existent.

[THonscha]

Jetzt weiß ich, warum der Patch bei mir nicht läuft Ich habe die VCL nicht neu kompiliert... geht das irgendwie einfach?

[Uwe Raabe]

Zitat von THonscha:

Ich habe die VCL nicht neu kompiliert

Man compiliert nicht einfach die VCL!

[THonscha]

Zitat von Uwe Raabe:

Zitat von THonscha:

Ich habe die VCL nicht neu kompiliert

Man compiliert nicht einfach die VCL!

Ok - habe die geänderte Datei in das Verzeichnis meines Programmes geschoben und nun funktioniert auch der Patch und löst das Problem.

Vielleicht wird der Fehler ja in einer der nächsten Versionen behoben. Ich habe zumindest den Bug gemeldet.

[Codehunter]

Ich möchte nur noch ergänzen, dass der Windows-7-Support per ESU erst am 23.10.2023 bzw. 14.10.2024 endet. Erst danach ist es wirlich ganz ganz tot. Trotzdem solltest du dir den Aufwand, für Win 7 zu testen gut bezahlen lassen.

[THonscha]

Das ist richtig ... aus diesem Grunde sollte ein Programm auch noch auf WIN 7 laufen.