PowerBuilder Function Run And Wait gf_run_to_wait
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 | // Function Name : gf_run_to_wait // Argument Name : (None) // Return Type : (None) OleObject ole_wsh Integer li_connect Constant Integer NORMAL = 1 Constant Integer MINIMIZED = 2 Constant Integer MAXIMIZED = 3 /* 0 Hides the window and activates another window. 1 Activates and displays a window. If the window is minimized or maximized, the system restores it to its original size and position. An application should specify this flag when displaying the window for the first time. 2 Activates the window and displays it as a minimized window. 3 Activates the window and displays it as a maximized window. 4 Displays a window in its most recent size and position. The active window remains active. 5 Activates the window and displays it in its current size and position. 6 minimizes the specified window and activates the next top-level window in the Z order. 7 Displays the window as a minimized window. The active window remains active. 8 Displays the window in its current state. The active window remains active. 9 Activates and displays the window. If the window is minimized or maximized, the system restores it to its original size and position. An application should specify this flag when restoring a minimized window. 10 Sets the show state based on the state of the program that started the application. */ Constant Boolean WAIT = True Constant Boolean NOWAIT = False wsh = Create OleObject li_connect = wsh.ConnectToNewObject("WScript.Shell") li_connect = wsh.Run("Notepad", NORMAL, WAIT) MessageBox("Wait To Run", "I am Standing behind you.....") |
Good Luck!