ASP Painter
Home
Home
Samples
Samples
Purchase
Purchase
Download
Download
Documentation
Documentation


ASPPainter::Primitive::Arc.vbs

							
'============================================================
'Sample Arc.vbs
'============================================================

Dim im
Dim coords(100)
Set im = CreateObject("ASPPAinter.Pictures.1")
im.SetBKColor 0,0,0,0
im.Create 100,100
im.SetColor 0,0,255,255
im.SetLineWidth 10
im.DrawArc 50,50,30,80,0,360

im.saveToFile "C:\arc.png"
im.Destroy
Set im = Nothing

Picture 1. arc.png

More samples:

Arc, Beziers, Circle, Ellipse, Line, Pie, Rectangle, Unclosed polygon

See also:

SetBKColor, Create, SetColor , SetLineWidth , DrawArc , DrawFilledRectangle , DrawBezier , DrawCircle , DrawFilledCircle , DrawEllipse , DrawFilledEllipse , DrawRectangle , DrawUnclosedPolygon , SaveToFile , DestroyALL



home samples purchase documentation download