View Single Post
  #3 (permalink)  
Old 01-06-2009, 11:54 PM
BerndB BerndB is offline
Junior Member
 
Join Date: May 2007
Location: Germany
Posts: 45
Default

Hi Klaus,

thanks for your quick response.

The code snippet is a bit simplified.
in il1.Item(0) is the original image.

but before zooming there are drawn Circles onto the image.
So image + circles are in BiExZoom.New3 to be zoomed.


Concerning memory with dzImage or ImageLibEx I found a funny thing:

In scaledMap as well as in OziFilesView I alternatively used the two zoom methods.
At first dzImage was active. (The left part of each Thumbnail.)
I quickly clicked 5 zoom steps up and then 5 zoom steps down.
This I repeated several times.

scaledMap:
Code:
Sub Zoom(Fact)
    ZoomFact=ZoomFact*Fact

    bmpDisplay.New3(IL3.Item(
0))      ' ImageLibEx 
    bmpDisplay.Zoom(ZoomFact*100)
    
'bmpDisplay.Value=dzImage.ZoomImage(IL3.Item(0),ZoomFact*100) 'dzImage
    
       InitMap
    DrawElements
End Sub
(by the way: in DrawElements is done zooming as well)


OziFilesView:
Code:
Sub numZoom_ValueChanged
    mapDisplay.New3(BiExZoom.Value)
        mapDisplay.Zoom(numZoom.Value) 
    
'mapDisplay.Value= dzImage.ZoomImage(BiExZoom.Value,numZoom.Value)  
       
        rectSrc.x = -(ZPktX -ZPktX *numZoom.Value/
100)  ' keep centering on the zoom point
        rectSrc.y = -(ZPktY -ZPktY *numZoom.Value/100 )

    drwMap.DrawImage(mapDisplay.Value,rectSrc.Value,rectDest.Value,
False)
       frmMap.Refresh
        
End Sub
This was done on the desktop

The thumbnails are taken from the XP-taskmanager.

Using ImageLibEx you can see a increasing of used memory in both apps.

Using dzImage with OziFilesView shows increasing while zoom in
and decreasing while zoom out.
With scaledMap it shows continued increasing again.

funny, but no idea at present

cheers
Bernd
Reply With Quote