AMSSpecialist

Foro Especializado en Autoplay Media Studio y más...
https://amsspecialist.com/

Señalizacion Programas

https://amsspecialist.com/viewtopic.php?t=3582

Página 1 de 1

Señalizacion Programas

Publicado: 04 Jul 2016 18:30
por bierco
buen dia compañeros,
Solicito de la ayuda de ustedes con el siguiente tema, tengo la siguiente imagen:
Imagen
Lo que deseo es que donde dice descargando aplicaciones, aparezca el nombre del programa que se esta descargando en ese momento. Ejemplo:
En la seleccion se muestra flash player, deseo que cuando este descargando ese software me diga descargantdo flash player. O si se puede colocar un color a esa letra cuando pase por ese software que esta descargando.
Este es el codigo de el tree.
tblProp = {};

-- Get the child count of 'Tree1'

ChildCount = Tree.GetChildCount("Tree1", "1");

-- Get the child count of 'Tree2'

ChildCount2 = Tree.GetChildCount("Tree1", "2");

-- Get the child count of 'Tree3'

ChildCount3 = Tree.GetChildCount("Tree1", "3");

-- Get the child count of 'Tree4'

ChildCount4 = Tree.GetChildCount("Tree1", "4");

-- Get the child count of 'Tree3'

ChildCount5 = Tree.GetChildCount("Tree1", "5");

-- Get the child count of 'Tree3'

ChildCount6 = Tree.GetChildCount("Tree1", "6");

-- Get the child count of 'Tree3'

ChildCount7 = Tree.GetChildCount("Tree1", "7");

-- Get the child count of 'Tree3'

ChildCount8 = Tree.GetChildCount("Tree1", "8");

-- Get the child count of 'Tree3'

ChildCount9 = Tree.GetChildCount("Tree1", "9");

-- Get the child count of 'Tree3'

ChildCount10 = Tree.GetChildCount("Tree1", "10");

-- Get the child count of 'Tree3'

ChildCount11 = Tree.GetChildCount("Tree1", "11");

-- Get the child count of 'Tree3'

ChildCount12 = Tree.GetChildCount("Tree1", "12");

-- Get the child count of 'Tree3'

ChildCount13 = Tree.GetChildCount("Tree1", "13");

-- Get the child count of 'Tree3'

ChildCount14 = Tree.GetChildCount("Tree1", "14");

-- Get the child count of 'Tree3'

ChildCount15 = Tree.GetChildCount("Tree1", "15");

-- Get the child count of 'Tree3'

ChildCount16 = Tree.GetChildCount("Tree1", "16");

-- Check if main index checked

if (e_NodeIndex == "1") and (e_Checked == true) then

for count = 1, ChildCount, 1 do

tblProp.Checked = true;

Tree.SetNode("Tree1", "1."..count, tblProp);

end

-- Check if main index not checked

elseif (e_NodeIndex == "1") and (e_Checked == false) then

for count = 1, ChildCount, 1 do

tblProp.Checked = false;

Tree.SetNode("Tree1", "1."..count, tblProp);

end

end

-- Check if second index checked

if (e_NodeIndex == "2") and (e_Checked == true) then

for count = 1, ChildCount2, 1 do

tblProp.Checked = true;

Tree.SetNode("Tree1", "2."..count, tblProp);

end

-- Check if second index not checked

elseif (e_NodeIndex == "2") and (e_Checked == false) then

for count = 1, ChildCount2, 1 do

tblProp.Checked = false;

Tree.SetNode("Tree1", "2."..count, tblProp);

end

end

if (e_NodeIndex == "3") and (e_Checked == true) then

for count = 1, ChildCount3, 1 do

tblProp.Checked = true;

Tree.SetNode("Tree1", "3."..count, tblProp);

end

-- Check if second index not checked

elseif (e_NodeIndex == "3") and (e_Checked == false) then

for count = 1, ChildCount3, 1 do

tblProp.Checked = false;

Tree.SetNode("Tree1", "3."..count, tblProp);

end

end

if (e_NodeIndex == "4") and (e_Checked == true) then

for count = 1, ChildCount4, 1 do

tblProp.Checked = true;

Tree.SetNode("Tree1", "4."..count, tblProp);

end

-- Check if second index not checked

elseif (e_NodeIndex == "4") and (e_Checked == false) then

for count = 1, ChildCount4, 1 do

tblProp.Checked = false;

Tree.SetNode("Tree1", "4."..count, tblProp);

end

end

if (e_NodeIndex == "5") and (e_Checked == true) then

for count = 1, ChildCount5, 1 do

tblProp.Checked = true;

Tree.SetNode("Tree1", "5."..count, tblProp);

end

-- Check if second index not checked

elseif (e_NodeIndex == "5") and (e_Checked == false) then

for count = 1, ChildCount5, 1 do

tblProp.Checked = false;

Tree.SetNode("Tree1", "5."..count, tblProp);

end

end

