Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.016 Beiträge
 
Delphi 12 Athens
 
#2

AW: Screen DPI und TrayIcon Größe?

  Alt 19. Okt 2023, 14:40
Das Name stimmt aber nicht, denn die Funktion liefert nicht den Faktor zurück,
es sei denn du meintest z.B. SCALINGFACTORX anstatt LOGPIXELSX,

oder beispielsweise
Delphi-Quellcode:
function GetScalingFactor: Single;
    Result := GetDeviceCaps(hdc, LOGPIXELSX) / 96;


PS: Die drei verwendeten API sollten eigentlich keine Exceptions werfen, sondern einen entsprechenden Rückgabewert ausgeben,
weswegen per se das Try-Finally unnötig wäre, aber egal ... besser zuviel, als zu wenig.
(und falls doch, dann ist alles sowas vom im A, so dass eh alles egal wäre)
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests

Geändert von himitsu (19. Okt 2023 um 14:44 Uhr)
  Mit Zitat antworten Zitat