It looks like you're new here. If you want to get involved, click one of these buttons!
Name DataType Subtype Length Laut Automation 'Windows Script Host Object Model'.WshShell Lint Integer
DosShell(ItxtCommand : Text;IintWindowStyle : Integer;IblnWaitForEndOfCommand : Boolean) OintReturnValue : Integer // DosShell //*** 109 // Works like SHELL and HYPERLINK of Navision but without the annoying confirmation-request of Navision 4.00 // (this function uses automation 'Windows Script Host Object Model'.WshShell) // PARAMETERS: // ItxtCommand : command + parameters for the SHELL // IintWindowStyle : Type of window for command // 0:Hides the window and activates another window. (=Doesn't even show a window, to kill the doscommand, // you have to do it with taskmanager=>Processes) // 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. (=shows the window as normal window) // 2:Activates the window and displays it as a minimized window. (=shows as minimized) // 3:Activates the window and displays it as a maximized window. (=shows as maximized) // 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. // IblnWaitForEndOfCommand : TRUE : wait for the command to finish (and use the RETURN-VALUE) // FALSE: Launch the command and return (RETURN-VALUE will be 0) // RETURN-VALUE : SHELL-command RETURN-VALUE CREATE(Laut); OintReturnValue := Laut.Run(ItxtCommand,IintWindowStyle,IblnWaitForEndOfCommand); CLEAR(Laut);