Topics   All   Mac OS X (Only)   Windows (Only)   Linux (Only, Not)   iOS (Only, Not)  
Components   Crossplatform Mac & Win   Server (Not)   Client   Old   Guides   Examples
New in version: 6.3   6.4   6.5   7.0   7.1   7.2   7.3   7.4   7.5   7.6    Statistic  

GMImage.DrawCircle

Draws a circle.

Component Version macOS Windows Server FileMaker Cloud FileMaker iOS SDK
GraphicsMagick 3.0 Yes Yes Yes Yes Yes

MBS( "GMImage.DrawCircle"; ImageRef; originX; originY; perimX; perimY )

Parameters

Parameter Description Example value
ImageRef The image reference number. 1
originX The X coordinate for start position.
originY The Y coordinate for start position.
perimX The perimeter width.
perimY The perimeter height.

Result

Returns OK or error message.

Description

Draws a circle.
Draw a circle using the stroke color and thickness using specified origin and perimeter coordinates. If a fill color is specified, then the object is filled.
PerimX/PerimY define a point where the circle goes through, so put it a radius away from the origin.
If you have an open path, the command is added there for later drawing with GMImage.DrawPath.

Examples

Creates a new image and draws a circle inside:

Set Variable [ $img; Wert:MBS("GMImage.New"; "300x200"; "RGB 1 1 1") ]
Set Variable [ $r; Wert:MBS("GMImage.SetStrokeColor"; $img; "RGB 1 0 0") ]
Set Variable [ $r; Wert:MBS("GMImage.SetFillColor"; $img; "RGB 0 0 1") ]
Set Variable [ $r; Wert:MBS("GMImage.SetLineWidth"; $img; 5) ]
Set Variable [ $r; Wert:MBS("GMImage.DrawCircle"; $img; 150; 100; 100; 100) ]
Set Variable [ $png; Wert:MBS("GMImage.WriteToPNGContainer"; $img; "test.png") ]
Set Variable [ $r; Wert:MBS("GMImage.Destroy"; $img) ]
Set Field [ Drawing::Image; $png ]

Draws a cirlce in a rectangle in a circle:

Set Variable [$img; Value:MBS( "GMImage.New"; "100x100"; "COLOR 255 255 255" )]
Set Variable [$r; Value:MBS( "GMImage.SetFillColor"; $img; "RGB 1 0 0" )]
Set Variable [$r; Value:MBS( "GMImage.SetStrokeColor"; $img; "RGB 0 0 1" )]
Set Variable [$r; Value:MBS( "GMImage.DrawCircle"; $img; 50; 50; 50; 90 )]
Set Variable [$r; Value:MBS( "GMImage.DrawRectangle"; $img; 22; 22; 100-22; 100-22 )]
Set Variable [$r; Value:MBS( "GMImage.DrawCircle"; $img; 50; 50; 50; 100-22 )]
Set Field [test::test; MBS( "GMImage.WriteToPNGContainer"; $img; "test.png" )]
Set Variable [$r; Value:MBS( "GMImage.Destroy"; $img)]

See also

Example Databases


GMImage.DrawArc   -   GMImage.DrawEllipse

Feedback: Report problem or ask question.




Links
MBS Xojo PDF Plugins