DesignObject.LineStartX Property

'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("Line 1")

'Set the line's starting coordinates

'1 inch from the top and 1 inch from the left

btFormat.MeasurementUnits = BarTender.BtUnits.btUnitsInches

btObject.LineStartX = 1

btObject.LineStartY = 1

'Set the line's ending coordinates

'3 inches from the top and 3 inches from the left

btObject.LineEndX = 3

btObject.LineEndY = 3

'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("Line 1");

// Set the line's starting coordinates

// 1 inch from the top and 1 inch from the left

btFormat.MeasurementUnits = BarTender.BtUnits.btUnitsInches;

btObject.LineStartX = 1;

btObject.LineStartY = 1;

// Set the line's ending coordinates

// 3 inches from the left and 3 inches from the top

btObject.LineEndX = 3;

btObject.LineEndY = 3;

// End the BarTender process

btApp.Quit(BarTender.BtSaveOptions.btDoNotSaveChanges);