Ver Mensaje Individual
  #1  
Antiguo 29-02-2020
Gregorio Cíber Gregorio Cíber is offline
Miembro
 
Registrado: jun 2008
Posts: 98
Reputación: 16
Gregorio Cíber Va por buen camino
Problemas con ShellExecute

Hola amigos.
Tengo una vieja aplicación creada con Delphi6 funcionado correctamente.
Hace un tiempo tuve que modificarla e instale el compilador bajo Windows 10 y, con esfuerzos, logré poder compilar. Todo lo modificado funciona a excepción de una llamada al teclado virtual. Os pongo las distintas opciones que he probado a ver qué os parece:

Con osk.exe en C:\Windows\System32 la función ShellExecute devuelve 2, o sea, no lo encuentra.
Código Delphi [-]
ShellExecute (0, 'Open', 'osk.exe', '', '', SW_SHOWNORMAL); 
ShellExecute (Handle, 'Open', 'osk.exe', '', '', SW_SHOWNORMAL); 
ShellExecute (0, 'Open', 'osk.exe', '', 'C:\Windows\System32', SW_SHOWNORMAL); 
ShellExecute (Handle, 'Open', 'osk.exe', '', 'C:\Windows\System32', SW_SHOWNORMAL);
Lo mismo ocurre si utilizo PChar

Si copio osk.exe en la carpeta de la aplicación, la función SellExecute devuelve 43, es decir, lo encuentra pero no lo pone en pantalla.

¿Alguna idea?

Gracias.

Última edición por Casimiro Notevi fecha: 29-02-2020 a las 12:12:49.
Responder Con Cita