Ein Array schnell auf 0 Werte prüfen

[Tyrael Y.]

Hallo zusammen,

ich lese aus einem Datenstrom Daten in ein Array.
Es kann vorkommen das ein sehr großes Array nur aus Nullen besteht.
Wenn dieses Array nur aus Nullen besteht, muss ich es nicht weiterverabeiten.

Wie kann ich ein großes Array (array of byte, array of word, array of integer) schnell auf nur Nullen untersuchen?

Delphi-Quellcode:

type TIntArray = array of integer;

function IsEmptyArray(AArray: TIntArray): Boolean
begin
 //for i := Low(AArray) to High(AArray) do
 //begin
end;