
14/03/2007, 08:03
|
 | | | Fecha de Ingreso: agosto-2006
Mensajes: 381
Antigüedad: 18 años, 8 meses Puntos: 2 | |
Re: Matriz de controles Komodo,
veamos tienes que tener un control picture y label con la propieda indice en 0 (de ambos), ahora para crear una matriz de controles es
x=0
do until tuRecordsetdeDatos.eof
x=x+1
Load Me.PictMaestro(x + 1)
Me.PictMaestro(x + 1).visible=true
Load Me.LBLMaestro(x + 1)
Me.LBLMaestro(x + 1).visible=true
ME.PictMaestro.Picture= LoadPicture(Ruta & "\" & TuRecurdsetDeDatos!NombreImagen)
Me.LBLMaestro(x + 1).Caption=TuRecurdsetDeDatos!NombreImagen
TuRecurdsetDeDatos.movenext
loop
TotalObjetosCreados = x
ahora tendra que ingeniartelas tu para posicionar cada picture en otra posicion, por que por defecto aparecera en la misma de la matriz. seria mas menos algo asi (ejemplo para crear un picture abajo de otro cada 100 Pixceles
me.PictMaestro(X).Top = x*100
al momento de destruirlos es algo asi mas menos
for x= 1 to TotalObjetosCreados
Unload Me.PictMaestro(x)
Unload Me.lblMaestro(x)
Next
mmm es una sugerencia, yo nunca trabaje con pict en matriz de controles pero si otros tipos y trabajandolo asi nunca tuve problemas. |