It is the situation:
I have to create a big picture made with several pictures (width and height
are not the same).
I've been trying a lot of ways to do it faster but I need it more optimized
and faster.
Any hint???
It is the current way:
For i = 0 To TotalPictures
MyPic = CreatePicture
ArrayPicture.Append MyPic
SumHeight = SumHeight + MyPic.Height
If MaxWidth < MyPic.Width Then
MaxWidth = MyPic.Width
End If
Next
MyBigPic = NewPicture(MaxWidth, SumHeight, 32)
For i = 0 To TotalPictures
MyBigPic.Graphics.DrawPicture (ArrayPicture(i), 0, h)
h = h + ArrayPicture(i).Height
Next
Return MyBigPic
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
|