>Hi all,
>
>I have to check if an application is already running, so I cannot allow the user to fire up other instances...
>
>However, the running application may have its main form hided and an icon in the system tray. In this case, the API function FindWindow() does not work :(
>
>I think I will have to work with some sort of "process" functions, but I am lost here... Could you please shed some light ?
>
>Thanks,

If AppAlreadyRunning()
  Messagebox('Another instance is already running.')
...

Function AppAlreadyRunning
Local hsem, lpszSemName
#Define ERROR_ALREADY_EXISTS 183
Declare Integer GetLastError In win32API
Declare Integer CreateSemaphore In WIN32API ;
	string @ lpSemaphoreAttributes, ;
	LONG lInitialCount, ;
	LONG lMaximumCount, ;
	string @ lpName
lpszSemName = "AnyStringUniqueToYourApp"
hsem = CreateSemaphore(0,0,1,lpszSemName)
Return (hsem # 0 And GetLastError() == ERROR_ALREADY_EXISTS)

PS:FindWindow() works with ClassNames too.
Cetin