if (e_NodeIndex == "6") and (e_Checked == true) then

for count = 1, ChildCount6, 1 do

tblProp.Checked = true;

Tree.SetNode("Tree1", "6."..count, tblProp);

end

-- Check if second index not checked

elseif (e_NodeIndex == "6") and (e_Checked == false) then

for count = 1, ChildCount6, 1 do

tblProp.Checked = false;

Tree.SetNode("Tree1", "6."..count, tblProp);

end

end

if (e_NodeIndex == "7") and (e_Checked == true) then

for count = 1, ChildCount7, 1 do

tblProp.Checked = true;

Tree.SetNode("Tree1", "7."..count, tblProp);

end

-- Check if second index not checked

elseif (e_NodeIndex == "7") and (e_Checked == false) then

for count = 1, ChildCount7, 1 do

tblProp.Checked = false;

Tree.SetNode("Tree1", "7."..count, tblProp);

end

end

if (e_NodeIndex == "8") and (e_Checked == true) then

for count = 1, ChildCount8, 1 do

tblProp.Checked = true;

Tree.SetNode("Tree1", "8."..count, tblProp);

end

-- Check if second index not checked

elseif (e_NodeIndex == "8") and (e_Checked == false) then

for count = 1, ChildCount8, 1 do

tblProp.Checked = false;

Tree.SetNode("Tree1", "8."..count, tblProp);

end

end

if (e_NodeIndex == "9") and (e_Checked == true) then

for count = 1, ChildCount9, 1 do

tblProp.Checked = true;

Tree.SetNode("Tree1", "9."..count, tblProp);

end

-- Check if second index not checked

elseif (e_NodeIndex == "9") and (e_Checked == false) then

for count = 1, ChildCount9, 1 do

tblProp.Checked = false;

Tree.SetNode("Tree1", "9."..count, tblProp);

end

end

if (e_NodeIndex == "10") and (e_Checked == true) then

for count = 1, ChildCount10, 1 do

tblProp.Checked = true;

Tree.SetNode("Tree1", "10."..count, tblProp);

end

-- Check if second index not checked

elseif (e_NodeIndex == "10") and (e_Checked == false) then

for count = 1, ChildCount10, 1 do

tblProp.Checked = false;

Tree.SetNode("Tree1", "10."..count, tblProp);

end

end

if (e_NodeIndex == "11") and (e_Checked == true) then

for count = 1, ChildCount11, 1 do

tblProp.Checked = true;

Tree.SetNode("Tree1", "11."..count, tblProp);

end

-- Check if second index not checked

elseif (e_NodeIndex == "11") and (e_Checked == false) then

for count = 1, ChildCount11, 1 do

tblProp.Checked = false;

Tree.SetNode("Tree1", "11."..count, tblProp);

end

end

if (e_NodeIndex == "12") and (e_Checked == true) then

for count = 1, ChildCount12, 1 do

tblProp.Checked = true;

Tree.SetNode("Tree1", "12."..count, tblProp);

end

-- Check if second index not checked

elseif (e_NodeIndex == "12") and (e_Checked == false) then

for count = 1, ChildCount12, 1 do

tblProp.Checked = false;

Tree.SetNode("Tree1", "12."..count, tblProp);

end

end

if (e_NodeIndex == "13") and (e_Checked == true) then

for count = 1, ChildCount13, 1 do

tblProp.Checked = true;

Tree.SetNode("Tree1", "13."..count, tblProp);

end

-- Check if second index not checked

elseif (e_NodeIndex == "13") and (e_Checked == false) then

for count = 1, ChildCount13, 1 do

tblProp.Checked = false;

Tree.SetNode("Tree1", "13."..count, tblProp);

end

end

if (e_NodeIndex == "14") and (e_Checked == true) then

for count = 1, ChildCount14, 1 do

tblProp.Checked = true;

Tree.SetNode("Tree1", "14."..count, tblProp);

end

-- Check if second index not checked

elseif (e_NodeIndex == "14") and (e_Checked == false) then

for count = 1, ChildCount14, 1 do

tblProp.Checked = false;

Tree.SetNode("Tree1", "14."..count, tblProp);

end

end

if (e_NodeIndex == "15") and (e_Checked == true) then

for count = 1, ChildCount15, 1 do

tblProp.Checked = true;

Tree.SetNode("Tree1", "15."..count, tblProp);

end

-- Check if second index not checked

elseif (e_NodeIndex == "15") and (e_Checked == false) then

for count = 1, ChildCount15, 1 do

tblProp.Checked = false;

Tree.SetNode("Tree1", "15."..count, tblProp);

end

end

if (e_NodeIndex == "16") and (e_Checked == true) then

for count = 1, ChildCount16, 1 do

tblProp.Checked = true;

Tree.SetNode("Tree1", "16."..count, tblProp);

end

-- Check if second index not checked

elseif (e_NodeIndex == "16") and (e_Checked == false) then

for count = 1, ChildCount16, 1 do

tblProp.Checked = false;

