SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: arley en Jueves 26 de Julio de 2007, 03:20

Título: Pegar Foto Desde Cualquier Ubicacion
Publicado por: arley en Jueves 26 de Julio de 2007, 03:20

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

Título: Re: Pegar Foto Desde Cualquier Ubicacion
Publicado por: Jose Arriagada en Viernes 30 de Noviembre de 2007, 17:21

Agregar a tu formulario, un control picture y un control commondialog... y prueba el siguiente codigo...


Private Sub Picture1_DblClick()
CommonDialog1.ShowOpen
If Len(CommonDialog1.FileName) > 0 Then
    Call Cargar_Imagen(CommonDialog1.FileName)
End If
End Sub


Public Sub Cargar_Imagen(ByVal Ruta As String)
On Error GoTo control
    Picture1.Picture = LoadPicture(Ruta)
    Exit Sub

control:
    Exit Sub
End Sub





Para saber mas, de como opera el control commondialog... un link...

http://www.monografias.com/trabajos2/guiavb/guiavb3.shtml (http://www.monografias.com/trabajos2/guiavb/guiavb3.shtml)