...
...
...
...
...
...
...
...
...
...
...
...
...
DefaultAreaTransparency
...
Integer value that sets the Area transparency default. Values range from 0 to 255, with 100 being the default. Figure 1 shows the DefaultAreaTransparency controls in both the Settings screen and the U-T-H Settings / Advanced Properties.
...
...
Figure 1
API Calls
Table of Contents minLevel 3
Delphi
Code Block | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||||
private void Main() { PlanSwift planswift = new PlanSwiftprocedure main; var planswift: IPlanSwift; settings: IItem; property: IPropertyObject begin planswift := coPlanSwift.Create(); IItem settings := planswift.GetItemgetItem(@"'\Settings"'); IPropertyObject property := settingsplanswift.GetProperty("'DefaultAreaTransparency"'); console. WriteLn(property.ResultAsInteger()) } //or private void Main() { PlanSwift planswift = new PlanSwift(); IPropertyObject property end |
Code Block | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
//or procedure main; var planswift: IPlanSwift; property:IPropertyObject; begin planswift := coPlanSwift.Create(); property := planswift.GetProperty(@"'\Settings"',"'DefaultAreaTransparency"'); console.WriteLn(property.ResultAsInteger()) } end; |
C#
Code Block | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||||
procedure main; var planswift: IPlanSwift; settings: IItem; property: IPropertyObject begin planswift := coPlanSwift.Createprivate void Main() { PlanSwift planswift = new PlanSwift(); IItem settings := planswift.getItemGetItem('@"\Settings'"); IPropertyObject property := planswiftsettings.GetProperty('"DefaultAreaTransparency'"); console.WriteLn(property.ResultAsInteger()) end //or procedure main; var planswift: IPlanSwift; property:IPropertyObject; begin planswift := coPlanSwift.Create} |
Code Block | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
private void Main() { PlanSwift planswift = new PlanSwift(); IPropertyObject property := planswift.GetProperty('@"\Settings'",'"DefaultAreaTransparency'"); console.WriteLn(property.ResultAsInteger()) end;) } |
VB/VBA (OLE)
Code Block | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||||
Sub main() Dim planswift = CreateObject("PlanSwift9.PlanCenter") Dim settings = planswift.GetItem("\Settings") Dim property = settings.GetProperty("DefaultAreaTransparency") Console.WriteLn(property.ResultAsInteger()); End Sub |
Code Block | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
Sub Main() //or Sub Main() Dim planswift = CreateObject("PlanSwift9.PlanCenter") Dim nameProperty = planswift.GetProperty("\Settings","DefaultAreaTransparency") Console.WriteLn(property.ResultAsInteger) End Sub |
Pascal Scripting (OLE)
Code Block | language | delphi|||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
begin settings := PlanSwift.getItem('\Settings'); property := settings.GetProperty(ShowMessage(GetResultAsInteger(settings,'DefaultAreaTransparency'); ShowMessage(property.ResultAsInteger); end |
Code Block | ||||||
---|---|---|---|---|---|---|
| ||||||
begin //or begin property := PlanSwift.GetProperty ShowMessage(GetResultAsInteger('\Settings','DefaultAreaTransparency'); ShowMessage(property.ResultAsInteger); end //or begin |
Pascal Scripting
Code Block | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
begin settings := PlanSwift.getItem('\Settings'); ShowMessage(GetResultAsInteger(settings, property := settings.GetProperty('DefaultAreaTransparency'); ShowMessage(property.ResultAsInteger); end |
Code Block | ||||||
---|---|---|---|---|---|---|
| ||||||
begin //or begin property ShowMessage(GetResultAsInteger(:= PlanSwift.GetProperty('\Settings','DefaultAreaTransparency'); ShowMessage(property.ResultAsInteger); end |
...