Connecting with OLE

Code examples in VB / VBA OLE and Pascal Scripting OLE below show examples of OLE access to the API.

API Call:

Sub main()
    Dim planswift = CreateObject("PlanSwift9.PlanCenter")
    Dim settings = planswift.GetItem("\Settings")
    Dim property = settings.GetProperty("AllowExtenderDPI")
    Console.WriteLn(property.ResultAsBoolean());
End Sub

Sub Main()
    Dim planswift = CreateObject("PlanSwift9.PlanCenter")
    Dim nameProperty = planswift.GetProperty("\Settings","AllowExtenderDPI")
    Console.WriteLn(property.ResultAsBoolean)
End Sub

begin
    settings := getItem('\Settings');
    ShowMessage(GetResultAsBoolean(settings,'AllowExtenderDPI'));
end

begin
   ShowMessage(GetResultAsBoolean('\Settings','AllowExtenderDPI'));
end