Ver Mensaje Individual
  #2  
Antiguo 09-04-2017
Avatar de escafandra
[escafandra] escafandra is offline
Miembro Premium
 
Registrado: nov 2007
Posts: 2.197
Reputación: 20
escafandra Tiene un aura espectacularescafandra Tiene un aura espectacular
Quizás debas explicar mejor lo que pretendes. Para colocar tu ventana delante de todas cuando determinada App está activa, no hace falta nada más que detectar que dicha app se está ejecutando. Sobre como detectar si una app se ejecuta hay ejemplos en el foro. Aquí una forma de saberlo:
Código Delphi [-]
function IsRuning(FileName: PAnsiChar): boolean;
var
  PE: TPROCESSENTRY32;
  ProcessHandle: THandle;
begin
  Result:= false;
  PE.dwSize:= sizeof(TPROCESSENTRY32);
  ProcessHandle:= CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
  if Process32First(ProcessHandle, PE) then
    repeat
      if lstrcmpi(PE.szExeFile, FileName) = 0 then
      begin
        Result:= true;
        break;
      end;
    until not Process32Next(ProcessHandle, PE);
  CloseHandle(ProcessHandle);
end;
Seguidamente con la API SetWindowPos aplicada a tu ventana, en el parámetro hWndInsertAfter pones HWND_TOPMOST


Saludos.
Responder Con Cita