Windows PID of running Omnis Instance

[Stefan Diefenbacher]

found a solution:

Register DLL (“KERNEL32.DLL”,”GetCurrentProcessId”,”JV”) Returns error

Call DLL (“KERNEL32.DLL”,”GetCurrentProcessId”) Returns pid

Register DLL (“KERNEL32.DLL”,”GetCurrentProcessId”,”JV”,kTrue)

[Alex Clay]

We do the same. Here’s our full solution that’s cross-platform for macOS and Windows. This stores the PID in a class variable since it’s static per application instance. There are a couple references to our framework (logging utility and task variable to detect platform), but this should be readable and hopefully help someone.

If cnMyProcessID<>0
  Quit method cnMyProcessID
End If
If tvMacVersion
  Do $root.$runapplescript('do shell script "ps -p $$ -o ppid="',lcScriptResult) Returns lnReturn
  If lnReturn<>0
  Do uoLog.$error(con("Error ",lnReturn," trying to find my process ID. Result is: ",lcPathToMe))
  Quit method 0
  End If
  Calculate cnMyProcessID as trim(lcScriptResult,kTrue,kTrue,'"')
Else
  Register DLL ("KERNEL32.DLL","GetCurrentProcessId","JV") Returns lnErrorCode
  Call DLL ("KERNEL32.DLL","GetCurrentProcessId") Returns cnMyProcessID
End If
Quit method cnMyProcessID