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:
...
Image Removed
Image Added
Figure 1
API Call
Delphi
| Code Block |
|---|
| language | delphi |
|---|
| theme | RDark |
|---|
| firstline | 1 |
|---|
| title | Using IItem Object Model |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
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 |
| Code Block |
|---|
| language | delphi |
|---|
| theme | RDark |
|---|
| firstline | 1 |
|---|
| title | Using PlanSwift Object Model |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
//or
procedure main;
var
planswift: IPlanSwift;
property:IPropertyObject;
begin
planswift := coPlanSwift.Create();
property := planswift.GetProperty('\Settings','SmartOrtho');
WriteLn(property.ResultAsBoolean())
end; |
C#
| Code Block |
|---|
| language | c# |
|---|
| theme | RDark |
|---|
| firstline | 1 |
|---|
| title | Using IItem Object Model |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
private void Main()
{
PlanSwift planswift = new PlanSwift();
IItem settings = planswift.GetItem(@"\Settings");
IPropertyObject property = settings.GetProperty("SmartOrtho");
console.WriteLn(property.ResultAsBoolean())
} |
| Code Block |
|---|
| language | c# |
|---|
| theme | RDark |
|---|
| firstline | 1 |
|---|
| title | Using PlanSwift Object Model |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
private void Main()
{
PlanSwift planswift = new PlanSwift();
IPropertyObject property = planswift.GetProperty(@"\Settings","SmartOrtho")
console.WriteLn(property.ResultAsBoolean)
} |
VB/VBA (OLE)
| Code Block |
|---|
| language | vb |
|---|
| theme | RDark |
|---|
| firstline | 1 |
|---|
| title | Using IItem Object Model |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
Sub main()
Dim planswift = CreateObject("PlanSwift9.PlanCenter")
Dim settings = planswift.GetItem("\Settings")
Dim property = settings.GetProperty("SmartOrtho")
Console.WriteLn(property.ResultAsBoolean());
End Sub |
| Code Block |
|---|
| language | vb |
|---|
| theme | RDark |
|---|
| firstline | 1 |
|---|
| title | Using PlanSwift Object Model |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
Sub Main()
Dim planswift = CreateObject("PlanSwift9.PlanCenter")
Dim nameProperty = planswift.GetProperty("\Settings","SmartOrtho")
Console.WriteLn(property.ResultAsBoolean)
End Sub |
Pascal Scripting (OLE)
| Code Block |
|---|
| theme | RDark |
|---|
| firstline | 1 |
|---|
| title | Item Object Model |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
begin
settings := getItem('\Settings');
ShowMessage(GetResultAsBoolean(settings,'SmartOrtho'));
end |
| Code Block |
|---|
| theme | RDark |
|---|
| title | Root Object Model |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
begin
ShowMessage(GetResultAsBoolean('\Settings','SmartOrtho'));
end |
Pascal Scripting
| Code Block |
|---|
| theme | RDark |
|---|
| firstline | 1 |
|---|
| title | Item Object Model |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
begin
settings := PlanSwift.getItem('\Settings');
property := settings.GetProperty('SmartOrtho');
ShowMessage(property.ResultAsBoolean);
end |
| Code Block |
|---|
| theme | RDark |
|---|
| title | Using the PlanSwift Object Model |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
begin
property := PlanSwift.GetProperty('\Settings','SmartOrtho');
ShowMessage(property.ResultAsBoolean);
end |