Capturar imagen de una ventana (que no es la activa)

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

Pues eso.
Debe hacer una captura de pantalla (de una ventana para ser más exactos), pero de una ventana (Window) que no es la que está en primer plano (no es lade la app. activa, sino que está por debajo, por decirlo así, de la actual con la que se está trabajando).

¿Me expiqué?

Dispongo del Handle, título y demás datos de la ventana que quiero capturar.

Imagen.

[[Bicho]]

Hola Germán,

necesitas guardar la otra ventana en una imagen o ¿quieres algo más como acceder a ella, copiar texto, escribir en ella, etc?

A ver si esto sirve:

Código Delphi [-]
var   hwndMiVentana : THandle;
       Titulo : string;
begin
  Titulo := 'Aqui va el titulo completo de la ventana';

  hwndMiVentana := FindWindow(nil,Titulo); //Buscamos si existe la ventana
  if hwndMiVentana <> 0 then begin //Existe la ventana
     SetForegroundWindow(hwndMiVentana); //Ponemos la ventana como activa
     keybd_event(vk_snapshot,1, 0, 0); //Con esto realizamos una captura de la ventana activa
  end;
end;

Para hacerlo más bonito, puedes guardar en una variable Handle el de tu aplicación, y cuando hayas terminados, haces lo mismo, haces un FindWindow y pones la ventana activa.

Espero te sirva

Saludos

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

Empezado por Bicho

necesitas guardar la otra ventana en una imagen o ¿quieres algo más como acceder a ella, copiar texto, escribir en ella, etc?

Hola Bicho, gracias por la contestación.
Necesito guardar la imagen de la ventana; Una captura, vamos; Con la salvedad de que la ventana no es la activa (y eso debe seguir así ).

Empezado por Bicho

...haces un FindWindow y pones la ventana activa.

Gracias, pero no me vale.
Como he dicho debe ser una ventana que no es la activa y debo capturarla estando así; No puedo pasarla a primer plano, capturarla y volverla a pasar a segundo plano.
No tengo pobleas para capturar el escritorio, la ventana activa, una porción,... El problema es que debo capturar una que está en "segundo plano".

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

Empezado por Bicho

necesitas guardar la otra ventana en una imagen o ¿quieres algo más como acceder a ella, copiar texto, escribir en ella, etc?

Hola Bicho, gracias por la contestación.
Necesito guardar la imagen de la ventana; Una captura, vamos; Con la salvedad de que la ventana no es la activa (y eso debe seguir así ).

Empezado por Bicho

...haces un FindWindow y pones la ventana activa.

Gracias, pero no me vale.
Como he dicho debe ser una ventana que no es la activa y debo capturarla estando así; No puedo pasarla a primer plano, capturarla y volverla a pasar a segundo plano.
No tengo poblemas para capturar el escritorio, la ventana activa, una porción,... El problema es que debo capturar una que está en "segundo plano".

[roman]

¿Y si fuera la activa como la capturarías? Digo es que la verdad nunca me he puesto a hacer esto y no sé qué ventaja da que esté activa. En mi ingenuidad, yo buscaría el handle de la ventana con FindWindow, luego usaría GetWindowRect para obtener el rectangulo que ocupa. Después un GetDC(0) para obtener un HDC del escritorio que le asignaría a un Canvas, y finalmente Canvas.CopyRect para copiar el recángulo que obtuve antes al canvas de mi preferencia.

Obviamente no lo he probado.

// Saludos

[roman]

Esta función captura la ventana indicada:

Código Delphi [-]
procedure SnapShot(Window: HWND; FileName: String);
var
  Canvas: TCanvas;
  Bitmap: TBitmap;
  WindowRect: TRect;
  BmpRect: TRect;

begin
  GetWindowRect(Window, WindowRect);
  Canvas := TCanvas.Create;
  Bitmap := TBitmap.Create;

  try
    Canvas.Handle := GetDC(0);

    Bitmap.Width := WindowRect.Right - WindowRect.Left;
    Bitmap.Height := WindowRect.Bottom - WindowRect.Top;
    BmpRect := Rect(0, 0, Bitmap.Width, Bitmap.Height);

    Bitmap.Canvas.CopyRect(BmpRect, Canvas, WindowRect);
    Bitmap.SaveToFile(FileName);
  finally
    Canvas.Free;
    Bitmap.Free;
  end;
