Ayuda con ListBoxEx

Aquí puedes preguntar o compartir tus dudas y conocimientos acerca del programa

32 mensajes Página 1 de 2

Publicar una respuesta

Ayuda con ListBoxEx

: zidangol Conectado; Usuario

: Mensajes: 93; Registrado: 16 Ago 2016 01:11

03 Sep 2016 16:38

por zidangol » 03 Sep 2016 16:38

buenas amigos me estoy iniciando en esto del autoplay y estoy intentando modificar un ejemplo apz, la apz es ListBoxEx_MenuV8.apz que abre paginas web y yo lo que quiero es que me abra archicos de texto, videos y carpetas, pero no lo consigo hacer,
como lo puedo hacer?
gracias

Re: Ayuda con ListBoxEx

: Agotaras123 Conectado; Staff

: Mensajes: 1125; Registrado: 16 Nov 2010 20:52; Ubicación: Honduras; Yahoo Messenger

04 Sep 2016 07:18

por Agotaras123 » 04 Sep 2016 07:18

que tal, para poderte ayudar debes de colocar el código que usar para ver que es lo que estas digitando mal y poder ayudarte.

Suscribete: Prestashop,Lua
Suscribete: Photoshop, lua
Suscribete: Zelda, Minecraft

Re: Ayuda con ListBoxEx

: zidangol Conectado; Usuario

: Mensajes: 93; Registrado: 16 Ago 2016 01:11

04 Sep 2016 17:24

por zidangol » 04 Sep 2016 17:24

Gracias amigo por constestar, me funciona todo bien menos lo ultimo de los videos, quiero abrirlo con el reproductor preterminado de mi pc y no se como hacerlo, mi conocimiento del autoplay es poco y los proyectos los hago a traves de apz y youtube.

Tambien me pasa que cuando estoy en la pagina del ListBoxEx y voy a otra pagina y vuelvo a la pagina del ListBoxEx me duplica los Item, como solucionarlo?

Otra cosa como se puede poner sonido de boton al ListBoxEx?

Este es el codigo
ListBoxEx On Select

--TUTORIALES:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
if (e_Index == 1) then
 
    if (ListBoxEx.GetItemDataEx("Plugin1", e_Index) == "close") then
         
         ListBoxEx.SetItemDataEx("Plugin1", e_Index, "open");
         ListBoxEx.SetItemIcon("Plugin1", e_Index, 2);
         ListBoxEx.SetItemVisible("Plugin1", 2, true);
         ListBoxEx.SetItemVisible("Plugin1", 3, true);
        
         ListBoxEx.Redraw("Plugin1");

         
    elseif (ListBoxEx.GetItemDataEx("Plugin1", e_Index) == "open") then
         
         ListBoxEx.SetItemDataEx("Plugin1", e_Index, "close");
         ListBoxEx.SetItemIcon("Plugin1", e_Index, 1);
         ListBoxEx.SetItemVisible("Plugin1", 2, false);
         ListBoxEx.SetItemVisible("Plugin1", 3, false);
         
         ListBoxEx.Redraw("Plugin1");
         
         
   end
--CARPETAS:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
elseif (e_Index == 4) then
 
    if (ListBoxEx.GetItemDataEx("Plugin1", e_Index) == "close") then
         
         ListBoxEx.SetItemDataEx("Plugin1", e_Index, "open");
         ListBoxEx.SetItemIcon("Plugin1", e_Index, 2);
         ListBoxEx.SetItemVisible("Plugin1", 5, true);
         ListBoxEx.SetItemVisible("Plugin1", 6, true);
         ListBoxEx.Redraw("Plugin1");

         
    elseif (ListBoxEx.GetItemDataEx("Plugin1", e_Index) == "open") then
         
         ListBoxEx.SetItemDataEx("Plugin1", e_Index, "close");
         ListBoxEx.SetItemIcon("Plugin1", e_Index, 1);
         ListBoxEx.SetItemVisible("Plugin1", 5, false);
         ListBoxEx.SetItemVisible("Plugin1", 6, false);
         ListBoxEx.Redraw("Plugin1");
         
         
   end    
