...
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('NewAreaHotKey');
WriteLn(property.ResultAsInteger())
end |
...
| 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("NewAreaHotKey")
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","NewAreaHotKey")
Console.WriteLn(property.ResultAsInteger)
End Sub |
...
| Code Block |
|---|
| theme | RDark |
|---|
| firstline | 1 |
|---|
| title | Item Object Model |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
begin
settings := getItem('\Settings');
ShowMessage(GetResultAsInteger(settings,'NewAreaHotKey'));
end |
...
| Code Block |
|---|
| theme | RDark |
|---|
| title | Root Object Model |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
begin
ShowMessage(GetResultAsInteger('\Settings','NewAreaHotKey'));
end |
...
| Code Block |
|---|
| theme | RDark |
|---|
| firstline | 1 |
|---|
| title | Item Object Model |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
begin
settings := PlanSwift.getItem('\Settings');
property := settings.GetProperty('NewAreaHotKey');
ShowMessage(property.ResultAsInteger);
end |
...
| Code Block |
|---|
| theme | RDark |
|---|
| title | Using the PlanSwift Object Model |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
begin
property := PlanSwift.GetProperty('\Settings','NewAreaHotKey');
ShowMessage(property.ResultAsInteger);
end |
...