Syntax

code

Procedure: IPlanswift.OpenJobEx;

Description

Opens the "Open Job" Dialog Box Once the "Job Dialog" box appears the com will suspend until either a job is opened or the cancel button is pressed

Code Reference

  • 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

code

1

2

3

4

5

6

7

8

9

10

11

procedure TForm1.psNewJob(Sender:TObject);

var

  ps: IPlanSwift;

begin

//Create the planswift Interface

 ps := coPlanswift.Create;

 //Call the Open Job Dialog

 ps.OpenJobEx;

 // Free Planswift Interface

 ps := nil;

end