verificar si una aplicacion esta corriendo

[Neftali [Germán.Estévez]]

Empezado por dblx

Neftali, la persona que tengo en la maquina trabajando no se para de ahii, desde las 8:00 am hasta las 12:00 pm, la aplicación que quiero desarrollar es para monitorear si realmente me esta trabajando en el corel... por eso el nunca va a saber que esa aplicación esta instalada...

???????
O yo no te entiendo o tú no me entendiste.

[dblx]

Neftali, para mi estaria bien detectar las ventanas de estas aplicaciones, en visual basic es algo como AppActive ó algo asi, quiero una funcion paralela pero en delphi, que me detecte la ventana de la aplicacion y yo vere como inicio un contador de tiempo... Gracias

[kalisto]

Código Delphi [-]
function VentanaActiva: String;
var  PC: Array[0..$FFF] of Char;
     Wnd : Thandle;
begin
    {$IFDEF Win32}
    Wnd := GetForegroundWindow;
    {$ELSE}
    Wnd := GetActiveWindow;
    {$ENDIF}
    SendMessage( Wnd , $000D , $FFF , LongInt( @PC ) ); //$000D es el WM_GETTEXT
    Result := PC;
end;

[dblx]

Kalisto, gracias por responder, el codigo que colocaste...

Como lo uso man??? que es $FFF... $000... ??? direcciones de memoria???

[dblx]

[b]kalisto[\B], gracias nuevamente por tu codigo, pero solo me detecta el "caption" de la ventana que este activa en el momento, no me referia a eso, quiero que mi aplicacion detecte el "exe" que este corriendo, es decir cuando "firefox.exe" se ejecute mi aplicación dispare un timer que cuente cuanto tiempo dura corriendo, y no solo la que este activa...

Gracias...

[dblx]

Kalisto... aunque pensandolo bien aqui viendo, me di cuenta que cuando una ventana esta activa es porque se esta trabajando sobre ella, disculpa amigo, me diste un gran fragmento de código muy bueno gracias de verdad, doy por terminada mi duda... muchas gracias