--EJECUTABLES:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::   
elseif (e_Index == 7) then
 
    if (ListBoxEx.GetItemDataEx("Plugin1", e_Index) == "close") then
         
         ListBoxEx.SetItemDataEx("Plugin1", e_Index, "open");
         ListBoxEx.SetItemIcon("Plugin1", e_Index, 2);
         ListBoxEx.SetItemVisible("Plugin1", 8, true);
         ListBoxEx.SetItemVisible("Plugin1", 9, true);
         ListBoxEx.Redraw("Plugin1");

         
    elseif (ListBoxEx.GetItemDataEx("Plugin1", e_Index) == "open") then
         
         ListBoxEx.SetItemDataEx("Plugin1", e_Index, "close");
         ListBoxEx.SetItemIcon("Plugin1", e_Index, 1);
         ListBoxEx.SetItemVisible("Plugin1", 8, false);
         ListBoxEx.SetItemVisible("Plugin1", 9, false);
         ListBoxEx.Redraw("Plugin1");
         
         
   end
--VIDEOS:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::   
elseif (e_Index == 10) then
 
    if (ListBoxEx.GetItemDataEx("Plugin1", e_Index) == "close") then
         
         ListBoxEx.SetItemDataEx("Plugin1", e_Index, "open");
         ListBoxEx.SetItemIcon("Plugin1", e_Index, 2);
         ListBoxEx.SetItemVisible("Plugin1", 11, true);
         ListBoxEx.SetItemVisible("Plugin1", 12, true);
         ListBoxEx.Redraw("Plugin1");

         
    elseif (ListBoxEx.GetItemDataEx("Plugin1", e_Index) == "open") then
         
         ListBoxEx.SetItemDataEx("Plugin1", e_Index, "close");
         ListBoxEx.SetItemIcon("Plugin1", e_Index, 1);
         ListBoxEx.SetItemVisible("Plugin1", 11, false);
         ListBoxEx.SetItemVisible("Plugin1", 12, false);
         ListBoxEx.Redraw("Plugin1");
         
         
   end
--:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::   
else

        strTxt = ListBoxEx.GetItemData("Plugin1", e_Index);
        File.Open(strTxt, "AutoPlayDocsTUTORIALES");
        
        strlnk = ListBoxEx.GetItemData("Plugin1", e_Index);
        File.Open(strlnk, "AutoPlayDocsCARPETAS");
        
        strExe = ListBoxEx.GetItemData("Plugin1", e_Index);
        File.Open(strExe, "AutoPlayDocsEJECUTABLES");
        
        strMp4 = ListBoxEx.GetItemData("Plugin1", e_Index);
        Video.Load(strMp4, "AutoPlayDocsVIDEOS");

end

Re: Ayuda con ListBoxEx

: Agotaras123 Conectado; Staff

: Mensajes: 1125; Registrado: 16 Nov 2010 20:52; Ubicación: Honduras; Yahoo Messenger

05 Sep 2016 04:11

por Agotaras123 » 05 Sep 2016 04:11



strTxt = ListBoxEx.GetItemData("Plugin1", e_Index);
        File.Open(strTxt, "AutoPlay\\Docs\\TUTORIALES\\");
        
        strlnk = ListBoxEx.GetItemData("Plugin1", e_Index);
        File.Open(strlnk, "AutoPlay\\Docs\\CARPETAS\\");
        
        strExe = ListBoxEx.GetItemData("Plugin1", e_Index);
        File.Open(strExe, "AutoPlay\\Docs\\EJECUTABLES\\");
        
        strMp4 = ListBoxEx.GetItemData("Plugin1", e_Index);
        Video.Load(strMp4, "AutoPlay\\Docs\\VIDEOS\\");

para que cuando accedas de una pagina a otra y retornes debes de colocar esto en on show


ListBoxEx.DeleteAllItems("ListBoxEx1");

para reproducir sonidos en tu ListBox no te entendí muy bien, lo que logre captar es que cuando toques un Item te reproduzca algún tipo de sonido si es eso entonces debes de colocar esto en el evento On Select de tu ListBoxEx



tSelected = ListBoxEx.GetSelectedItem("ListBoxEx1")
if tSelected then
		Audio.Load(CHANNEL_BACKGROUND, "AutoPlay\\Audio\\Click1.ogg", true, false)		
end

Suscribete: Prestashop,Lua
Suscribete: Photoshop, lua
Suscribete: Zelda, Minecraft

Re: Ayuda con ListBoxEx

: zidangol Conectado; Usuario

: Mensajes: 93; Registrado: 16 Ago 2016 01:11

05 Sep 2016 10:04

por zidangol » 05 Sep 2016 10:04

