SmartOrtho

Boolean value that toggles Smart Ortho on or off. When enabled (True), Smart Ortho operates automatically when close to angles. When disabled (False) it does not operate. Figure 1 shows where Smart Ortho is controlled in the Main Menu Settings / Snapping window. Smart Ortho cannot be enabled if Ortho is disabled.

API Call:

C#

private void Main()
{
	PlanSwift planswift = new PlanSwift();
	IItem settings = planswift.GetItem(@"\Settings");
	IPropertyObject property = settings.GetProperty("SmartOrtho");
	console.WriteLn(property.ResultAsBoolean())
}

//or

private void Main()
{
	PlanSwift planswift = new PlanSwift();
	IPropertyObject property = planswift.GetProperty(@"\Settings","SmartOrtho")
	console.WriteLn(property.ResultAsBoolean)
}

Delphi

procedure main;
var
	planswift: IPlanSwift;
	settings: IItem;
	property: IPropertyObject
begin
	planswift := coPlanSwift.Create();
	settings := planswift.getItem('\Settings');
	property := planswift.GetProperty('SmartOrtho');
	WriteLn(property.RResultAsBoolean())
end

//or
procedure main;
var
	planswift: IPlanSwift;
	property:IPropertyObject;
begin
	planswift := coPlanSwift.Create();
	property := planswift.GetProperty('\Settings','SmartOrtho'); 
	WriteLn(property.ResultAsBoolean()) 
end;

VB \ VBA (OLE)

Sub main()
	Dim planswift = CreateObject("PlanSwift9.PlanCenter")
	Dim settings = planswift.GetItem("\Settings")
	Dim property = settings.GetProperty("SmartOrtho")
	Console.WriteLn(property.ResultAsBoolean());
End Sub

//or

Sub Main()
	Dim planswift = CreateObject("PlanSwift9.PlanCenter")
	Dim nameProperty = planswift.GetProperty("\Settings","SmartOrtho")
	Console.WriteLn(property.ResultAsBoolean)
End Sub

PlanSwift Scripting

begin
	settings := PlanSwift.getItem('\Settings');
	property := settings.GetProperty('SmartOrtho');
	ShowMessage(property.ResultAsBoolean);
end

//or

begin
	property := PlanSwift.GetProperty('\Settings','SmartOrtho');
	ShowMessage(property.ResultAsBoolean);
end
//or

begin
	settings := getItem('\Settings');
	ShowMessage(GetResultAsBoolean(settings,'SmartOrtho'));
end

//or

begin
   ShowMessage(GetResultAsBoolean('\Settings','SmartOrtho'));
end

Figure 1

To open any link in a new tab, preserving your position in the current article, just hold down the <CTRL> key on your keyboard before clicking the link or click using your mouse wheel.

SmartOrtho