Page Comparison

var  
ps: IPlanSwift;
  est: IItem;
  itm: IItem;
begin
  // Create Planswift Interface
  ps := coPlanswift.Create;
  // Get the Estimating Tab
  est := ps.GetItem('Job\Takeoff');
  // Create a new Item
  itm := est.NewItem('Area', 'SetPropertyFormula Example');
  // Set the Name Property Formula
  itm.SetPropertyFormula('Name', 'Set With SetPropertyFormula');
  // Show the Property Dialog box
  itm.Edit(False);
  // Free Planswift
  ps := nil;