function TMEGPrioritizedQueue.AtLeast(N: Integer): Boolean; begin Result := Count >= N; end;