bring to top de la aplicacion

[[seoane]]

Pues a mi me se ocurre otra.

Dejar la unit tal cual esta en tu web. Y solo cambair estas dos lineas

Código Delphi [-]
  mActivar := RegisterWindowMessage(sActivar);
  Mutex    := CreateMutex(nil, true, sMutex);

Cambiarlas por:

Código Delphi [-]
  mActivar := RegisterWindowMessage(PChar(sActivar+ParamStr(0)));
  Mutex    := CreateMutex(nil, true, Pchar(sMutex+ParamStr(0)));