Tree.SetNode("Tree1", "16."..count, tblProp);

end

end

--##################################################################

Progress.SetVisible("Progress1", false);

Paragraph.SetVisible("Paragraph1", true);

local tblNodes = {"1","1.1","1.2","1.3","2","2.1","2.2","3","3.1","3.2","4","4.1","4.2","4.3","4.4","4.5","5","5.1","5.2","5.3","6","6.1","6.2","6.3","7","7.1","8","8.1","8.2","8.3","8.4","8.5","8.6","9","9.1","9.2","9.3","9.4","9.5","10","10.1","10.2","10.3","11","11.1","11.2","11.3","12","12.1","12.2","13","13.1","13.2","13.3","13.4","13.5","13.6","14","14.1","14.2","14.3","14.4","15","15.1","15.2","15.3","16","16.1","16.2","16.3","16.4"}

text=""

for i,Node in pairs (tblNodes) do

tNode =Tree.GetNode("Tree1",Node);

if tNode.Checked == true then

text = text.."Item: ".. Node .." ".. tNode.Text .."\r\n"

end

end

Paragraph.SetText("Paragraph1",text);

Paragraph.SetScrollPos("Paragraph1",Paragraph.GetScrollRange("Paragraph1", true).Max, true);[/code]

Y este es el codigo del boton Install:

Código: Seleccionar todo
local tbChecks ={}
local tblNodes = {"1","1.1","1.2","1.3","2","2.1","2.2","3","3.1","3.2","4","4.1","4.2","4.3","4.4","4.5","5","5.1","5.2","5.3","6","6.1","6.2","6.3","7","7.1","8","8.1","8.2","8.3","8.4","8.5","8.6","9","9.1","9.2","9.3","9.4","9.5","10","10.1","10.2","10.3","11","11.1","11.2","11.3","12","12.1","12.2","13","13.1","13.2","13.3","13.4","13.5","13.6","14","14.1","14.2","14.3","14.4","15","15.1","15.2","15.3","16","16.1","16.2","16.3","16.4"}
n=1
--Debug.Clear()
if tbChecks then
for i,Node in pairs (tblNodes) do
tNode =Tree.GetNode("Tree1",Node);
if tNode.Checked == true then
tbChecks[n]={Ind=Node,Data=tNode.Data}
n=n+1
end
end
if tNode.Checked == 0 and Checket then
elseif not Checket then
Label.SetVisible("CountIntall", false)
Paragraph.SetVisible("Paragraph1", false);
Progress.SetVisible("Progress1", false);
Label.SetVisible("Downloaded", false);
Label.SetVisible("ProgressDownloaded", false);
Image.SetVisible("Image4", false)
Image.SetVisible("Image1", false)
Dialog.Message("Error", "No se ha seleccionado ningún programa para instalar");
xt=false
end
end
Audio.Load(CHANNEL_NARRATION, "AutoPlay\\Audio\\Voces\\iniciando.mp3", true, false);
Paragraph.SetVisible("Paragraph1", true);
Progress.SetVisible("Progress1", true);
Label.SetVisible("CountIntall", true)
Label.SetVisible("Downloaded", true);
Label.SetVisible("ProgressDownloaded", true);
Image.SetVisible("Image4", true)
Image.SetVisible("Image1", true)
for count=1,Table.Count(tbChecks) do
Path = tbChecks[count]["Data"]
FTPWI.Download(Path, "C:\\Windows\\Temp\\Setup.exe", "user", "Password", MODE_TEXT, 20, 21, true, DownloadFunction);
Complete = Label.GetText("ProgressDownloaded");
result = File.Run("C:\\Windows\\Temp\\Setup.exe", "", "", SW_SHOWNORMAL, true);
xt = result ;
Application.Sleep(1000);
end
if xt~=true then
Label.SetVisible("CountIntall", false)
Paragraph.SetVisible("Paragraph1", false);
Progress.SetVisible("Progress1", false);
Label.SetVisible("Downloaded", false);
Label.SetVisible("ProgressDownloaded", false);
Image.SetVisible("Image4", false)
Image.SetVisible("Image1", false)
Audio.Load(CHANNEL_NARRATION, "AutoPlay\\Audio\\Voces\\Completado.mp3", true, false);
Dialog.Message("Completado", "Ha finalizado la instalación de los programas seleccionados", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end


En funciones globales solo tengo la de descarga y ya. Es posible tambien que cuando termine de instalar lo seleccionado el tree quede limpio? es que he mirado y nada que consigo que quede limpio osea sin que hubieran seleccionado algun programa a instalar, o que recargue la pagina como si entrara la primera vez a seleccionar.
Agradezco la ayuda de ustedes con respecto a esta duda que tengo y que no he podido solucionar.
Gracias.

Re: Señalizacion Programas

Publicado: 05 Jul 2016 10:40
por abood1987
you can put your apz ?
Todos los horarios son UTC+02:00
Página 1 de 1
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/