Ejecutar Skype desde Delphi Usa el 99 % del CPU
 

Hola Amigos Tanto Tiempo. Estoy teniendo el Siguiete incoveniente.
Estoy necestiando Ejecutar el Skype (Si no esta en ejecucion). PEro cada vez que lo Hago, Desde Delphi 5, Toma el 99 %, hasta que lo Termine Matando.
He Aqui como lo he intendo Ejecutar

Código Delphi [-]
//modo 1 y 2, La Diferencia es Que en vez de 0 (en el primer parametro) Utilizaba el Handle de la Aplicacion, El mismo Resultado
 ShellExecute(0,'Open',Pchar('c:\Archivos de programa\Skype\Phone\Skype.exe'), '', '', SW_SHOWNORMAL);

//Modo 3
  WinExec('c:\Archivos de programa\Skype\Phone\Skype.exe', SW_SHOWNORMAL);
//modo 4 Utilizando la API de Skype. 
 if not Skype.Client.IsRunning Then 
        Skype.Client.Start(false, false);//Los parametros, booleanos son para Iconizar y mostrar el Splash inicial

En todos los Casos el Resultado es el mismo. Uso del CPU 99 %
El tema es que lo intente Hacerlo con Visual Basic (Solo Ejecutar Skype :D) y lo hace sin el inconveniente del Control Del CPU.

Alguna idea al respecto?

PD: Si Skype Se esta ejecutando (salvo el caso de utilizacion de la API), Simplemente Muetra el GUI, sin efecto negativo alguno

Saludos

Yo utilizo esto ShellExecute(FGescom.Handle,nil,Pchar('callto://'),'','',SW_SHOWNORMAL);


Prueba por si te vale.

Un saludo

Comba, en el "CallTo" pones el Parametro con direccion del tipo red?!
voy a intentarlo de todas maneras Gracias

Un millon de Gracias por la Respuesta, Pero el Resultado Sigue siendo el mismo. Utilizacion del CPU 99 %

:(

No se porque. PEro el Bug se produce en Delphi 5, con delphi 6 funciona correctamente. Bueno saludos:confused::confused: