Foros del Web » Programación para mayores de 30 ;) » Programación General »

crear nuevo objeto

Estas en el tema de crear nuevo objeto en el foro de Programación General en Foros del Web. Hola Estoy intentando crear una funcion que reciba un linea y que cree otra exactamente igual pero con otro color, la crea pero me la ...
  #1 (permalink)  
Antiguo 01/09/2003, 08:29
Avatar de alcohol  
Fecha de Ingreso: noviembre-2002
Mensajes: 99
Antigüedad: 21 años, 5 meses
Puntos: 0
crear nuevo objeto

Hola

Estoy intentando crear una funcion que reciba un linea y que cree otra exactamente igual pero con otro color, la crea pero me la crea debajo y no se ve,

Public Function otraLinea(linea As Line)
Dim linea2 As Line
Set linea2 = linea
Set linea2 = Controls.Add("VB.line", "linea2")
With linea2
.X1 = linea.X1 + 200
.Y1 = linea.Y1 + 200
.X2 = linea.X2
.Y2 = linea.Y2
.BorderWidth = linea.BorderWidth
.BorderColor = vbYellow
.Visible = True
End With

End Function
  #2 (permalink)  
Antiguo 01/09/2003, 09:04
Avatar de RootK
Moderador
 
Fecha de Ingreso: febrero-2002
Ubicación: México D.F
Mensajes: 8.004
Antigüedad: 22 años, 2 meses
Puntos: 50
La estas poniendo dentro de algun ciclo para generar las líneas una tras de otra.. o como la estas mandando a llamar para que se pueda incrementar y no te aparezcan juntas...

Saludos
__________________
Nadie roba nada ya que en la vida todo se paga . . .

Exentrit - Soluciones SharePoint & Net
  #3 (permalink)  
Antiguo 02/09/2003, 13:09
Avatar de alcohol  
Fecha de Ingreso: noviembre-2002
Mensajes: 99
Antigüedad: 21 años, 5 meses
Puntos: 0
Quier duplicar la linea para luego modificar su longitud y que parezca que cambia gradualmente de color.
He modificado la propiedad zorder y ya consigo mostrarla encima
Gracias RootK por tu atencion.
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 10:44.