Comunidad Gambas-es
Método Grab de DrawingArea - Versión para impresión

+- Comunidad Gambas-es (https://gambas-es.org)
+-- Foro: Gambas (https://gambas-es.org/forum-3.html)
+--- Foro: General (https://gambas-es.org/forum-4.html)
+--- Tema: Método Grab de DrawingArea (/thread-723.html)



Método Grab de DrawingArea - Shell - 12-11-2021

Buenas!.

¿ Ese método existe realmente ?.

Según la ayuda es que toma una imagen del control DrawingArea y lo devuelve. Pero no me ha funcionado , aunque di dimensiones a la imagen.

Código:
Public Sub btnMostrar_Click()

  Dim $picture As New Picture(ANCHO, ALTO)
 
  $picture = DrawingArea1.Grab()
 
  PictureBox1.Picture = $picture
 
End

Se queda como congelado el procedimiento: "No coinciden los tipos, requerido picture, obtenido Void en cambio"
Como si no devolviese nada.

Tuve que usar esta forma:

Código:
Public Sub btnMostrar_Click()

  Dim $picture As New Picture(ANCHO, ALTO)
 
  Paint.Begin($picture)
  Dibujar
  Paint.End
 
  PictureBox1.Picture = $picture

 
End

Imaginé que el primer método me iba ahorrar ese código.  Huh

Saludos


RE: Método Grab de DrawingArea - cogier - 13-11-2021

Pruebe este código

[code]


RE: Método Grab de DrawingArea - Shell - 13-11-2021

(13-11-2021, 12:14)cogier escribió: Pruebe este código

Cumple su función. Gracias.

Saludos