ASPPainter::Rotate::Horizontal.vbs
Dim im
Set im = CreateObject("ASPPAinter.Pictures.1")
im.SetBKColor 127,0,127,255
im.Create 300,300
im.SetColor 255,255,255,255
im.SetColor 194,194,255,255
im.DrawFilledRectangle 10,10,50,20
im.HorizontalFlip
im.saveToFile "C:\horizontal.png"
im.Destroy
Set im = Nothing
 |
Picture 1. horizontal.png |
More samples:
Horizontal,
Mirror, Rotate,
Vertical
See also:
LoadFile,
Width, Height ,
MakeThumbnail , SetFormat
, SaveToFile ,
DestroyALL