Page Comparison

...

Integer value returns an ANSI key code (default code 51, the number 3) for the New Segment hotkey. Figure 1 shows where the New Segment hotkey is assigned. Figure 2 shows where New Segment is invoked on the Main Ribbon Bar.

API Call:

...

Image RemovedImage Added

Figure 1

Image RemovedImage Added

Figure 2

API Calls

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('NewSegmentHotKey');
 WriteLn(property.ResultAsInteger()) 
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','NewSegmentHotKey'); 
 WriteLn(property.ResultAsInteger()) 
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("NewSegmentHotKey");
	console.WriteLn(property.ResultAsInteger())
}

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","NewSegmentHotKey")
	console.WriteLn(property.ResultAsInteger)
}

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("NewSegmentHotKey")
    Console.WriteLn(property.ResultAsInteger());
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","NewSegmentHotKey")
    Console.WriteLn(property.ResultAsInteger)
End Sub

Pascal Scripting (OLE)

Code Block

theme	RDark
firstline	1
title	Item Object Model
linenumbers	true
collapse	true

begin
    settings := getItem('\Settings');
    ShowMessage(GetResultAsInteger(settings,'NewSegmentHotKey'));
end

Code Block

theme	RDark
title	Root Object Model
linenumbers	true
collapse	true

begin
   ShowMessage(GetResultAsInteger('\Settings','NewSegmentHotKey'));
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('NewSegmentHotKey');
    ShowMessage(property.ResultAsInteger);
end

Code Block

theme	RDark
title	Using the PlanSwift Object Model
linenumbers	true
collapse	true

begin
    property := PlanSwift.GetProperty('\Settings','NewSegmentHotKey');
    ShowMessage(property.ResultAsInteger);
end

Versions Compared

Old Version 15

New Version Current

Key

API Calls