In solch einem Fall hilft es sich die Dokumentation zu der Funktion anzuschauen:
https://docs.microsoft.com/en-us/win...tpriorityclass
Zitat:
ABOVE_NORMAL_PRIORITY_CLASS
0x00008000
BELOW_NORMAL_PRIORITY_CLASS
0x00004000
Wenn du diese Werte angibst (32768 bzw. 16384), dann klappt es auch.
Nebenbei merkt man, dass du noch Delphi 6 benutzt... so sieht dein Programm unter Windows 10 aus:
Zudem war es nur zur Hälfte am rechten Bildschirmrand sichtbar.
An der Stelle der Hinweis, dass die aktuelle Version bis zu einem Umsatz von 5000 Dollar kostenlos ist. Wenn man also Delphi rein privat ohne damit etwas zu verdienen einsetzt, macht es keinen Sinn bei Delphi 6 zu bleiben.
https://www.embarcadero.com/de/products/delphi/starter
So sieht das Programm übrigens neu mit Delphi 10.3 kompiliert aus:
