||| indirme linki |||
İni Sections'larıo sıra ile giderse sorunsuz çalışır. Yani:
[1]
[2]
[3]
...
şeklinde, örnekteki ini ye bakarsınız.
Projeyi indirmeye üşenenler için kodlar:
Kod:
[COLOR="Olive"]if e_Type == 2 then
sections = INIFile.GetSectionNames(_SourceFolder .. "\\AutoPlay\\Docs\\menu.ini");
if sections then
tblMenu = {}; -- menu tablosu
ayrac = false;
sayi = 1;
for i,v in pairs(sections) do
metin = INIFile.GetValue(_SourceFolder .. "\\AutoPlay\\Docs\\menu.ini", v, "metin");
link = INIFile.GetValue(_SourceFolder .. "\\AutoPlay\\Docs\\menu.ini", v, "link");
icon = INIFile.GetValue(_SourceFolder .. "\\AutoPlay\\Docs\\menu.ini", v, "icon");
icon = String.ToNumber(icon) -- sayıya çevir
seperator = INIFile.GetValue(_SourceFolder .. "\\AutoPlay\\Docs\\menu.ini", v, "seperator");
if seperator == "true" then
ayrac = true;
else
ayrac = false;
end
tblMenu[sayi] ={};
tblMenu[sayi].Text = metin;
tblMenu[sayi].ID = i;
tblMenu[sayi].IconID = icon;
tblMenu[sayi].Checked = false;
tblMenu[sayi].Enabled = true;
if ayrac == true then
sayi=sayi+1;
tblMenu[sayi] ={};
tblMenu[sayi].Text = "---";
tblMenu[sayi].ID = 100;
tblMenu[sayi].IconID = icon;
tblMenu[sayi].Checked = false;
tblMenu[sayi].Enabled = true;
end
sayi=sayi+1;
end
nRes = Application.ShowPopupMenu(e_X, e_Y, tblMenu, TPM_LEFTALIGN, TPM_TOPALIGN, true, true);
if nRes ~= -1 and nRes ~= 0 then
link = INIFile.GetValue(_SourceFolder .. "\\AutoPlay\\Docs\\menu.ini", nRes, "link");
File.OpenURL(link, SW_SHOWNORMAL)
end
end
end [/COLOR]
Son düzenleme: