I guess I could not make my point clear?!?!
What is wrong with using a smth.gif picture file within a web site !?!?
OK Folks Forget about the GIF part..
"Kodak Image Edit Control" does seem to solve my problems. Would be possible to create a so-called "Kodak Object" and draw stuff into a bitmap through VBScript? If so how can I call the DLL which includes this object?
Otherwise, if I intend to make this through a dll how should I sort it out?
It seemed but it does not!
What I wanna do is to create a picture object than through some methods and/or properties I wanna be able to draw circles, ellipses, rectangles and etc. on that picture. The picture is a raster image object.
My first ? is : How can I overcome this problem?
second ? is : How can I overcome this problem on the Internet?
I tried this but I still have a problem...
code:
Option Explicit
Private Sub Form_Click()
' Declare variables.
Dim CX, CY, Limit, Radius As Integer, Msg As String
ScaleMode = vbPixels ' Set scale to pixels.
AutoRedraw = True ' Turn on AutoRedraw.
Width = Height ' Change width to match height.
CX = ScaleWidth / 2 ' Set X position.
CY = ScaleHeight / 2 ' Set Y position.
Limit = CX ' Limit size of circles.
For Radius = 0 To Limit ' Set radius.
Picture1.Circle (CX, CY), Radius, _
RGB(Rnd * 255, Rnd * 255, Rnd * 255)
DoEvents ' Yield for other processing.
Next Radius
Msg = "Choose OK to save the graphics from this form "
Msg = Msg & "to a bitmap file."
MsgBox Msg
SavePicture Picture1.Image, _
"TEST.BMP" ' Save picture to file.
End Sub
This works for good if the circles are assigned to the picture prop of the form, however when assigned to the image of the picture test.bmp returns empty. Why and how does that happen?