ShotGraph ordinary principles of drawing
ShotGraph in the following environments:
Visual Basic
VBScript
Visual Basic for applications (VBA), Word, Excel, etc.
Active Server Pages (ASP) engine with Internet Information Server
Perl for Windows
others
ShotGraph size = 3> COOL code:
href = "http://www.aspcn.com/aspcn.asp?title=shotgrap_upload"> upload file
href = "http://www.aspcn.com/aspcn.asp?title=shotgrah_counter"> counter
href = "http://www.aspcn.com/aspcn.asp?title=shotgrah_gif"> art GIF animation graphics
href = "http://www.aspcn.com/aspcn.asp?title=shotgrah_draw"> painting graphics
Let's first take a simple:
Step by step
First, the establishment of an object "shotgraph.image".
Use href = "http://www.aspcn.com/aspcn.asp?title=shotgraph_createimage"> CreateImage
Methods.
Use href = "http://www.aspcn.com/aspcn.asp?title=shotgraph_setcolor"
?> SetColor method to define one or multiple colors of paint to use.
Clear the area you plan all the content, if necessary, using the href = "http://www.aspcn.com/aspcn.asp?title=shotgraph_setcolor"> FillRect
Generally felt that way.
Effective way to use drawing.
Use href = "http://www.aspcn.com/aspcn.asp?title=shotgraph_gifimage"> GifImage
Function. Your picture is complete!
The following is a simple example how to use shotgraph drawing.
The size of the image is 201x201.
VBScript code:
set obj = CreateObject ("shotgraph.image")
size = 201
''Calling the CreateImage method
obj.CreateImage size, size, 4
''Set 4 colors for drawing
obj.SetColor 0,255,255,255
obj.SetColor 1,0,0,0
obj.SetColor 2,255,108,0
obj.SetColor 3,0,0,204
''Crearing the painting area with color 0
obj.SetBgColor 0
obj.FillRect 0,0, size-1, size-1
''Color 0 will be used for drawing
obj.SetDrawColor 1
''Drawing the line
obj.Line size-1, 0,0, size-1
''Color 2 will be used for filling
obj.SetBgColor 2
''Draw the big circle
obj.Ellipse 5,5, size-6, size-6
''Color 2 will be used for filling
obj.SetBgColor 3
''Draw the small circle
obj.Ellipse 5, (size-5) / 4, size / 2, (size-5) * 3 / 4
''Create the image file named test.gif
obj.GifImage 0,1, "test.gif"
[Next]
Here is the ASP and PERL code:
asp
$ Obj = CreateObject ("shotgraph.image")
$ Size = 201
$ Obj-> CreateImage ($ size, $ size, 4)
$ Obj-> SetColor (0,255,255,255)
$ Obj-> SetColor (1,0,0,0)
$ Obj-> SetColor (2,255,108,0)
$ Obj-> SetColor (3,0,0,204)
$ Obj-> SetBgColor (0)
$ Obj-> FillRect (0,0, $ size-1, $ size-1)
$ Obj-> SetDrawColor (1)
$ Obj-> Line ($ size-1, 0,0, $ size-1)
$ Obj-> SetBgColor (2)
$ Obj-> Ellipse (5,5, $ size-6, $ size-6)
$ Obj-> SetBgColor (3)
$ Obj-> Ellipse (5, ($ size-5) / 4, $ size / 2, ($ size-5) * 3 / 4)
$ Obj-> GifImage (0,1, "test.gif")
Recommended links:
Rising DRUG war Kaspersky million reward
Strategy And War Games Infomation
ENVIRONMENTAL regeneration of computer donations to needy students
Automation is everywhere
give a life to your MOBILE with free mobile themes
ASF to MPG
Health wine listed first off over five
AVI to 3GP
Alibaba Ma: Even if I have to FINALLY kneeling down
WMV to MPEG
Premier Download Managers
Blizzard and Ninetowns, who moved Founder's fonts?
GUIDE Computer Education
Ten controversial Figure in 2007
Lists Dictionaries Education