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.