Tuesday, October 19, 2010

ShotGraph ordinary principles of drawing


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