DesignObject.Width Property |
Sets or returns the width of an object. Applies to box, ellipse, picture, rich text, and text objects.
DesignObject.Width = Value
Where Value determines the width of the object in the measurement units of the active document.
Version |
BarTender 9.3 or higher |
Edition |
Automation, Enterprise Automation |
The DesignObject.Width property sets or returns the width of a box, ellipse, text, rich text, or picture object. For text objects, the width property only applies to text that is formatted as a paragraph.
'Declare a BarTender application variable
Dim btApp As BarTender.Application
'Declare a BarTender document variable
Dim btFormat As BarTender.Format
'Declare a BarTender design object variable
Dim btObject As BarTender.DesignObject
'Create a new instance of BarTender
btApp = New BarTender.Application
'Set the BarTender application visible
btApp.Visible = True
'Open a BarTender document
btFormat = btApp.Formats.Open("c:\Format1.btw", False, "")
'Set the object variable
btObject = btFormat.Objects.Find("Box 1")
'Set the width of the box object to 0.75 in
btFormat.MeasurementUnits = BarTender.BtUnits.btUnitsInches
btObject.Width = 0.75
'End the BarTender process
btApp.Quit(BarTender.BtSaveOptions.btDoNotSaveChanges)
// Declare a BarTender application variable
BarTender.Application btApp;
// Declare a BarTender document variable
BarTender.Format btFormat;
// Declare a BarTender design object variable
BarTender.DesignObject btObject;
// Create a new instance of BarTender
btApp = new BarTender.Application();
// Set the BarTender application visible
btApp.Visible = true;
// Open a BarTender document
btFormat = btApp.Formats.Open("c:\\Format1.btw", false, "");
// Set the object variable
btObject = btFormat.Objects.Find("Box 1");
// Set the width of the box to 0.75 in
btFormat.MeasurementUnits = BarTender.BtUnits.btUnitsInches;
btObject.Width = 0.75;
// End the BarTender process
btApp.Quit(BarTender.BtSaveOptions.btDoNotSaveChanges);