Zoom de pantalla

[[Nbull]]

Hola a tod@s, necesito hacer un programa que haga un zoom de la pantalla (parecido a lo que hace la accesibilidad de Windows)y me lo saque por la segunda salida VGA de la tarjeta gráfica, para poder ver el zoom que hago a la pantalla en otro monitor.Nunca he programado algo parecido y no se por donde empezar.

Os pregunto las dudas que tengo haber si me podeis hechar un cable .

En primer lugar no tengo ni idea de como hacer que me salga una aplicación en la segunda pantalla.Y en la principal ver el escritorio normal de windows sin estirar.

Pero el problema que tengo es que quiero que en la segunda pantalla (la insatalaré en otra habitación diferente a donde esta la principal)me muestre en grande un reloj digital(quiero que se vea en grande por eso quiero hacer un zoom) que tiene la aplicación que se estará viendo en la primera pantalla.Por que asi el trabajador que esta en la segunda habitación vera el tiempo que tiene para realizar una determinada tarea.

No se si existe alguna aplicación que te haga esto, o en su defecto algún componente para que yo la pueda programar.

Espero haberme explicado bien y podais ayudarme.

Un saludo y gracias.

[dec]

Hola,

Bueno. Para lo primero me atrevo a recomendarte el artículo Zoom firmado por Zarko Gajic, a ver si sacas algo en claro. Para lo segundo... lo siento, pero, creo que tendré que dejar paso a algún otro compañero.

[[seoane]]

Lo de mandar un formulario al monitor secundario ya lo tratamos aqui.

En cuanto a lo del zoom, me gustaria saber un par de cosas mas: ¿El reloj que quieres ampliar esta en una aplicacion tuya? ¿podrias modificar su codigo?, de no ser asi, ¿como quieres determinar el area a ampliar? ¿usando el raton como en el ampliador de windows?

[[Lepe]]

al "ampliar" se pierde calidad en el reloj, con un simple Timer y un label con fuente a 48 puntos, ya tienes un "peaso" reloj digital.

Al hacer tú mismo el reloj puedes mostrar más información relevante, además la ventana no le pones bordes ni botones de Maximizar y que ella sola se maximice para ocupar todo el área del segundo monitor. (no tienes nada que hacer sobre esto, simplemente lo mandas al segundo monitor y le pones el WindowsState = wsmaximized).

Con esta configuración de monitores, es posible que haya problemas, es decir, si el segundo monitor es una ampliación de escritorio, el usuario del primer monitor pasa el ratón por el lado derecho de su pantalla y el ratón aparece en la otra sala . Creo recordar que las tarjetas NVidia daban más posiblidades que las ATI, al menos por el Software que traían.

Si le quitas la opción de "extender escritorio" el monitor se apaga (al menos en una ATI RADEON x550/600.

Saludos

[[Nbull]]

Hola, gracias por responderme, en primer lugar contestaros las preguntas:

La aplicación no la he echo yo por lo tanto lo de modificar el código, lo descartó.

Lo que quiero hacer no es un simple reloj y mostrarlo en el segundo monitor, sino el reloj que tiene esta aplicación (es una cuenta atras), mostrarlo en el segundo monitor, para que los trabajadores de la otra sala sepan cuanto tiempo les queda para hacer sus tareas.

Lo de como quiero determinar el área a ampliar, me gustaria poder seleccionar el area de pantalla a ampliaR y que el área seleccionada (reloj) se viera en el otro monitor.Lo del ratón lo descarto por que los usuarios del monitor principal lo estaran moviendo constantemente.

Lepe no me importa que pierda calidad, con que puedan ver el reloj me sobra, de todas formas gracias por la idea.

Un saludo a todos mirare los hilos que me habéis recomendado a ver si saco algo en claro.

[[seoane]]

Bueno, si no queda mas remedio que usar el zoom, usemoslo

Una primera aproximacion podria ser esta:

var
  SrcWindow: THandle;
  SrcDC: HDC;
begin
  // Borramos toda la superficie de dibujo
  Canvas.FillRect(Canvas.ClipRect);
  SrcWindow:= GetDesktopWindow;  
  if SrcWindow <> 0 then
  begin
    SrcDC:= GetDC(SrcWindow);
    if SrcDC <> 0 then
    try
      // Copiaria el area de la pantalla comprendida entre 0,0 y 100,100
      StretchBlt(Canvas.Handle,0,0,Width,Height,SrcDC,0,0,100,100,SRCCOPY);
    finally
      ReleaseDC(SrcWindow,SrcDC);
    end;
  end;
end;

Esto colocado dentro de un Timer nos copiaria el area que deseamos, ajustada al tamaño del form.

Pero seria mas adecuado definir las coordenadas con respecto a la esquina superior izquierda de la aplicacion a vigilar y no con respecto a la esquina de la pantalla, asi que podriamos usar algo como esto:

  // Cambiamos esta linea
  SrcWindow:= GetDesktopWindow;
  // Por esta otra
  SrcWindow:= FindWindow(nil,'Titulo');
  // Donde titulo es el titulo de la ventana a controlar

Y si le queremos dar otra vuelta de tuerca, habras notado que el codigo anterior muestra un desgradable parpadeo. Pues podemos solucionando usando un bitmap en un paso intermedio

Algo asi:

var
  SrcWindow: THandle;
  SrcDC: HDC;
  Bmp: TBitmap;
begin
  Bmp:= TBitmap.Create;
  try
    Bmp.Width:= Width;
    Bmp.Height:= Height;
    Bmp.Canvas.Brush.Color:= clBlack;
    Bmp.Canvas.FillRect(Bmp.Canvas.ClipRect);
    //SrcWindow:= GetDesktopWindow;
    SrcWindow:= FindWindow(nil,'Titulo');
    if SrcWindow <> 0 then
    begin
      SrcDC:= GetDC(SrcWindow);
      if SrcDC <> 0 then
      try
        StretchBlt(Bmp.Canvas.Handle,0,0,Width,Height,SrcDC,0,0,100,100,SRCCOPY);
      finally
        ReleaseDC(SrcWindow,SrcDC);
      end;
    end;
    Canvas.Draw(0,0,Bmp);
  finally
    Bmp.Free;
  end;

Ahora solo te queda poner el codigo que mas te guste en el evento de un timer, con un intervalo de 200 milisegundos por ejemplo, y acertar con las coordenadas correctas y ya esta.

Espero que te sirva