Agotaras123 escribió:
strTxt = ListBoxEx.GetItemData("Plugin1", e_Index);
        File.Open(strTxt, "AutoPlayDocsTUTORIALES");
        
        strlnk = ListBoxEx.GetItemData("Plugin1", e_Index);
        File.Open(strlnk, "AutoPlayDocsCARPETAS");
        
        strExe = ListBoxEx.GetItemData("Plugin1", e_Index);
        File.Open(strExe, "AutoPlayDocsEJECUTABLES");
        
        strMp4 = ListBoxEx.GetItemData("Plugin1", e_Index);
        Video.Load(strMp4, "AutoPlayDocsVIDEOS");
para que cuando accedas de una pagina a otra y retornes debes de colocar esto en on show
ListBoxEx.DeleteAllItems("ListBoxEx1");
para reproducir sonidos en tu ListBox no te entendí muy bien, lo que logre captar es que cuando toques un Item te reproduzca algún tipo de sonido si es eso entonces debes de colocar esto en el evento On Select de tu ListBoxEx
tSelected = ListBoxEx.GetSelectedItem("ListBoxEx1")
if tSelected then
		Audio.Load(CHANNEL_BACKGROUND, "AutoPlayAudioClick1.ogg", true, false)		
end

Muchas gracias amigo por la ayuda.
Lo del sonido esta muy bien es lo que te decia, pero se le puede poner tambien sonido al pasar el cursor como un boton de verdad?
Y los videos no me abre


strMp4 = ListBoxEx.GetItemData("Plugin1", e_Index);
        Video.Load(strMp4, "AutoPlayDocsVIDEOS");

como lo hago? y si digo de abrir los videos en el plugin MediaPlayer se podria hacer?
Los Item me lo sigue duplicando al cambiar de pagina, que hago?
esto tengo en On Show


ListBoxEx.DeleteAllItems("ListBoxEx1");

ListBoxEx.SetUpdate("Plugin1", false);


