Integer value that sets the Segment transparency default. Values range from 0 to 255, with 100 being the default. Figure ?? shows the DefaultSegmentTransparency controls in both the Settings screen and the U-T-H Settings / Advanced Properties.
API Call:
| Code Block |
|---|
| language | c# |
|---|
| theme | RDark |
|---|
| firstline | 1 |
|---|
| title | C# |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
private void Main()
{
PlanSwift planswift = new PlanSwift();
IItem settings = planswift.GetItem(@"\Settings");
IPropertyObject property = settings.GetProperty("DefaultSegmentTransparency");
console.WriteLn(property.ResultAsInteger())
}
//or
private void Main()
{
PlanSwift planswift = new PlanSwift();
IPropertyObject property = planswift.GetProperty(@"\Settings","DefaultSegmentTransparency")
console.WriteLn(property.ResultAsInteger)
} |
| Code Block |
|---|
| language | delphi |
|---|
| theme | RDark |
|---|
| firstline | 1 |
|---|
| title | Delphi |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
procedure main;
var
planswift: IPlanSwift;
settings: IItem;
property: IPropertyObject
begin
planswift := coPlanSwift.Create();
settings := planswift.getItem('\Settings');
property := planswift.GetProperty('DefaultSegmentTransparency');
WriteLn(property.ResultAsInteger())
end
//or
procedure main;
var
planswift: IPlanSwift;
property:IPropertyObject;
begin
planswift := coPlanSwift.Create();
property := planswift.GetProperty('\Settings','DefaultSegmentTransparency');
WriteLn(property.ResultAsInteger())
end; |
| Code Block |
|---|
| language | vb |
|---|
| theme | RDark |
|---|
| firstline | 1 |
|---|
| title | VB \ VBA (OLE) |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
Sub main()
Dim planswift = CreateObject("PlanSwift9.PlanCenter")
Dim settings = planswift.GetItem("\Settings")
Dim property = settings.GetProperty("DefaultSegmentTransparency")
Console.WriteLn(property.ResultAsInteger());
End Sub
//or
Sub Main()
Dim planswift = CreateObject("PlanSwift9.PlanCenter")
Dim nameProperty = planswift.GetProperty("\Settings","DefaultSegmentTransparency")
Console.WriteLn(property.ResultAsInteger)
End Sub |
| Code Block |
|---|
| language | delphi |
|---|
| theme | RDark |
|---|
| firstline | 1 |
|---|
| title | PlanSwift Scripting |
|---|
| linenumbers | true |
|---|
| collapse | true |
|---|
|
begin
settings := PlanSwift.getItem('\Settings');
property := settings.GetProperty('DefaultSegmentTransparency');
ShowMessage(property.ResultAsInteger);
end
//or
begin
property := PlanSwift.GetProperty('\Settings','DefaultSegmentTransparency');
ShowMessage(property.ResultAsInteger);
end
//or
begin
settings := getItem('\Settings');
ShowMessage(GetResultAsInteger(settings,'DefaultSegmentTransparency'));
end
//or
begin
ShowMessage(GetResultAsInteger('\Settings','DefaultSegmentTransparency'));
end |
Image Added
Figure ??