Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

ToggleOrthoHotKey


...

Integer value returns an ANSI key code (default code 115, the key F4 key F4 in hotkey window) for for the Toggle Angle Snap (Ortho), shown in Figure 1). This is controlled in the Main Menu / Settings / Snapping window (Ortho Snap to Angles, Figure 2) and at the bottom of the PlanSwift window (Figure 3).

...

Image Added

...

          Figure 1


Image Added

             Figure 2


Image Added

           Figure 3

API Calls

Delphi

Code Block
languagec#delphi
themeRDark
firstline1
titleC#Using IItem Object Model
linenumberstrue
collapsetrue
private void Main()
{
	PlanSwiftprocedure main; 
var
 planswift: IPlanSwift;
 settings: IItem;
 property: IPropertyObject 
begin
 planswift := new PlanSwiftcoPlanSwift.Create();
	IItem settings := planswift.GetItemgetItem(@"'\Settings"');
	IPropertyObject property := settingsplanswift.GetProperty("'ToggleOrthoHotkey"');
	console. WriteLn(property.ResultAsInteger()) }

//or

private void Main()
{
	PlanSwift planswift = new PlanSwift();
	IPropertyObject property 
end


Code Block
languagedelphi
themeRDark
firstline1
titleUsing PlanSwift Object Model
linenumberstrue
collapsetrue
//or
procedure main; 
var 
 planswift: IPlanSwift;
 property:IPropertyObject; 
begin
 planswift := coPlanSwift.Create();
 property := planswift.GetProperty(@"'\Settings"',"'ToggleOrthoHotkey"'); 	console.
 WriteLn(property.ResultAsInteger()) 
}end;

C#

Code Block
languagedelphic#
themeRDark
firstline1
titleDelphiUsing IItem Object Model
linenumberstrue
collapsetrue
procedureprivate main;
var
	planswift: IPlanSwift;
	settings: IItem;
	property: IPropertyObject
begin
	planswift := coPlanSwift.Createvoid Main()
{
	PlanSwift planswift = new PlanSwift();
	IItem settings := planswift.getItemGetItem('@"\Settings'");
	IPropertyObject property := planswiftsettings.GetProperty('ToggleOrthoHotkey'"ToggleOrthoHotKey");
	console.WriteLn(property.ResultAsInteger())
end

//or
procedure main;
var
	planswift: IPlanSwift;
	property:IPropertyObject;
begin
	planswift := coPlanSwift.Create}


Code Block
languagec#
themeRDark
firstline1
titleUsing PlanSwift Object Model
linenumberstrue
collapsetrue
private void Main()
{
	PlanSwift planswift = new PlanSwift();
	IPropertyObject property := planswift.GetProperty('@"\Settings','ToggleOrthoHotkey'); 
	","ToggleOrthoHotKey")
	console.WriteLn(property.ResultAsInteger)
}

VB/VBA (OLE)

...

Code Block
languagevb
themeRDark
firstline1
titleVB \ VBA (OLE)Using IItem Object Model
linenumberstrue
collapsetrue
Sub main()
    	Dim planswift = CreateObject("PlanSwift9.PlanCenter")
	    Dim settings = planswift.GetItem("\Settings")
	    Dim property = settings.GetProperty("ToggleOrthoHotkeyToggleOrthoHotKey")
	    Console.WriteLn(property.ResultAsInteger());
End Sub


Code Block
languagevb
themeRDark
firstline1
titleUsing PlanSwift Object Model
linenumberstrue
collapsetrue
Sub Main()
//or  Sub Main() 	Dim planswift = CreateObject("PlanSwift9.PlanCenter")
    	Dim nameProperty = planswift.GetProperty("\Settings","ToggleOrthoHotkeyToggleOrthoHotKey")
	    Console.WriteLn(property.ResultAsInteger)
End Sub

Pascal Scripting (OLE)

Code Block
languagedelphi
themeRDark
firstline1
titlePlanSwift ScriptingItem Object Model
linenumberstrue
collapsetrue
begin
  	  settings := PlanSwift.getItem('\Settings');
  	property := settings.GetProperty('ToggleOrthoHotkey');
	ShowMessage(property.ResultAsInteger);
end

//or

begin
	propertyShowMessage(GetResultAsInteger(settings,'ToggleOrthoHotKey'));
end


Code Block
themeRDark
titleRoot Object Model
linenumberstrue
collapsetrue
begin
   ShowMessage(GetResultAsInteger('\Settings','ToggleOrthoHotKey'));
end

Pascal Scripting

Code Block
themeRDark
firstline1
titleItem Object Model
linenumberstrue
collapsetrue
begin
    settings := PlanSwift.GetPropertygetItem('\Settings','ToggleOrthoHotkey);
    property := settings.GetProperty('ToggleOrthoHotKey');
 	   ShowMessage(property.ResultAsInteger);
end
//or

begin
	settings


Code Block
themeRDark
titleUsing the PlanSwift Object Model
linenumberstrue
collapsetrue
begin
    property := getItemPlanSwift.GetProperty('\Settings');
	ShowMessage(GetResultAsInteger(settings,'ToggleOrthoHotkeyToggleOrthoHotKey'));
end  //or  begin
   ShowMessage(GetResultAsInteger('\Settings','ToggleOrthoHotkey'));
end

Image Removed

          Figure 1

Image Removed

             Figure 2

Image Removed

...

ShowMessage(property.ResultAsInteger);
end