Gráficos con GDI

Hola tocayo

esto me lo pasaron a mi, lo que hace es hacer algunos dibujos y colocarlos
en un BitMap...
Espero te sirva

Saludos
Carlos Durán


Te incuyo un ejemplo que te puede servir de guia para alcanzar lo que
quieres:

' Creo un objeto Bitmap
Dim oDibujo As New Bitmap(300, 75)

' Creo un objeto Graphics a partir del Bitmap
Dim oGraphics As Graphics = Graphics.FromImage(oDibujo)

' Realizo los trazos sobre el objeto Graphics
oGraphics.DrawString("Este es un texto de ejemplo", New Font("Tahoma", 15),
Brushes.Aquamarine, 25, 15)
oGraphics.DrawLine(Pens.Red, 15, 50, 285, 50)

' Guardo el objeto Bitmap en un archivo
oDibujo.Save("dibujo.bmp", Imaging.ImageFormat.Bmp)

' Libero los objetos Bitmap y Graphics
oGraphics.Dispose()
oDibujo.Dispose()




"Carlos" escribió en el mensaje
news:273e01c51da5$e8962310$
Hola, alguno de vosotros trabaja habitualmente con
gráficos GDI?, Mi pregunta es la siguiente:

Como puedo hacer para que los dibujos tales como líneas,
elipses, etc... creados con GDI en tiempo de ejecución no
desaparezcan al minimizar la pantalla, o moverla?

Esque la única solución que se me ocurre, dados mis
conocimientos actuales, es volver a dibujar los gráficos
cada vez que se minimiza o se mueve el formulario, pero es
algo complejo, ya que los gráficos se van dibujando en
función de las acciones que realiza el usuario.

Gracias.

Tienes que usar el evento Paint


HighSoft

"Carlos" escribió en el mensaje
news:273e01c51da5$e8962310$
Hola, alguno de vosotros trabaja habitualmente con
gráficos GDI?, Mi pregunta es la siguiente:

Como puedo hacer para que los dibujos tales como líneas,
elipses, etc... creados con GDI en tiempo de ejecución no
desaparezcan al minimizar la pantalla, o moverla?

Esque la única solución que se me ocurre, dados mis
conocimientos actuales, es volver a dibujar los gráficos
cada vez que se minimiza o se mueve el formulario, pero es
algo complejo, ya que los gráficos se van dibujando en
función de las acciones que realiza el usuario.

Gracias.