Keine 100% CPU

[Rumpi]

Hi,

Delphi-Quellcode:

var
  H : THandle;
begin
  H := GetCurrentProcess();
  SetPriorityClass(H, IDLE_PRIORITY_CLASS);
  try
    try
      ... // deine Function
    except
    end;  
  finally
    SetPriorityClass(H, NORMAL_PRIORITY_CLASS);
  end;

mfg Rumpi