Components All New MacOS Windows Linux iOS
Examples Mac & Win Server Client Guides Statistic FMM Blog Deprecated Old

GMImage.DrawRectangle

Draws a rectangle.

Component Version macOS Windows Linux Server iOS SDK
GraphicsMagick 3.0 ✅ Yes ✅ Yes ✅ Yes ✅ Yes ✅ Yes
MBS( "GMImage.DrawRectangle"; ImageRef; upperLeftX; upperLeftY; lowerRightX; lowerRightY )   More

Parameters

Parameter Description Example
ImageRef The image reference number. 1
upperLeftX Upper left X position.
upperLeftY Upper left Y position.
lowerRightX Lower right X position.
lowerRightY Lower right Y position.

Result

Returns OK or error message.

Description

Draws a rectangle.
Draw a rectangle using stroke color and thickness from upper-left coordinates to lower-right coordinates.
If a fill color is specified, then the object is filled.

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 rectangle 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.DrawRectangle"; $img; 50; 50; 250; 150) ]
Set Variable [ $png; Wert:MBS("GMImage.WriteToPNGContainer"; $img; "test.png") ]
Set Variable [ $r; Wert:MBS("GMImage.Release"; $img) ]
Set Field [ Drawing::Image; $png ]

Draws a cirlce in a rectangle in a circle:

Set Variable [$img; Value:MBS( "GMImage.New"; "100x100"; "white" )]
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.Release"; $img)]

Draw something and write to file on desktop:

# New Image
Set Variable [$img; Value:MBS("GMImage.New"; "300x200"; "RGB 1 1 1")]
# Set colors and line width
Set Variable [$r; Value:MBS("GMImage.SetStrokeColor"; $img; "RGB 1 0 0")]
Set Variable [$r; Value:MBS("GMImage.SetFillColor"; $img; "RGB 0 0 1")]
Set Variable [$r; Value:MBS("GMImage.SetLineWidth"; $img; 5)]
# draw a rectangle
Set Variable [$r; Value:MBS("GMImage.DrawRectangle"; $img; 50; 50; 250; 150)]
# save to test.png on desktop:
Set Variable [$DesktopPath; Value:MBS( "Folders.UserDesktop" )]
Set Variable [$path; Value:MBS( "Path.AddPathComponent"; $DesktopPath; "test.png")]
Set Variable [$r; Value:MBS("GMImage.WriteToFile"; $img; $path)]
# cleanup
Set Variable [$r; Value:MBS("GMImage.Release"; $img)]

See also

Example Databases

Blog Entries

This function checks for a license.

Created 18th August 2014, last changed 11st November 2019


GMImage.DrawPath - GMImage.DrawRoundRectangle