VB6 con Flash

Hola muchachos/as.
Mi problema es el siguiente:
tengo este codigo hecho en actionScripts 2

Código :

_root.ancho;
_root.alto;
var PerfilRecto:MovieClip = createEmptyMovieClip("Mco", 1);

rectangulo(10,10,_root.alto,_root.ancho);

function rectangulo(xi, yi, Alto, Ancho) {
   //-----Aca deberias remover el clip antes de generarlo de nuevo
   PerfilRecto.lineStyle(0,0x000000,100);
   PerfilRecto.beginFill(0xFFFFFF,100);
   PerfilRecto.moveTo(xi,yi);
   PerfilRecto.lineTo(xi+Ancho,yi);
   PerfilRecto.lineTo(xi+Ancho,yi+Alto);
   PerfilRecto.lineTo(xi,yi+Alto);
   PerfilRecto.endFill();
}

y me funciona perfecto cuando le pongo valores a ancho y alto.
Luego de generar el SWF me voy a visual basic 6 e ingreso dos textbox (uno para ancho y otro para alto) y cargo el componente flash10b.ocx para levantar el flah.
Este es el codigo en visual basic:

Código :

Private Sub Form_Load()
    Call FlNico.LoadMovie(0, "F:\NICOcote.swf")
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
   modificarFlash
End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)
   modificarFlash
End Sub

Sub modificarFlash()
    FlNico.SetVariable "_root.ancho", Text1.Text
    FlNico.SetVariable "_root.alto", Text2.Text
End Sub

He notado que las variables se pasan bien porque despues he tomado las variables de fhash con

Código :

    variable = FlNico.GetVariable ("_root.ancho")

y me trae el numero correcto.
Pero el problema es que no me dibuja.

No soy bueno en flash y probablemente ahi este fallando.
Alguien me puede dar una mano??
Muchas gracias

Tienes que pasarle las variables en la inicialización, no entiendo de VB, pero supongo que aquí:

Call FlNico.LoadMovie(0, "F:\NICOcote.swf?ancho=10&alto=10")

Si lo quieres hacer despúes, llama directamente a la función pasándole los parámetros que necesites

Jorge

Si entiendo lo que me dices y yo pienso que es lo mismo, pero no hay ningun comando en visual basic que me permita hacer eso. Con el LoadMovie no se puede. La unica forma que encontre, es hacer un bucle infinito en la llamada a rectangulo en flah pero me parece una burrada y se pone lentisimo.
Para pasar las variables desde vb6 a flash se usa: "FlNico.SetVariable"

solisarg escribió:

A que te refieres con esto??? no entendi

Muchisimas gracias Jorge

Me refiero a llamar a la función rectángulo en Flash, algo que parece ya estas haciendo

Jorge

La verdad que no sé como solucionar este problema!!
Alquien que me ayude