--TUTORIALES::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

    nIndex = ListBoxEx.AddItem("Plugin1", "<b>TUTORIALES<b>", "", "", "", 1, LBXITEM_HTML, 0, {50732,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, VERICAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemDataEx("Plugin1", nIndex, "close");
    
    nIndex = ListBoxEx.AddItem("Plugin1", "TUTORIAL 1", "", "TUTORIAL 1.txt", "TUTORIALES", 3, 1, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, HORIZONTAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemVisible("Plugin1", nIndex, false);
    
    nIndex = ListBoxEx.AddItem("Plugin1", "TUTORIAL 2", "", "TUTORIAL 2.txt", "TUTORIALES", 3, 1, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, HORIZONTAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemVisible("Plugin1", nIndex, false);
    
--CARPETAS::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

    nIndex = ListBoxEx.AddItem("Plugin1", "<b>CARPETAS<b>", "", "", "", 1, LBXITEM_HTML, 0, {50732,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, VERICAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemDataEx("Plugin1", nIndex, "close");
    
    nIndex = ListBoxEx.AddItem("Plugin1", "GALERIA", "", "GALERIA - Acceso directo.lnk", "CARPETAS", 3, 1, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, HORIZONTAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemVisible("Plugin1", nIndex, false);
    
    nIndex = ListBoxEx.AddItem("Plugin1", "IMAGENES", "", "IMAGENES - Acceso directo.lnk", "CARPETAS", 3, 1, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, HORIZONTAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemVisible("Plugin1", nIndex, false);

--EJECUTABLES::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

    nIndex = ListBoxEx.AddItem("Plugin1", "<b>EJECUTABLES<b>", "", "", "", 1, LBXITEM_HTML, 0, {50732,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, VERICAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemDataEx("Plugin1", nIndex, "close");
    
    nIndex = ListBoxEx.AddItem("Plugin1", "EJECUTABLE 1", "", "EJECUTABLE 1.exe", "EJECUTABLES", 3, 1, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, HORIZONTAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemVisible("Plugin1", nIndex, false);
    
    nIndex = ListBoxEx.AddItem("Plugin1", "EJECUTABLE 2", "", "EJECUTABLE 2.exe", "EJECUTABLES", 3, 1, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, HORIZONTAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemVisible("Plugin1", nIndex, false);

--VIDEOS::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

    nIndex = ListBoxEx.AddItem("Plugin1", "<b>VIDEOS<b>", "", "", "", 1, LBXITEM_HTML, 0, {50732,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, VERICAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemDataEx("Plugin1", nIndex, "close");
    
    nIndex = ListBoxEx.AddItem("Plugin1", "VIDEO1", "", "VIDEO1.mp4", "VIDEOS", 3, 1, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, HORIZONTAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemVisible("Plugin1", nIndex, false);
    
    nIndex = ListBoxEx.AddItem("Plugin1", "VIDEO2", "", "VIDEO2.mp4", "VIDEOS", 3, 1, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, HORIZONTAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemVisible("Plugin1", nIndex, false);

--::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
    
ListBoxEx.SetUpdate("Plugin1", true);

gracias de nuevo por la ayuda.

Re: Ayuda con ListBoxEx

: Agotaras123 Conectado; Staff

: Mensajes: 1125; Registrado: 16 Nov 2010 20:52; Ubicación: Honduras; Yahoo Messenger

05 Sep 2016 16:22

por Agotaras123 » 05 Sep 2016 16:22

esto no se si no te fijaste o que pero te deje el código de esta manera


strMp4 = ListBoxEx.GetItemData("Plugin1", e_Index);
Video.Load(strMp4, "AutoPlay\\Docs\\VIDEOS");

tu lo tienes de esta manera



strMp4 = ListBoxEx.GetItemData("Plugin1", e_Index);
Video.Load(strMp4, "AutoPlayDocsVIDEOS");

Este codigo lo debes de colocar donde tengas el codigo que te carla las listbox yo asumi que era en on show pero por lo que me dices no lo es.


ListBoxEx.DeleteAllItems("ListBoxEx1");

Suscribete: Prestashop,Lua
Suscribete: Photoshop, lua
Suscribete: Zelda, Minecraft

Re: Ayuda con ListBoxEx

: zidangol Conectado; Usuario

: Mensajes: 93; Registrado: 16 Ago 2016 01:11

05 Sep 2016 18:03

por zidangol » 05 Sep 2016 18:03

Agotaras123 escribió:esto no se si no te fijaste o que pero te deje el código de esta manera
strMp4 = ListBoxEx.GetItemData("Plugin1", e_Index);
Video.Load(strMp4, "AutoPlay\Docs\VIDEOS");
tu lo tienes de esta manera
strMp4 = ListBoxEx.GetItemData("Plugin1", e_Index);
Video.Load(strMp4, "AutoPlayDocsVIDEOS");
Este codigo lo debes de colocar donde tengas el codigo que te carla las listbox yo asumi que era en on show pero por lo que me dices no lo es.
ListBoxEx.DeleteAllItems("ListBoxEx1");

Gracias amigo ya consegui lo de duplicar los Item el problema era que puse lo que me dijistes
ListBoxEx.DeleteAllItems("ListBoxEx1"); y ListBoxEx1 es el objeto lo reemplaze por ListBoxEx.DeleteAllItems("Plugin1"); y ya esta muchas gracias amigo.
lo del codigo de los videos me di cuenta pero es que no me funciona no se que hago mal por eso te mande todo el proyecto el de pagina On show y el primero que mande que va en ListBoxEx On Select

Amigo y lo de sonido al pasar por los botones del ListBoxEX se puede poner?
En fin te mando el proyecto tal como lo tengo ahora Haber si atinamos, muchas gracias te agradesco tu ayuda


--Pagina ON Show

--NO DUPLIQUEN LOS ITEM::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
ListBoxEx.DeleteAllItems("Plugin1");
-------------------------------------------------------------------------------------------------------------------------------------------

ListBoxEx.SetUpdate("Plugin1", false);

--TUTORIALES::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

    nIndex = ListBoxEx.AddItem("Plugin1", "<b>TUTORIALES<b>", "", "", "", 1, LBXITEM_HTML, 0, {50732,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, VERICAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemDataEx("Plugin1", nIndex, "close");
    
    nIndex = ListBoxEx.AddItem("Plugin1", "TUTORIAL 1", "", "TUTORIAL 1.txt", "TUTORIALES", 3, 1, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, HORIZONTAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemVisible("Plugin1", nIndex, false);
    
    nIndex = ListBoxEx.AddItem("Plugin1", "TUTORIAL 2", "", "TUTORIAL 2.txt", "TUTORIALES", 3, 1, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, HORIZONTAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemVisible("Plugin1", nIndex, false);
    
--CARPETAS::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

    nIndex = ListBoxEx.AddItem("Plugin1", "<b>CARPETAS<b>", "", "", "", 1, LBXITEM_HTML, 0, {50732,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, VERICAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemDataEx("Plugin1", nIndex, "close");
    
    nIndex = ListBoxEx.AddItem("Plugin1", "GALERIA", "", "GALERIA - Acceso directo.lnk", "CARPETAS", 4, 1, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, HORIZONTAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemVisible("Plugin1", nIndex, false);
    
    nIndex = ListBoxEx.AddItem("Plugin1", "IMAGENES", "", "IMAGENES - Acceso directo.lnk", "CARPETAS", 4, 1, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, HORIZONTAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemVisible("Plugin1", nIndex, false);

--EJECUTABLES::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

    nIndex = ListBoxEx.AddItem("Plugin1", "<b>EJECUTABLES<b>", "", "", "", 1, LBXITEM_HTML, 0, {50732,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, VERICAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemDataEx("Plugin1", nIndex, "close");
    
    nIndex = ListBoxEx.AddItem("Plugin1", "EJECUTABLE 1", "", "EJECUTABLE 1.exe", "EJECUTABLES", 5, 1, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, HORIZONTAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemVisible("Plugin1", nIndex, false);
    
    nIndex = ListBoxEx.AddItem("Plugin1", "EJECUTABLE 2", "", "EJECUTABLE 2.exe", "EJECUTABLES", 5, 1, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, HORIZONTAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemVisible("Plugin1", nIndex, false);

--VIDEOS::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

    nIndex = ListBoxEx.AddItem("Plugin1", "<b>VIDEOS<b>", "", "", "", 1, LBXITEM_HTML, 0, {50732,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, VERICAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemDataEx("Plugin1", nIndex, "close");
    
    nIndex = ListBoxEx.AddItem("Plugin1", "VIDEO1", "", "VIDEO1.mp4", "VIDEOS", 6, 1, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, HORIZONTAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemVisible("Plugin1", nIndex, false);
    
    nIndex = ListBoxEx.AddItem("Plugin1", "VIDEO2", "", "VIDEO2.mp4", "VIDEOS", 6, 1, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120});  --
    ListBoxEx.SetItemGStyle("Plugin1", nIndex, HORIZONTAL, LBXISTATE_NORMAL);
    ListBoxEx.SetItemVisible("Plugin1", nIndex, false);

--::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
    
ListBoxEx.SetUpdate("Plugin1", true);

--ListBoxEx On Select

--SONIDO PULSAR LISTBOXEX:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

tSelected = ListBoxEx.GetSelectedItem("ListBoxEx1")
if tSelected then
                Audio.Load(CHANNEL_BACKGROUND, "AutoPlay\\Audio\\Click1.ogg", true, false)             
end

--TUTORIALES:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

if (e_Index == 1) then
 
    if (ListBoxEx.GetItemDataEx("Plugin1", e_Index) == "close") then
         
         ListBoxEx.SetItemDataEx("Plugin1", e_Index, "open");
         ListBoxEx.SetItemIcon("Plugin1", e_Index, 2);
         ListBoxEx.SetItemVisible("Plugin1", 2, true);
         ListBoxEx.SetItemVisible("Plugin1", 3, true);
        
         ListBoxEx.Redraw("Plugin1");

         
    elseif (ListBoxEx.GetItemDataEx("Plugin1", e_Index) == "open") then
         
         ListBoxEx.SetItemDataEx("Plugin1", e_Index, "close");
         ListBoxEx.SetItemIcon("Plugin1", e_Index, 1);
         ListBoxEx.SetItemVisible("Plugin1", 2, false);
         ListBoxEx.SetItemVisible("Plugin1", 3, false);
         
         ListBoxEx.Redraw("Plugin1");
         
         
   end

--CARPETAS:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

elseif (e_Index == 4) then
 
    if (ListBoxEx.GetItemDataEx("Plugin1", e_Index) == "close") then
         
         ListBoxEx.SetItemDataEx("Plugin1", e_Index, "open");
         ListBoxEx.SetItemIcon("Plugin1", e_Index, 2);
         ListBoxEx.SetItemVisible("Plugin1", 5, true);
         ListBoxEx.SetItemVisible("Plugin1", 6, true);
         ListBoxEx.Redraw("Plugin1");

         
    elseif (ListBoxEx.GetItemDataEx("Plugin1", e_Index) == "open") then
         
         ListBoxEx.SetItemDataEx("Plugin1", e_Index, "close");
         ListBoxEx.SetItemIcon("Plugin1", e_Index, 1);
         ListBoxEx.SetItemVisible("Plugin1", 5, false);
         ListBoxEx.SetItemVisible("Plugin1", 6, false);
         ListBoxEx.Redraw("Plugin1");
         
         
   end    

--EJECUTABLES:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::   

elseif (e_Index == 7) then
 
    if (ListBoxEx.GetItemDataEx("Plugin1", e_Index) == "close") then
         
         ListBoxEx.SetItemDataEx("Plugin1", e_Index, "open");
         ListBoxEx.SetItemIcon("Plugin1", e_Index, 2);
         ListBoxEx.SetItemVisible("Plugin1", 8, true);
         ListBoxEx.SetItemVisible("Plugin1", 9, true);
         ListBoxEx.Redraw("Plugin1");

         
    elseif (ListBoxEx.GetItemDataEx("Plugin1", e_Index) == "open") then
         
         ListBoxEx.SetItemDataEx("Plugin1", e_Index, "close");
         ListBoxEx.SetItemIcon("Plugin1", e_Index, 1);
         ListBoxEx.SetItemVisible("Plugin1", 8, false);
         ListBoxEx.SetItemVisible("Plugin1", 9, false);
         ListBoxEx.Redraw("Plugin1");
         
         
   end

--VIDEOS:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::   

elseif (e_Index == 10) then
 
    if (ListBoxEx.GetItemDataEx("Plugin1", e_Index) == "close") then
         
         ListBoxEx.SetItemDataEx("Plugin1", e_Index, "open");
         ListBoxEx.SetItemIcon("Plugin1", e_Index, 2);
         ListBoxEx.SetItemVisible("Plugin1", 11, true);
         ListBoxEx.SetItemVisible("Plugin1", 12, true);
         ListBoxEx.Redraw("Plugin1");

         
    elseif (ListBoxEx.GetItemDataEx("Plugin1", e_Index) == "open") then
         
         ListBoxEx.SetItemDataEx("Plugin1", e_Index, "close");
         ListBoxEx.SetItemIcon("Plugin1", e_Index, 1);
         ListBoxEx.SetItemVisible("Plugin1", 11, false);
         ListBoxEx.SetItemVisible("Plugin1", 12, false);
         ListBoxEx.Redraw("Plugin1");
         
         
   end

--:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::   

else

        strTxt = ListBoxEx.GetItemData("Plugin1", e_Index);
        File.Open(strTxt, "AutoPlay\\Docs\\TUTORIALES\\");
       
        strlnk = ListBoxEx.GetItemData("Plugin1", e_Index);
        File.Open(strlnk, "AutoPlay\\Docs\\CARPETAS\\");
       
        strExe = ListBoxEx.GetItemData("Plugin1", e_Index);
        File.Open(strExe, "AutoPlay\\Docs\\EJECUTABLES\\");
       
        strMp4 = ListBoxEx.GetItemData("Plugin1", e_Index);
        Video.Load(strMp4, "AutoPlay\\Docs\\VIDEOS\\");

end

[/quote]

Re: Ayuda con ListBoxEx

: Agotaras123 Conectado; Staff

: Mensajes: 1125; Registrado: 16 Nov 2010 20:52; Ubicación: Honduras; Yahoo Messenger

05 Sep 2016 18:07

por Agotaras123 » 05 Sep 2016 18:07

en la ruta que hace la apertura no esta la variable que contiene el nombre del archivo a ejecutar

debe de quedar de esta manera



   strMp4 = ListBoxEx.GetItemData("Plugin1", e_Index);
        Video.Load(strMp4, "AutoPlay\\Docs\\VIDEOS\\"..strMp4 );

y vos lo tenes de esta otra



   strMp4 = ListBoxEx.GetItemData("Plugin1", e_Index);
        Video.Load(strMp4, "AutoPlay\\Docs\\VIDEOS\\");

Suscribete: Prestashop,Lua
Suscribete: Photoshop, lua
Suscribete: Zelda, Minecraft

Re: Ayuda con ListBoxEx

: zidangol Conectado; Usuario

: Mensajes: 93; Registrado: 16 Ago 2016 01:11

05 Sep 2016 19:52

por zidangol » 05 Sep 2016 19:52

Agotaras123 escribió:en la ruta que hace la apertura no esta la variable que contiene el nombre del archivo a ejecutar

debe de quedar de esta manera
   strMp4 = ListBoxEx.GetItemData("Plugin1", e_Index);
        Video.Load(strMp4, "AutoPlay\Docs\VIDEOS\"..strMp4 );
y vos lo tenes de esta otra
   strMp4 = ListBoxEx.GetItemData("Plugin1", e_Index);
        Video.Load(strMp4, "AutoPlay\Docs\VIDEOS\");

que no va
Que tendria que abrirmelo con el reproductor preterminado del pc o el plugin media payer?

Re: Ayuda con ListBoxEx

: Agotaras123 Conectado; Staff

: Mensajes: 1125; Registrado: 16 Nov 2010 20:52; Ubicación: Honduras; Yahoo Messenger

05 Sep 2016 20:08

por Agotaras123 » 05 Sep 2016 20:08

dejo un apz de como funciona mejor y revisalo y lo adaptas:

Suscribete: Prestashop,Lua
Suscribete: Photoshop, lua
Suscribete: Zelda, Minecraft

Re: Ayuda con ListBoxEx

: zidangol Conectado; Usuario

: Mensajes: 93; Registrado: 16 Ago 2016 01:11

05 Sep 2016 20:11

por zidangol » 05 Sep 2016 20:11

Agotaras123 escribió:dejo un apz de como funciona mejor y revisalo y lo adaptas:

HIDE: ON
Hidebb Message Hidden Description

ok, gracias amigo ya te comento luego

Re: Ayuda con ListBoxEx

: zidangol Conectado; Usuario

: Mensajes: 93; Registrado: 16 Ago 2016 01:11

06 Sep 2016 04:05

por zidangol » 06 Sep 2016 04:05

zidangol escribió:
Agotaras123 escribió:dejo un apz de como funciona mejor y revisalo y lo adaptas:

HIDE: ON
Hidebb Message Hidden Description
ok, gracias amigo ya te comento luego

genial amigo muchas gracias, funcionado con sus colores y icon y todo prefecto mejor que mi proyecto se añeden los videos solos al listboxex copiandolos en la carpeta videos y ordenados.
Y lo del sonido al pasar el cursor para que se quede el listboxex como un boton de verdad se puede?
te puedo hacer mas consultas si no es muchas molestias?
es que no tendras por hay mas apz de listboxex que añada a un plugin de texto archivos de texto por ejemplo creo al RichText.
y tambien de listboex abriendo carpetas a un plugin de explorador de archivos o algo asi
bueno, muchas gracias y perdona por las molestias

Re: Ayuda con ListBoxEx

: Juan Conectado; Usuario

: Mensajes: 99; Registrado: 28 Jul 2016 22:14

06 Sep 2016 10:23

por Juan » 06 Sep 2016 10:23

Voy a probar como funciona

Re: Ayuda con ListBoxEx

: zidangol Conectado; Usuario

: Mensajes: 93; Registrado: 16 Ago 2016 01:11

06 Sep 2016 14:07

por zidangol » 06 Sep 2016 14:07

Agotaras123 escribió:dejo un apz de como funciona mejor y revisalo y lo adaptas:

HIDE: ON
Hidebb Message Hidden Description

esta apz silve para sincronizar ListBoxEx con otros Plugins?
gracias

Re: Ayuda con ListBoxEx

: Agotaras123 Conectado; Staff

: Mensajes: 1125; Registrado: 16 Nov 2010 20:52; Ubicación: Honduras; Yahoo Messenger

06 Sep 2016 16:35

por Agotaras123 » 06 Sep 2016 16:35

zidangol no ocupas citar todo el post para responder eso satura el foro del mismo comentario una y otra vez .

referente a tus otras preguntas si se puede ya te las respondi en comentarios anteriores.

Suscribete: Prestashop,Lua
Suscribete: Photoshop, lua
Suscribete: Zelda, Minecraft

Re: Ayuda con ListBoxEx

: zidangol Conectado; Usuario

: Mensajes: 93; Registrado: 16 Ago 2016 01:11

06 Sep 2016 17:13

por zidangol » 06 Sep 2016 17:13

ok, estoy intentando sincronizar un listboxex con un RichText se puede?
es que no lo consigo.
no tendras mas apz de esas por casualidad?
gracias por ayudarme

Re: Ayuda con ListBoxEx

: Agotaras123 Conectado; Staff

: Mensajes: 1125; Registrado: 16 Nov 2010 20:52; Ubicación: Honduras; Yahoo Messenger

06 Sep 2016 17:28

por Agotaras123 » 06 Sep 2016 17:28

apz no tengo ese fue un ejemplo que te escribí, de que manera quieres cargar el texto en la richtex de un documento o de una base de datos.

Suscribete: Prestashop,Lua
Suscribete: Photoshop, lua
Suscribete: Zelda, Minecraft

Re: Ayuda con ListBoxEx

: zidangol Conectado; Usuario

: Mensajes: 93; Registrado: 16 Ago 2016 01:11

06 Sep 2016 17:39

por zidangol » 06 Sep 2016 17:39

Gracias amigo, pues igual que el reproductor que esta muy bien meto los archivos de texto en una ruta y el listboxex reconoce los item le doy y que los abra el RichText
muchas gracias
si quieres te mando los codigos haber donde me he equivocado para sincronizarlos?

Re: Ayuda con ListBoxEx

: zidangol Conectado; Usuario

: Mensajes: 93; Registrado: 16 Ago 2016 01:11

08 Sep 2016 22:37

por zidangol » 08 Sep 2016 22:37

buenas una ayudita que tengo mal aqui gracias

------------------------
--PAGE ON SHOW
------------------------
ListBoxEx.DeleteAllItems("Plugin2")
bFound = Folder.DoesExist("AutoPlay\\Docs\\");

if bFound == true then

tFiles = File.Find("AutoPlay\\Docs\\", "*.*", false, false, nil, nil);

if tFiles then 
for i,sFilePath in pairs(tFiles) do
tFileParts = String.SplitPath(sFilePath);
sFileName = tFileParts.Filename; 
sFileExtension = tFileParts.Extension; 
sFullFileName = sFileName..sFileExtension;
idIcon = ListBoxEx.AddAssocIcon("Plugin2", LBXASSOC_SMALLICON, sFilePath);
--Personalizar Item---------------------------------------------------------------------------------------------------------------------------
ListBoxEx.AddItem("Plugin2", sFullFileName, "", sFilePath, "", 1, LBXITEM_HTML, 0, {14256128,16646120}, {2035455,16646120}, {52978,16646120}); 

end
end

end
---------------------------------
--LISTBOXEX ON SELECT
---------------------------------
--SONIDO PULSAR LISTBOXEX--------------------------------------------------------------------

tSelected = ListBoxEx.GetSelectedItem("ListBoxEx1")
if tSelected then
Audio.Load(CHANNEL_BACKGROUND, "AutoPlay\\Audio\\Click1.ogg", true, false) 
end
----------------------------------------------------------------------------------------------
ListBoxEx.SetItemText("Plugin2", current,String.Replace(ListBoxEx.GetItemText("Plugin2", current, false),"<font color=#FF8040 face='verdana' size=3> - Codigo...</font>",""));
current = ListBoxEx.GetSelectedItem("Plugin2");

if current ~= 0 then
ListBoxEx.SetItemText("Plugin2", current,ListBoxEx.GetItemText("Plugin2", current, false).." ".."<font color=#FF8040 face='verdana' size=3> - Codigo...</font>");
RichText.LoadFromFile("RichText1", ListBoxEx.GetItemData("Plugin2", current));
RichText.Copy("RichText1");
end
----------------------------------------------------
--RICH TEXT ON SELECTION CHANGED
----------------------------------------------------
ListBoxEx.SetItemText("Plugin2", current,String.Replace(ListBoxEx.GetItemText("Plugin2", current, false),"<font color=#FF8040 face='verdana' size=3> - Codigo...</font>",""));
current = current + 1;
RichText.LoadFromFile("RichText1",ListBoxEx.GetItemData("Plugin2", current));
ListBoxEx.SelectItem("Plugin2", current, true);
ListBoxEx.SetItemText("Plugin2", current,ListBoxEx.GetItemText("Plugin2", current, false).."<font color=#FF8040 face='verdana' size=3> - Codigo...</font>");

RichText.LoadFromFile("RichText1");

if current >= ListBoxEx.GetTotalItems("Plugin2") then
current = 0;
end

Re: Ayuda con ListBoxEx

: zidangol Conectado; Usuario

: Mensajes: 93; Registrado: 16 Ago 2016 01:11

11 Sep 2016 21:14

por zidangol » 11 Sep 2016 21:14

Agotaras123 escribió:dejo un apz de como funciona mejor y revisalo y lo adaptas:

HIDE: ON
Hidebb Message Hidden Description

Buenas amigo me podrias decir en el proyeto del reproductor como puedo cambiar las font, el tamaño de las font, y el color es que tengo el proyecto casi terminado y me queda eso, es que me salen en agun listboxEx las letras mas pequeñas, bueno gracias espero una respuesta por favor.

Publicar una respuesta

Tema anterior

32 mensajes Página 1 de 2

Tema siguiente

Volver a “Dudas”