Es handelt sich höchstwahrscheinlcih um ein dynamisches Array, da ein Array mit einem Feld und dem Wert 0 in diesem Feld ziemlich wenig Sinn hätte...
also...
Delphi-Quellcode:
const LENBYTE = 0;
...
var
Histogram : array of Integer;
begin
SetLength(Histogram, 1);
Histogram[LENBYTE] := 0;
...
end;
im weiterem Programmablauf musst du entsprechend dem c++ Code das Array mit SetLength vergrößern.