Activate for Comet32

Posted by Jim Guerber on May 20, 2010 at 11:48:28: Uploaded files: 1

There is no background in Comet32. So, how can we "activate" a program?

The answer is that you CAN launch another Comet session very easily. Here is a small program I wrote to do just that...

subroutine activate(prog$)
length 20 & local prog$
	prog$ = 'test4,rel'
	call activate(prog$)
	print 'done'
	stop
end

subroutine activate(prog$)
	length 100 & local runarg$
		runarg$ = '/pn='+strip(sub(dstat('x00'),33,16)) + ' /run="' + prog$ + '"'
		print (ShellExecute="open","comet.exe",runarg$,"",0) & wait
procreturn

This is written as a proc so you can see the logic.

The last parameter of the shellexecute mnemonic controls the visibility of the session.
If it is zero, the session is hidden. There is not even a tab on the task bar.
If it is 1 it will appear as a normal window.
If it is 2 it is minimized.

Common is NOT passed.

Follow Ups:

• Re: Activate for Comet32 Grant Foraker 14:25:23 05/20/10 (3)
  • Re: Activate for Comet32 Jim Guerber 15:59:59 05/20/10 (2)
    • Re: Activate for Comet32 Keith Smith 09:42:13 05/24/10 (0)
    • Re: Activate for Comet32 Steve Auerbach 06:33:50 05/21/10 (0)