end;

y la guarda en el archivo que se indique. Sin embargo, supongo que por esto:

Empezado por Neftali

no es lade la app. activa, sino que está por debajo, por decirlo así, de la actual con la que se está trabajando

no te ha de servir, pues en la captura aparecerá lo que esté por arriba de esa ventana.

// Saludos

[[seoane]]

Creo que la respuesta no esta por el camino habitual (obtener el dc y copiar), creo que la respuesta debes buscarla en los mensajes WM_PRINT y WM_PRINTCLIENT. Estos mensajes se utilizan para pedir a una ventana que se dibuje en un dc determinado. Es decir, primero crearíamos un bitmap y luego enviaríamos el mensaje WM_PRINT a la ventana usando el dc de ese bitmap, entonces la ventana se dibujaría dentro del bitmap.

No lo he probado, pero por ahí puedes buscar código con esos mensajes para orientarte. De todas formas no siempre se obtiene un buen resultado, la ventana tiene que manejar ese mensaje y no todas lo hacen.

Bueno, tampoco te aclare mucho la cuestión, pero te dejo algo por donde empezar a buscar.

[[seoane]]

Solo añadir este articulo que trata sobre el tema, yo lo seguí hasta que inyecto el código en el proceso de la ventana a copiar, pero cunado se puso a hacer hook en funciones de la API ya me perdí. Mucha complicación me parece, solo para copiar una ventana.

http://www.fengyuan.com/article/wmprint.html

Si se puede saber, ¿que contiene esa ventana? ¿que información necesitas de ella?, lo digo porque, a no se que la ventana utilice alguna función de dibujo, puede que sea mas fácil capturar su contenido por otros medios. E incluso si hace falta recomponer nosotros mismos la ventana.

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

Empezado por roman

Esta función captura la ventana indicada...
Sin embargo, supongo que por esto no te ha de servir, pues en la captura aparecerá lo que esté por arriba de esa ventana.

Pues llevas toda la razón Román, y esas fueron más o menos mis primeras pruebas.
Siguiendo los pasos que tú comentas llegué al mismo sitio y el resultado era el esperado (y el mismo que tú comentas); Se captura la ventana correctamente, pero los que hay encima "tapan" la ventana que se está capturando.

Imagen

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

Empezado por seoane

...creo que la respuesta debes buscarla en los mensajes WM_PRINT y WM_PRINTCLIENT.

Navengando por tamaracka ya había llegado también a ese punto (tal vez debería haber puesto la trayectoria que seguí para evitaros tiempo). 1, 2, 3,...
Hay bastantes más, pero me quedé atascado ahí...

En cuanto al hook también había leído, pero lo estaba dejando de lado, porque me da muuuuuucha pereza meterme en ese "fregao".

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

Empezado por seoane

Si se puede saber, ¿que contiene esa ventana? ¿que información necesitas de ella?

Es cualquier ventana; Puedes pensar en una lista de las ventanas abiertas en tu escritorio y deseas una captura de cada una de ellas sin necesidad de ir activándolas todas...

[[seoane]]

Empezado por Neftali

Es cualquier ventana; Puedes pensar en una lista de las ventanas abiertas en tu escritorio y deseas una captura de cada una de ellas sin necesidad de ir activándolas todas...

Caramba, justo ahora me disponía a preguntarte esto mismo. Me lees el pensamiento.

Si la ventana solo tiene componentes estándar (botones, edits, etc) la podemos capturar usando WM_PRINT, eso si, con la consiguiente inyección de código en el proceso al que pertenece la ventana, ya que WM_PRINT solo funciona con ventanas de tu mismo proceso. Todo esto sin hacer un hook en las funciones de la API BeginPaint y EndPaint. Lo digo, porque esto ultimo es lo que a mi se me hace mas complicado.

Para la inyección de código estaba pensando en un hook del tipo WH_CALLWNDPROC, técnica que ya describí en un par de mensajes. Estaría bien utilizarla para algo serio por una vez