Ik zit met het volgende probleem. Ik maak regelmatig gebruik van TPicture voor eea, alleen wat me opvalt hieraan is de enorme traagheid van veel bewerkingen die ik doe. Voorbeeldje, de volgende code :
Dit stukje code duurt op m´n celeron950 machine al zo grofweg 15 seconden om uit te voeren bij een afbeelding met een afmeting van 640x480. Een beetje extreem dus lijkt mij.
Dus mijn vraag : wat doe ik hier nou fout en/of zie ik over het hoofd? Kan er bijzonder weinig over in de docs vinden....
Delphi:
1
2
3
4
5
| for XTeller := 0 to Image_OffScreenBuffer.Bitmap.Width do begin for YTeller := 0 to Image_OffScreenBuffer.Bitmap.Height do begin Image_OffScreenBuffer.Bitmap.Canvas.Pixels[XTeller, YTeller] := 0; end; end; |
Dit stukje code duurt op m´n celeron950 machine al zo grofweg 15 seconden om uit te voeren bij een afbeelding met een afmeting van 640x480. Een beetje extreem dus lijkt mij.
Dus mijn vraag : wat doe ik hier nou fout en/of zie ik over het hoofd? Kan er bijzonder weinig over in de docs vinden....
Genoeg is meer dan veel, en tart den overvloed