Programación General > Visual Basic 6.0 e inferiores
Pegar Foto Desde Cualquier Ubicacion
arley:
Mi problema es el siguiente estoy creando un pequeño software en el cual estoy utilizando un objeto image para visualizar las fotos pero no quiero que una ventana de busqueda me proporcione esa foto para verla, sino que yo pueda ir a cualquier carpeta darle copiar y luego pegar sobre el objeto image estando este objeto limpio, o podria ser tambien si me ayudan con el objeto picturebox a hacer lo mismo
Cualquiera de los dos me sirve muchas Gracias...
Alguien que mu ayude Gracias
cpmario:
Bastante simple.
El objeto picturebox debe llamarse picFoto, y verificas que la propiedad AutoRedraw sea True, y la propiedad ScaleMode sea 3 - vbPixels
--- Código: Text ---Private Sub picFoto_DblClick() Clipboard.Clear Clipboard.SetData picFoto.ImageEnd Sub El código está en el evento DblClick, pero puede estar en el evento Click
:comp:
arley:
--- Cita de: "arley" --- Mi problema es el siguiente estoy creando un pequeño software en el cual estoy utilizando un objeto image para visualizar las fotos pero no quiero que una ventana de busqueda me proporcione esa foto para verla, sino que yo pueda ir a cualquier carpeta darle copiar y luego pegar sobre el objeto image estando este objeto limpio, o podria ser tambien si me ayudan con el objeto picturebox a hacer lo mismo
Cualquiera de los dos me sirve muchas Gracias...
Alguien que mu ayude Gracias
--- Fin de la cita ---
Hola no me funciono de esa manera no da pegar que tal si haces el gran favor y me ayudas con el objeto image para copiar la foto de cualquier carpeta del sistema y luego pegarla en este mismo.
Te agradezco lo anterior y tambien si me puedes ayudar por este lado.
:D Muchas Gracias
cpmario:
Mis disculpas, no era así, el código que te di es para pasar al portapapeles una imagen que esté en el picturebox.
El código para pasar una imagen que esté en el portapapeles y pegarla en un control de imagen es el siguiente:
--- Código: Text ---Private Sub Image1_Click() Image1.Picture = Clipboard.GetDataEnd Sub
:comp:
arley:
--- Cita de: "arley" ---
--- Cita de: "arley" ---
Disculpame si no me supe exlicar pero no necesito copiarla del portapapeles sino de otra carpeta, como por ejemplo de la carpeta mis imagenes ¿Como puedo hacerlo?
:D Muchas gracias...
--- Fin de la cita ---
--- Fin de la cita ---
Navegación
[#] Página Siguiente
Ir a la versión completa