Zitat von
Virchov:
Tja, es wird dann später zB folgendes passieren:
Delphi-Quellcode:
//Calculate probability from histogram
for (t=0;t<LENBYTE;t++){
p[t]=((double)Histogram[t]/(double)numPixels);
mT += (t*p[t]);
}
Wegen Double(Integer) nur Pseudocode (das wilde Casten überlasse ich Dir
)
Delphi-Quellcode:
for t := 0 to LENBYTE - 1 do
begin
p[t] := Double(Histogram[t]) / Double(numPixels);
Inc(mT, t * p[t]);
end;