elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.
 
Inicio Ayuda Buscar Ingresar Registrarse
28 Mayo 2012, 08:36  


Tema destacado: [Overclocking] Récords de overclock del foro

+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (Moderador: [D4N93R])
| | | |-+  Screenshot + Guardar Imagenes sin sobrescribir
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Screenshot + Guardar Imagenes sin sobrescribir  (Leído 893 veces)
GonzaFz

Conectado Conectado

Mensajes: 16


Ver Perfil
Screenshot + Guardar Imagenes sin sobrescribir
« en: 9 Agosto 2011, 03:52 »

Bueno lo que sucede es que quiero hacer que mi programa saque un screenshot (de solo la ventana del programa) y que vaya guardando imagenes, es decir, que guarde 1 y cuando saque otra le ponga 2, 3 , 4, 5, etc y así infinitamente.
Mi codigo hasta ahora es:
Código
 Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
   Private Sub screenshot_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles screenshot.Click
       'Captura la ventana activa
       keybd_event(44, 1, 0&, 0&)
       If Not System.Windows.Forms.Clipboard.GetDataObject() Is Nothing Then
           Dim oDataObj As IDataObject = System.Windows.Forms.Clipboard.GetDataObject()
           If oDataObj.GetDataPresent(System.Windows.Forms.DataFormats.Bitmap) Then
               Dim oImgObj As System.Drawing.Image = oDataObj.GetData(DataFormats.Bitmap, True)
               'To Save as Jpeg
               oImgObj.Save("c:\Galaxy Pictures\Img.jpeg", System.Drawing.Imaging.ImageFormat.Jpeg)
           End If
       End If
   End Sub

Este codigo funciona para sacar la foto y enviarla a la carpeta seleccionada pero no puedo sacar muchsa y que vayan guardandose como 1, 2, 3, etc.
Porfavor espero que me puedan ayudar lo antes posible.


« Última modificación: 9 Agosto 2011, 04:11 por raul338 » En línea
RHL


Desconectado Desconectado

Mensajes: 962



Ver Perfil
Re: Screenshot + Guardar Imagenes sin sobrescribir
« Respuesta #1 en: 9 Agosto 2011, 04:12 »

 :P :P :P :P :P :P

declara una variable a nivel formulario para llevar la cuenta:

Código
dim account as integer
 
...
Código
Private Sub screenshot_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles screenshot.Click
       'Captura la ventana activa
account = account + 1
....
oImgObj.Save("c:\Galaxy Pictures\Img" & cstr(account)  & ".jpeg", System.Drawing.Imaging.ImageFormat.Jpeg)
....
 

se hiran guardando
img1.jpeg
img2.jpeg
img3.jpeg
...


PD:
:xD :xD :xD :xD me confundi crei que era VB :xD noce si te sirve el codigo :P


« Última modificación: 9 Agosto 2011, 04:13 por Raul100 » En línea
GonzaFz

Conectado Conectado

Mensajes: 16


Ver Perfil
Re: Screenshot + Guardar Imagenes sin sobrescribir
« Respuesta #2 en: 9 Agosto 2011, 04:24 »

Siiiiiiiii! Muchisimas gracias. La verdad recien me inicio en el mundo del visual basic, empeze el domingo a hacer un programa para un juego (mejor dicho es solo una forma mas facil de acceder donde podes abrir multi cuentas y tenes accesos directos a unos recursos muy utilizados) y bueno con indexar la pagina no tuve problemas pero luego un amigo me planteo que le ponga para sacar screenshot y bueno intente, busque en internet, combine codigos y mucho mas, pero vos me salvaste! Muchisimas gracias =).

Y porfa si me podes dar alguna forma facil de contactarte porque tambien quiero hacer que si no encuentra la carpeta Galaxy Pictures la cree xd! Porfa y muchas gracias.
Lei que era algo de MkDir pero no la crea no se porque, me da error. (Todo va con el boton de sacar screenshot porque es para no molestar al usuario)


EDITO:
Y otro de los problemas que tengo es que saco la foto pero no se guarda todavia, tengo que apretar de nuevo y ahi se guarda en la carpeta seleccionada. Osea digo que vos apretas una vez y no se guarda y despues apretas de nuevo y se guarda la anterior, y asi se va guardando una foto anterior a la que sacas..
« Última modificación: 9 Agosto 2011, 04:50 por GonzaFz » En línea
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
¿En que formato me recomiendan guardar las imagenes?
Diseño Gráfico
RasDragon 7 858 Último mensaje 17 Marzo 2004, 20:25
por Sub_Cero
CoMo GuArDaR iMaGeNeS hEcHaS eN fLaSh????????
Diseño Gráfico
ghgfhgfh 4 1,728 Último mensaje 15 Marzo 2004, 21:41
por Azielito
Editar,guardar imagenes en BD Access con Ado
Programación Visual Basic
Kyori 0 2,319 Último mensaje 29 Mayo 2005, 00:32
por Kyori
Imagenes GIF solo se quieren guardar como BMP
Dudas Generales
Natylore 0 651 Último mensaje 20 Septiembre 2008, 11:19
por Natylore
Guardar imagenes en Mysql
PHP
Hadess_inf 4 3,298 Último mensaje 31 Octubre 2009, 01:21
por HardieVon
Powered by SMF 1.1.16 | SMF © 2006-2008, Simple Machines