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
No comments:
Post a Comment