[fpc-pascal] Windows find out if an application already is running

[Rainer Stratmann]

I tried system.hprevinst, but this shows always 0.
If there are more copys of the program then hinstance is always the same 
value.