Page Comparison

SetZoom

...

Defines the current "zoom" scale factor for the active page.

...

1. Create a New Form application
2. Add a button to the form
3. Add PlanSwift to reference (Planswift9_tlb in the uses)
4. Copy code to button onclick event

API Calls

Delphi

Code Block

language	delphi
theme	RDark
firstline	1
title	Using PlanSwift Object Model
linenumbers	true
collapse	true

PlanSwift Code:


var
  nScaleFactor: double;
begin
  PlanSwift.Set_Zoom(nScaleFactor);
end;


FreshDesk Code:


procedure TForm1.psGetZoom(Sender: TObject);
var
  ps: IPlanSwift;
  zoom: string;
begin
//Create Planswift Interface
 ps := coPlanswift.Create;
 //Call inputbox to change the zoom level
 zoom := InputBox('Change Zoom Level','Change Zoom Level',FloatToStr(ps.Zoom));
 //Set Zoom Value
 ps.Zoom := strToInt(zoom);
 //Free Planswift Interface
 ps := nil;
 end;

C#

Code Block

language	c#
theme	RDark
firstline	1
title	Using IItem Object Model
linenumbers	true
collapse	true

public class PlanswiftApi
{
    private PlanSwift Planswift { get; }
    public PlanSwiftApi()
    {
        Planswift = new PlanSwift();
    }
}

Code Block

language	c#
theme	RDark
firstline	1
title	Using PlanSwift Object Model
linenumbers	true

Coming soon

VB/VBA (OLE)

Code Block

language	vb
firstline	1
title	Using IItem Object Model
linenumbers	true

Coming soon

Code Block

language	vb
firstline	1
title	Using PlanSwift Object Model
linenumbers	true

Coming soon

Versions Compared

Old Version 9

New Version Current

Key

SetZoom

API Calls

Delphi

C#

VB/VBA (OLE)