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.
Skip to end of metadata
Go to start of metadata

You are viewing an old version of this page. View the current version.

Compare with Current View Page History

« Previous Version 16 Current »



Boolean value that toggles digitizer Snap On and Off. Figures 1 and 2 show where Snap is controlled. When enabled (true), the Snap control is highlighted; when disabled (false) it is not highlighted.


                           Figure 1


  Figure 2

API Calls

Delphi

Using IItem Object Model
procedure main; 
var
 planswift: IPlanSwift;
 settings: IItem;
 property: IPropertyObject 
begin
 planswift := coPlanSwift.Create();
 settings := planswift.getItem('\Settings');
 property := planswift.GetProperty('DigitizerSnap');
 WriteLn(property.RResultAsBoolean()) 
end
Using PlanSwift Object Model
//or 
procedure main; 
var
 planswift: IPlanSwift;
 property:IPropertyObject; 
begin
 planswift := coPlanSwift.Create();
 property := planswift.GetProperty('\Settings','DigitizerSnap'); 
 WriteLn(property.ResultAsBoolean()) 
end;

C#

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

VB/VBA (OLE)

Using IItem Object Model
Sub main()
    Dim planswift = CreateObject("PlanSwift9.PlanCenter")
    Dim settings = planswift.GetItem("\Settings")
    Dim property = settings.GetProperty("DigitizerSnap")
    Console.WriteLn(property.ResultAsBoolean());
End Sub
Using PlanSwift Object Model
Sub Main()
    Dim planswift = CreateObject("PlanSwift9.PlanCenter")
    Dim nameProperty = planswift.GetProperty("\Settings","DigitizerSnap")
    Console.WriteLn(property.ResultAsBoolean)
End Sub

Pascal Scripting (OLE)

Item Object Model
begin
    settings := getItem('\Settings');
    ShowMessage(GetResultAsBoolean(settings,'DigitizerSnap'));
end
Root Object Model
begin
   ShowMessage(GetResultAsBoolean('\Settings','DigitizerSnap'));
end

Pascal Scripting

Item Object Model
begin
    settings := PlanSwift.getItem('\Settings');
    property := settings.GetProperty('DigitizerSnap');
    ShowMessage(property.ResultAsBoolean);
end
Using the PlanSwift Object Model
begin
    property := PlanSwift.GetProperty('\Settings','DigitizerSnap');
    ShowMessage(property.ResultAsBoolean);
end



  • No labels