Domingo 22 de Diciembre de 2024, 17:41
SoloCodigo
Bienvenido(a),
Visitante
. Por favor,
ingresa
o
regístrate
.
¿Perdiste tu
email de activación?
Inicio
Foros
Chat
Ayuda
Buscar
Ingresar
Registrarse
SoloCodigo
»
Foros
»
Programación General
»
Visual Basic 6.0 e inferiores
(Moderador:
F_Tanori
) »
Imagenes Transparentes
« anterior
próximo »
Imprimir
Páginas: [
1
]
Autor
Tema: Imagenes Transparentes (Leído 2450 veces)
CesarWeb
Nuevo Miembro
Mensajes: 1
Imagenes Transparentes
«
en:
Martes 13 de Julio de 2004, 18:46 »
0
Hola gentes
me gustaria saber si alguien tiene idea como se hace para que el Vb te deje hacer una imagen que sea transparente y que si yo hago un click en la imagen me deje ingresar a un formulario que se habre una nueva ventana ...
Gracias por todo, saludos. Cesar
Tweet
inorc
Nuevo Miembro
Mensajes: 1
Re: Imagenes Transparentes
«
Respuesta #1 en:
Lunes 17 de Octubre de 2005, 18:18 »
0
Hola, creo que antes de nada deberías comprobar que la imagen que utilizas tiene el fondo transparente y guardarla con formato que admita fondos transparentes como *.GIF. Y luego sólo insertalo en el picturebox. Yo lo he hecho y me funciona.
Suerte.
El mensaje contiene
1 archivo adjunto
. Debes
ingresar
o
registrarte
para poder verlo y descargarlo.
UserCode
Miembro MUY activo
Mensajes: 338
Re: Imagenes Transparentes
«
Respuesta #2 en:
Lunes 17 de Octubre de 2005, 18:38 »
0
Hola, aqui tienes un codigo para tener las cuestiones transparentes en tus ventanas, cualquier objeto dentro de la ventana sera transparente igual que la ventana, no sé si es solo la imagen o la ventana completa, mira a ver como te sirve esto aqui te lo dejo. Sino, haciendo una ventana a parte con un control Picture por ejemplo que abarque casi los bordes de la ventanita y la llamas para que cargue la imagen.
Código: Text
'Codigo Interezante para forzar transparencia en un form de manera muy sencilla y con transparencia graduable
Private Declare Function GetWindowLong Lib "USER32" Alias "GetWindowLongA" _
(ByVal hWnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "USER32" Alias "SetWindowLongA" _
(ByVal hWnd As Long, ByVal nIndex As Long, _
ByVal dwNewLong As Long) As Long
Private Const GWL_STYLE = (-16)
Private Const GWL_EXSTYLE = (-20)
'Requires Windows 2000 or later:
Private Const WS_EX_LAYERED = &H80000
Private Declare Function SetLayeredWindowAttributes Lib "USER32" (ByVal hWnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long
Private Const LWA_COLORKEY = &H1
Private Const LWA_ALPHA = &H2
Public Sub MakeWindowTransparent(ByVal hWnd As Long, ByVal alphaAmount As Byte)
Dim lStyle As Long
lStyle = GetWindowLong(hWnd, GWL_EXSTYLE)
lStyle = lStyle Or WS_EX_LAYERED
SetWindowLong hWnd, GWL_EXSTYLE, lStyle
SetLayeredWindowAttributes hWnd, 0, alphaAmount, LWA_ALPHA
End Sub
'La transparencia es graduable modificando el alphaamount en este caso esta en 150 mientras menor es este valor mas transparente se torna
Private Sub Form_Load()
Call MakeWindowTransparent(Form1.hWnd, 150)
End Sub
Saludos
Si esto es Leído por accidente, induzca al vomito
patitofeo
Miembro MUY activo
Mensajes: 145
Re: Imagenes Transparentes
«
Respuesta #3 en:
Miércoles 19 de Octubre de 2005, 12:52 »
0
¿Necesitas una imagen transparente o una imagen con fondo transparente?
Para imagenes transparentes--------> TRUQUITO
Create un picturebox e inserta una imagen, determina un color transparente y aplica la mascara.
La imagen que insertes debe tener un pixel del color de la mascara intercalado entre cada uno de la imagen. No se si me entiendes.
Deberias retocar la imagen de modo que un pixel si y uno no (como en un ajedrez) sea del color de la mascara. Por supuesto pierdes bastante calidad pero es una forma facil de conseguir este efecto.
Espero que me hayan entendido.
Saludos y ya me contaran
Coneira
Nuevo Miembro
Mensajes: 16
Re: Imagenes Transparentes
«
Respuesta #4 en:
Viernes 21 de Octubre de 2005, 00:30 »
0
Hola comparto lo que dijo inorc, puedes crear una imágen que tenga fondo transparente, si tienes una imágen con distinta extensión que *.gif, puedes usar visual studio.net para convertir cualquier imágen en gif, sólo tienes q poner el fondo de color blanco, luego guardarlo como gif (Ya sabes menu - Guardar como - Formato Gif), ya de ahi lo puedes llevar a un pictureBox o a un Image ... Luego ya en su evento Click de cualquiera de los os objetos escribes el código:
Código: Text
' Objeto Image
Private Sub Image1_Click()
Form1.Show ' Utilizas el nombre del formulario que aparecerá seguida de .Show
End Sub
Código: Text
Objeto PictureBox
Private Sub Picture1_Click()
Form1.Show
End Sub
Espero que haya sido a eso a la que te referías
... y si no ...
ya p al menos eso del uso del Visual Studio.NET para hacer gifs
... sólo seleccionas en nuevo archivo icono file y arrastrsa la imágen de cualquier formato .....
Bye bye
jodijo5
Miembro HIPER activo
Mensajes: 518
Nacionalidad:
Re: Imagenes Transparentes
«
Respuesta #5 en:
Viernes 9 de Diciembre de 2005, 19:19 »
0
mas facil, mandalo a un cntrol imagelist, y le habilitas la propidad usemaskcolor a true, luego le pones el color que debe tomar como transparente en la propiedad maskcolor
=============================
Daniel Pomalaza Mendoza
visita el Dinosaurio Azul :-D
http://bluetecnologia.com
Imprimir
Páginas: [
1
]
« anterior
próximo »
SoloCodigo
»
Foros
»
Programación General
»
Visual Basic 6.0 e inferiores
(Moderador:
F_Tanori
) »
Imagenes Transparentes