PlanSwift Code:
Result := PlanSwift.IsBeta;
FreshDesk Code:
procedure TForm1.psIsBeta(Sender: TObject);
var
ps: IPlanSwift;
begin
//Create Planswift Interface
ps := coPlanswift.Create;
//Check if planswift is beta
if ps.IsBeta then
ShowMessage('You are a Beta User')
else
ShowMessage('Your are not a Beta User');
//Free Planswift Interface
ps := nil;
end; |