Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

  1. Create a New Forms Application
  2. Add a PlanSwift to the References (Planswift_Tlb)
  3. Add a button to the form
  4. Copy code below to the onclick event of the button
  5. Compile and run


API

...

Calls

Delphi

Code Block
languagedelphi
themeRDark
firstline1
titleUsing PlanSwift Object Model
linenumberstrue
collapsetrue
//PlanSwift code:
PlanSwift.BeginFormulaUpdate;

//______________________________________________________

// FreshDesk code:
procedure TForm1.psSetPropertyFormula(Sender: TObject);
var
  ps: IPlanSwift;
  itm: String;                      
  messg: string;
begin
  ps := coPlanswift.Create;
  {Begin Formula Update;}
  ps.BeginFormulaUpdate;                   
  {Get The Current Selected Itm}
  itm := ps.SelectedItem.GUID;
  {if no Item Selected then Exit function}
  if itm = nil then begin
    showMessage('no Item Selected');
    Exit;
  end;
  {Create a Description for the item}   
  messg := Inputbox('Enter A Description','Please enter a description','Your Description Here');
  {Set Item Description}           
  ps.SetPropertyFormula(itm,'Description',messg);
  {Make Description Property Visible}
  ps.GetProperty(itm,'Description').IsInput := True;
  {Show Advance Item Properties}
  ps.GetItem(itm).Edit(True);
  {End Update on formula}     
  ps.EndFormulaUpdate; 
  {free Planswift Interface}
  ps := nil;                  
end;  



C#

Code Block
languagec#
themeRDark
firstline1
titleUsing IItem Object Model
linenumberstrue
collapsetrue
private string Itm { get; set; }

public void UpdateFormula(string message)
{
    // Notify PlanSwift Object of Formula Change
    Planswift.BeginFormulaUpdate();
    
    // Get the PlanSwift SelectedItem GUID
    Itm = Planswift.SelectedItem().GUID();
    
    // If the GUID is Null then Show Message
    if (Itm == null) {
        MessageBox.Show(@"No Item Selected");
        return;
    }
    
    // Set Property Formula Description for the Selected Item
    Planswift.SetPropertyFormula(Itm, "Description", message);

    // Set the Description as an Input Property
    Planswift.GetProperty(Itm, "Description").IsInput = true;
    
    // Show Properties for Item
    Planswift.GetItem(Itm).Edit();

    // Notify PlanSwift of Formula Update
    Planswift.EndFormulaUpdate();
}


Code Block
languagec#
themeRDark
firstline1
titleUsing PlanSwift Object Model
linenumberstrue
Coming soon


VB/VBA (OLE)

Code Block
languagevb
firstline1
titleUsing IItem Object Model
linenumberstrue
Coming soon


Code Block
languagevb
firstline1
titleUsing PlanSwift Object Model
linenumberstrue
Coming soon