Zoom

[SγиtαxEяяoя]

Hola, Estoy intentando hacer un Zoom donde pueda ver casi los pixeles de la pantalla, ¿Puede alguien ayudarme o dar algun ejemplo? me serviviria de mucha ayuda

dejo una imagen de basicamente que es lo que necesito, lo juro he intentado de casi todo, magnify y nada se distorsiona mucho

Esta es una captura del Magnify de AutoIt Window Info


Quiero exactamente hacer esa funcion desde el VB.NET

[Eleкtro]

se distorsiona mucho

Usa GDI+ para dibujar la imágen en el evento Paint (por ejemplo) y establece la interpolación adecuada para eliminar el efecto blurr y que se vean los píxeles "cuadrados".

Código (vbnet) [Seleccionar] Expandir

e.Graphics.InterpolationMode = Drawing2D.InterpolationMode.NearestNeighbor
e.Graphics.PixelOffsetMode = Drawing2D.PixelOffsetMode.Half
e.Graphics.DrawImage(...)

Para dibujar las lineas puedes hacerlo o bien con el control LineShape de "visual basic powerpacks" o con GDI+:

Código (vbnet) [Seleccionar] Expandir


' Linea vertical en el centro del picturebox:
 Using gdi As Graphics = Graphics.FromImage(bmp)
     gdi.DrawLine(Pens.Red, _
                PictureBox1.Left + PictureBox1.Width \ 2, _
                PictureBox1.Top, _
                PictureBox1.Left + PictureBox1.Width \ 2, _
                PictureBox1.Bottom)
 End Using

Saludos