Saludos:
mi problema es que ocupo hacer una aplicacion que me muestre las aplicaciones abiertas,
es decir tengo abierto excell y word y quiero que mi aplicacion ponga al frente 3 sec una aplicacion y 3 Sec la otra
con una funcion puedo obtener la lista de los exes que se estan ejecutando incluso obtengo los Thred de cada exe
utilizo el siguiente codigo y no me funciona
Por fa. alguien Ayudeme
Código:
FgThreadId := GetWindowThreadProcessId(GetForegroundWindow, nil);
ActIdApp;
AppThreadId := arreglo_Th[ id_app ];
// AppThreadId := GetWindowThreadProcessId(Handle, nil);
Self.Caption := Inttostr( AppThreadId ) + ' ' + Inttostr( FgThreadId );
{ Anexar el hilo de nuestra app. al de la que tenga el foco }
AttachThreadInput( AppThreadId , FgThreadId , true);
{ Ahora sí, activar la applicación }
SetForegroundWindow(Handle);
{ Separar el hilo de nuestra app de la otra }
AttachThreadInput( AppThreadId , FgThreadId , false);
la funcion ActIdApp; obtiene cada uno de los THred que tengo en un Arreglo.
Gracias a Yodos