Mensaje    Asunto: Uso de DirectSkin Responder citando

Un saludo a todos.

Alguien sabe cómo usar el control ActiveX WBOCX (DirectSkin). Ya lo he instalado y agregado a mi formulario pero no pone el skin que le mando, las funciones me devuelven el valor correcto (si está leyendo el skin del disco) pero sólo me deja el formulario sin cabecera y no aplica el skin. El código que pongo en el evento OnCreate es el siguiente:

Código:

        WideString Ruta,Skin;
        //Esto también lo he cambiado por la ruta default de los skin y tampoco lo carga "SetRootPath(0)"
        Ruta = "C:\Program Files\Stardock\DirectSkin\demo_samples\MacPC";
        Skin = "MacPc";
        SkinControl->SetRootPathStr(Ruta);
        if(SkinControl->LoadUIS(Skin) == 0)
        {
                ShowMessage("No existe la ruta");
                return;
        }

        if(SkinControl->InitWB())
        {
                ShowMessage("No se puede inicializar el skin");
                return;
        }
       
        SkinControl->DoWindow((long) Form1->Handle);


Si alguien pudiera ayudarme le estaré muy agradecido.

Saludos nuevamente.
_________________
/**********************************/
ISC. Tito Ruiz Sánchez
EMail: isc_truiz@hotmail.com
kintaro_rst@hotmail.com