4D v13.4
Process number
Process number
| Process number ( name {; *} ) -> Function result | ||||||||
| name | String |
|
Name of process for which to retrieve the process number | |||||
| * |
|
Return the process number from the server | ||||||
Process number returns the number of the process whose name you pass in name. If no process is found, Process number returns 0.
The optional parameter * allows you to retrieve, from 4D Client, the process ID of a process that is executed on the server (a stored procedure). In this case, the returned value is negative. This option is especially useful when using the GET PROCESS VARIABLE, SET PROCESS VARIABLE and VARIABLE TO VARIABLE commands. Please refer to the descriptions of these commands for details.
If the command is executed with the * parameter from a process on the server machine, the returned value is positive.
You create a custom floating window, run in a separate process, in which you implement your own tools to interact with the Design environment. For example, when selecting an item in a hierarchical list of keywords, you want to paste some text into the frontmost window of the Design environment. To do so, you can use the pasteboard, but the pasting event must occur within the Design process. The following small function returns the process number of the Design process (if running):
` Design process number Project Method
` Design process number -> LongInt
` Design process number -> Design process number
$0:=Process number("Design Process")
` Note: This can break in the future if the process name changesUsing this function, the following project method pastes the text received as parameter to the frontmost window of the Design environment (if applicable):
` PASTE TEXT TO DESIGN Project Method
` PASTE TEXT TO DESIGN ( Text )
` PASTE TEXT TO DESIGN ( Text to Paste in frontmost Design window )
C_TEXT($1)
C_LONGINT($vlDesignPID;$vlCount)
$vlDesignPID:=Design process number
If($vlDesignPID #0)
` Put the text into the pasteboard
SET TEXT TO PASTEBOARD($1)
` Post a Ctrl-V / Command-V event
POST KEY(Character code("v");Command key mask;$vlDesignPID)
` Call repeatedly DELAY PROCESS so the scheduler gets a chance
` to pass over the event to the Design process
For($vlCount;1;5)
DELAY PROCESS(Current process;1)
End for
End if
Product: 4D
Theme: Processes
Number:
372
Created: 4D v6
GET PROCESS VARIABLE
PROCESS PROPERTIES
Process state
SET PROCESS VARIABLE
