AMS - İni'den Show Popup Menu Oluşturma

mhhck

Kıdemli Üye
13 Nis 2009
3,597
3
K.IRAK


autoplay-media-studio-8-rapid-application-development.jpg


||| 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:
Üst

Turkhackteam.org internet sitesi 5651 sayılı kanun’un 2. maddesinin 1. fıkrasının m) bendi ile aynı kanunun 5. maddesi kapsamında "Yer Sağlayıcı" konumundadır. İçerikler ön onay olmaksızın tamamen kullanıcılar tarafından oluşturulmaktadır. Turkhackteam.org; Yer sağlayıcı olarak, kullanıcılar tarafından oluşturulan içeriği ya da hukuka aykırı paylaşımı kontrol etmekle ya da araştırmakla yükümlü değildir. Türkhackteam saldırı timleri Türk sitelerine hiçbir zararlı faaliyette bulunmaz. Türkhackteam üyelerinin yaptığı bireysel hack faaliyetlerinden Türkhackteam sorumlu değildir. Sitelerinize Türkhackteam ismi kullanılarak hack faaliyetinde bulunulursa, site-sunucu erişim loglarından bu faaliyeti gerçekleştiren ip adresini tespit edip diğer kanıtlarla birlikte savcılığa suç duyurusunda bulununuz.