fixed bugs in memory-limited render

This commit is contained in:
zueuk 2006-06-02 12:32:46 +00:00
parent c1e02e3731
commit b7b42c244d
2 changed files with 5 additions and 5 deletions

View File

@ -251,7 +251,7 @@ begin
IterateBatchProc := IterateBatchAngle; IterateBatchProc := IterateBatchAngle;
end; end;
nsamples := Round(sample_density * bucketSize / (oversample * oversample)); nsamples := Round(sample_density * NrSlices * bucketSize / (oversample * oversample));
nrbatches := Round(nsamples / (fcp.nbatches * SUB_BATCH_SIZE)); nrbatches := Round(nsamples / (fcp.nbatches * SUB_BATCH_SIZE));
for i := 0 to nrbatches do begin for i := 0 to nrbatches do begin

View File

@ -96,8 +96,8 @@ begin
begin begin
cosa := cos(FCP.FAngle); cosa := cos(FCP.FAngle);
sina := sin(FCP.FAngle); sina := sin(FCP.FAngle);
rcX := image_Center_X*(1 - cosa) - image_Center_X*sina - camX0; rcX := image_Center_X*(1 - cosa) - image_Center_Y*sina - camX0;
rcY := image_Center_Y*(1 - cosa) + image_Center_Y*sina - camY0; rcY := image_Center_Y*(1 - cosa) + image_Center_X*sina - camY0;
end; end;
end; end;
@ -182,7 +182,7 @@ begin
FImageMaker.SetCP(FCP); FImageMaker.SetCP(FCP);
FImageMaker.Init; FImageMaker.Init;
fcp.sample_density := fcp.sample_density * nrslices; // fcp.sample_density := fcp.sample_density * nrslices;
fcp.height := fcp.height div nrslices; fcp.height := fcp.height div nrslices;
center_y := fcp.center[1]; center_y := fcp.center[1];
zoom_scale := power(2.0, fcp.zoom); zoom_scale := power(2.0, fcp.zoom);
@ -213,7 +213,7 @@ begin
end; end;
end; end;
fcp.sample_density := fcp.sample_density / nrslices; // fcp.sample_density := fcp.sample_density / nrslices;
fcp.height := fcp.height * nrslices; fcp.height := fcp.height * nrslices;
end; end;