XProfan

Français

allô Profaner...

quelle Rückmeldungen liefert suivant Voir le texte source sous XP???
Kompilieren Marque Séparation

Def @SetPriorityClass(2) !"KERNEL32","SetPriorityClass"
DEF @FormatMessage(7) !"KERNEL32","FormatMessageA"
DEf @GetLastError(0) !"KERNEL32","GetLastError"
Def @GetCurrentProcess(0) !"KERNEL32","GetCurrentProcess"
DEf @SetLastError(1) !"KERNEL32","SetLastError"
Def GetPriorityClass(1) !"KERNEL32","GetPriorityClass"
DEF SetThreadPriority(2) !"KERNEL32","SetThreadPriority"
DEF GetCurrentThread(0) !"KERNEL32","GetCurrentThread"
DEF GetThreadPriority(1) !"KERNEL32","GetThreadPriority"
Declare GETERROR_Buffer#,Fehler&,PHandle&,THandle&

PROC LastError

    Parameters Rückgabe&
    Declare GETERROR_Buffer$
    DIM GETERROR_Buffer#,32000
    @FormatMessage($1000,0,Rückgabe&,0,GETERROR_Buffer#,32000,0)
    Let GETERROR_Buffer$=@STRING$(GETERROR_Buffer#,0)
    Dispose GETERROR_Buffer#
    Return GETERROR_Buffer$

Endproc

Windowstyle 31
Windowtitle "Priorität setzen"
Window 0,0-640,440
Addstring "Priorität des Prozesses="
ADDSTRING " Priorität vorher: "+@str$(GetPriorityClass(GetCurrentProcess()))
@SetLastError(0)
LET PHANDLE&=@GetCurrentProcess()
LET FEHLER&=@SetPriorityClass(PHANDLE&,$100)
LastError @GetLastError()
ADDSTRING " Rückmeldung SetPriorityClass: "+@STR$(Fehler&)
ADDSTRING " Priorität jetzt: "+@str$(GetPriorityClass(GetCurrentProcess()))
ADDSTRING " "+@$(0)
Addstring "Priorität des Threads="
ADDSTRING " Priorität vorher: "+@str$(GetThreadPriority(GetCurrentThread()))
@SetLastError(0)
LET THANDLE&=@GetCurrentThread()
LET FEHLER&=@SetThreadPriority(THANDLE&,$F)
LastError @GetLastError()
ADDSTRING " Rückmeldung SetThreadPriority: "+@STR$(Fehler&)
ADDSTRING " Priorität jetzt: "+@str$(GetThreadPriority(GetCurrentThread()))
ADDSTRING " "+@$(0)
@EDITBOX("Rückgaben",1)

While 0=0

    Waitinput

Wend

PS: Pour qui qui sich pas auskennen -> Code ist à cause de Waitinput trotz $100 chez SetPriorityClass unbedenklich...
je erhöhe ici avant allen Dingen avec SetPriorityClass qui Priorität des aktuellen Prozeses et avec cela aussi qui Zeit, qui einem individuel Prozess (eigentlich Fil) zum Durchführen de Berechnungen zur Disposition steht. là ici Waitinput incorporé ist et sonst aucun Aktionen avoir lieu, wird qui Boost cet Prozesses pas augmenté et cela System bleibt stabil.

08.10.2005 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Torsten
Rümker

Ich lerne, ob ich will oder nicht!
Betriebssystem:
- Ubuntu 15.x
- Windows (diverse)
XProfan Version: X2

08.10.2005 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Besten Dank Torsten, hat geholfen - maintenant vois je klarer...

08.10.2005 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Michael
Wodrich

Selbes Ergebnis chez XP Home
Kompilieren Marque Séparation

Priorität des Prozesses=
Priorität vorher: 32
Rückmeldung SetPriorityClass: 1
Priorität jetzt: 256
Der Vorgang wurde erfolgreich beendet.
Priorität des Threads=
Priorität vorher: 0
Rückmeldung SetThreadPriority: 1
Priorität jetzt: 15
Der Vorgang wurde erfolgreich bee

/a>

belle Grüße
Michael Wodrich

Programmieren, das spannendste Detektivspiel der Welt.

08.10.2005 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

OK, quoi undokumentiertes:
cela Privileg SeIncreaseBasePriority schränkt qui API API SetPriorityClass un.
SetPriorityClass ist dabei pas sur qui Aktivierung des Privilegs angewiesen, mais aktiviert cet selbst - es doit alors seulement vorhanden son.
Absent cela angesprochene Privileg, peux qui REALTIME_PRIORITY_CLASS ($100) pas vergeben volonté. Wird versucht cet Priorität trop vergeben, wird qui Priorität sur den ensuite höchsten Wert ($80) HIGH_PRIORITY_CLASS gesetzt. une Rückmeldung sur peut-être. pas vorhandene Rechte erfolgt pas.

cet Aussage ist nirgendwo sonst im Netz dokumentiert, et je veux espérer, qui cet Stelle bien aufgehoben et gepflegt wird!

qui API SetThreadPriority wird pas par cela Privileg eingeschränkt, quoique cet API également zum mettons qui Basispriorität beiträgt!

08.10.2005 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation