PlanSwift Code:
If Property.ListType = ltList Then
result := Property.List;
FreshDesk Code:
var
ps: IPlanSwift;
itm: IItem;
prop: IPropertyObject;
est: IItem
begin
//Create planswift Interface
ps := coplanswift.Create;
//Get the Estimating Tab
est := ps.Getitem('Job\Takeoff');
//get Ps Property Example Item if exists
itm := est.GetItem('PS Property Examples');
//Delete It
if not varisclear(itm) then begin
ps.deleteItem(itm.guid);
end;
//Create a new Item
itm := est.newItem('Part','PS Property Examples');
//Create a new Property
prop := GetProperty('Name');
//if property list Type is list then show Message
If prop.ListType = ltList Then
ShowMessage(prop.List);
//Show The Item Properties Box
itm.Edit(true);
//Free the planswift interface
ps := nil;
end; |