[DUDA] Control Image

[HJZR4]

Mi duda es que me gustaría saber que imagen hay cargada en un control Image.

If Image1. ... = ... Then
End If

Gracias. S2

[SKL (orignal)]

asi de sencillo... lo mismo para el PictureBox

Código [Seleccionar] Expandir

Image.Picture = LoadPicture("RUTA DE LA IMG")

[HJZR4]

No me funciona... O me he equivocado en otra cosa... voy a probar, te cuento

No, no funciona....

[demoniox12]

que es lo que keres saber de la imagen?? comprobar si hay una imagen en el control?? o que??

salu2!

[HJZR4]

Comprobar que un control ImageBox tiene x imagen...

[Tughack]

Comprobar que un control ImageBox tiene x imagen...

Pues eso no lo puedes saber sin hacer una comparacion de imagenes por sus pixels...

Salu2

[cassiani]

 Algo parecido, lo hice de esta manera en un jueguito:

como necesitaba usar solo tres imagenes, las cargue en tres "Controles Image" permanentemente --> img1, img2, img3. cuando necesitaba cargar alguna de esas tres imagenes en tiempo de ejecución y en un determinado elemento de una matriz de image (cabe acotar), lo hacia asi: --> image(Indice).Picture = Img1

A la hora de hacer comparaciones, hacia esto:

Código [Seleccionar] Expandir

If Image(Indice).Picture = Img2 then
    ...
End If

Y para descargar la imagen, hacia esto: 

Código [Seleccionar] Expandir

Image(6).Picture = LoadPicture


Esa fue la solución que encontre hace tiempo para salir del paso en un proyecto de la universidad, no se si te sirva. Saludos. 

[Zeroql]

aver si entendi lo que kires es saber si hay aalguna imagen guardada en un control picture? si es cierto puede hacer lo sgte.
if img1.picture<>0 then
  hay imagen
end if

y tu code esta bien pero en ves de decirle que load picture le envias 0 y listo.

[HJZR4]

Vamos a ver, voy a poner un ejemplo práctico...

Tengo 1 control Image (Image1) y quiero, que dependiendo de la imágen que tenga, envie un mensaje u otro:

Form Load()
      If Image1. ... = "dibujo.jpg" Then
            MsgBox "Dibujo"
      Else
            MsgBox "Nada"
      End If
End Sub

Claro ahora? :S:S

[Tughack]

Vamos a ver, voy a poner un ejemplo práctico...

Tengo 1 control Image (Image1) y quiero, que dependiendo de la imágen que tenga, envie un mensaje u otro:

Form Load()
      If Image1. ... = "dibujo.jpg" Then
            MsgBox "Dibujo"
      Else
            MsgBox "Nada"
      End If
End Sub

Claro ahora? :S:S

Aver, eso no funciona asi.... Se no kieres tener k verificar imagenes  pixel a pixel, (una chorrada para una cosa de estas), te recomiendo k hagas como dije C@ss¡@n¡.

Salu2