Versions Compared

Old Version 14

changes.mady.by.user Former user

Saved on

compared with

New Version Current

changes.mady.by.user Daniel Wal

Saved on

Key

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

ZoomSpeedKeyboard


...

Integer value that controls the keyboard Zoom Speed. Value ranges from 5 to 100. Figure 1 shows where is value is controlled in the Main Menu / Zoom/Pan window. Controlled by +/- on keyboard's ten-key keypad.

API Call:

...

Image RemovedImage Added

               Figure 1

API Calls

Delphi

Code Block
languagedelphi
themeRDark
firstline1
titleUsing IItem Object Model
linenumberstrue
collapsetrue
procedure main; 
var
 planswift: IPlanSwift;
 settings: IItem;
 property: IPropertyObject 
begin
 planswift := coPlanSwift.Create();
 settings := planswift.getItem('\Settings');
 property := planswift.GetProperty('ZoomSpeedKeyboard');
 WriteLn(property.ResultAsInteger()) 
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','ZoomSpeedKeyboard'); 
 WriteLn(property.ResultAsInteger()) 
end;

C#

Code Block
languagec#
themeRDark
firstline1
titleUsing IItem Object Model
linenumberstrue
collapsetrue
private void Main()
{
	PlanSwift planswift = new PlanSwift();
	IItem settings = planswift.GetItem(@"\Settings");
	IPropertyObject property = settings.GetProperty("ZoomSpeedKeyboard");
	console.WriteLn(property.ResultAsInteger())
}


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

VB/VBA (OLE)

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


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

Pascal Scripting (OLE)

Code Block
themeRDark
firstline1
titleItem Object Model
linenumberstrue
collapsetrue
begin
    settings := getItem('\Settings');
    ShowMessage(GetResultAsInteger(settings,'ZoomSpeedKeyboard'));
end


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

Pascal Scripting

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


Code Block
themeRDark
titleUsing the PlanSwift Object Model
linenumberstrue
collapsetrue
begin
    property := PlanSwift.GetProperty('\Settings','ZoomSpeedKeyboard');
    ShowMessage(property.ResultAsInteger);
end