//PlanSwift code:
result := Planswift.DeleteItem('Your Item Path Here');
//FreshDesk code:
procedure TForm1.psDeleteItem(Sender: TObject);
var
ps: IPlanSwift;
sitm: IItem;
begin
//Create Planswift Interface
ps := coPlanswift.Create;
//Get the current Selected Item
sitm := ps.SelectedItem;
//if no item is selected show message and exit;
if sitm = nil then begin
showmessage('Please Select an Item and Press the demo button again');
Exit;
end;
//Delete the selected Item
ps.DeleteItem(sitm.guid);
//Free Planswift Interface
ps := nil;
end; |