Hola a todo el mundo,
Me he decidido a probar la unidad UIPass de
Roman, por cierto muy buena utilidad, y muchas gracias por dejarla disponible.
Pero naturalmente he tenido problemas.
1º) la coloqué en la carpeta de mi proyecto
2º) la añadí al .DPR
3º) modifique las cadenas SMutex y SActivar
4º) modifique la función AppWndProc como se indica en el apendice
5º) modifique el procedimiento Registrar según el consejo de
Domingo Seoane, y aquí es donde me ocurre el problema:
Código:
//mActivar := RegisterWindowMessage(sActivar);
//Mutex := CreateMutex(nil, true, sMutex);
mActivar := RegisterWindowMessage(PChar(sActivar + Application.ExeName)); // así le añade el Path y el nombre de la aplicación y hace la cadena única
Mutex := CreateMutex(nil, true, PChar(sMutex + Application.ExeName));
Si sigo el consejo de Domingo para crear cadenas diferentes añadiéndoles el camino y nombre de la aplicación, entonces
NO me funciona, pero si dejo la versión original de Román
SÍ me funciona.
De momento no voy a utilizar esta unidad en ningún otro sitio, pero me gustaría que funcionase adecuadamente.