إعـــــــلان

**المـهاجر المـهاجر** · 16-04-2017, 05:03 PM

جرب

كود:

function ini2list(x)
a = INIFile.GetSectionNames(x);
count = Table.Count(a);
if count ~= 0 then
for i=1 , count do
txt = INIFile.GetValue(x, "item" .. i, "txt");
data = INIFile.GetValue(x, "item" .. i, "data");
result = ListBox.AddItem("ListBox1", txt, data);
end
end  
end

ListBox.DeleteItem("ListBox1", -1);
iniPath = File.Find(_SourceFolder.."\\autoplay\\docs\\", "*.ini", false, false, nil, nil);
for A,Z in pairs (iniPath) do
ini2list(Z)
end

موفق

**ياسرهتهت ياسرهتهت** · 16-04-2017, 06:08 PM

المشاركة الأصلية بواسطة المـهاجر مشاهدة المشاركة

جرب

كود:

function ini2list(x)
a = INIFile.GetSectionNames(x);
count = Table.Count(a);
if count ~= 0 then
for i=1 , count do
txt = INIFile.GetValue(x, "item" .. i, "txt");
data = INIFile.GetValue(x, "item" .. i, "data");
result = ListBox.AddItem("ListBox1", txt, data);
end
end  
end


ListBox.DeleteItem("ListBox1", -1);
iniPath = File.Find(_SourceFolder.."\\autoplay\\docs\\", "*.ini", false, false, nil, nil);
for A,Z in pairs (iniPath) do
ini2list(Z)
end

موفق

-

------------------------------------
----------------------------------------
بسم الله الرحمن الرحيم
شكرا لك استاذ المهاجر

شـكــ وبارك الله فيك ـــرا لك
لك مني أجمل تحية .

**المـهاجر المـهاجر** · 17-04-2017, 03:11 PM

على الرحب و السعة

إعـــــــلان

ســــــؤال بخصوص (INIFile.GetSectionNames )؟

ســــــؤال بخصوص (INIFile.GetSectionNames )؟

تعليق

تعليق

تعليق

مواضيع تهمك