bu kodlar elinde mevcutmu peki sen kodları bana versen bven gereken yerlere yerleştirsem kodları ? nSayi = 0;
function sec(sObject, sName)
bChecked = CheckBox.GetChecked(sObject)
if bChecked then
INIFile.SetValue("Autoplay\\Docs\\kurulum.ini", sName, "kur", "1")
nSayi = nSayi+1
Label.SetText("sayi", nSayi .. " adet program seçildi")
else
INIFile.DeleteSection("Autoplay\\Docs\\kurulum.ini", sName)
nSayi = nSayi-1
Label.SetText("sayi", nSayi .. " adet program seçildi")
end
end
function kontrol()
Label.SetText("sayi", nSayi .. " adet program seçildi")
tSections = INIFile.GetSectionNames("AutoPlay\\Docs\\kurulum.ini")
if tSections ~= nil then
for i=1,100 do
for y in pairs(tSections) do
if CheckBox.GetText("CheckBox" .. i) == tSections[y] then
CheckBox.SetChecked("CheckBox" .. i, true)
end
end
end
else
for i=1,100 do
CheckBox.SetChecked("CheckBox" .. i, false)
end
end
end
function kur()
tTablo = INIFile.GetSectionNames("AutoPlay\\Docs\\kurulum.ini")
if tTablo ~= nil then
Window.Hide(Application.GetWndHandle())
StatusDlg.SetMeterRange(0, Table.Count(tTablo))
StatusDlg.SetMeterPos(0)
for i in pairs(tTablo) do
if INIFile.GetValue("AutoPlay\\Docs\\kurulum.ini", tTablo[i], "kur") == "1" then
nPos = StatusDlg.GetMeterPos()
StatusDlg.SetMeterPos(nPos+1)
nPos=nPos+1
StatusDlg.Show(MB_ICONINFORMATION, false);
StatusDlg.SetTitle("Programlar kuruluyor...");
StatusDlg.SetMessage("%" .. Math.Round(100/nSayi*nPos, 0) .. " | " .. tTablo[i] .. " Kuruluyor...")
File.Run("AutoPlay\\Docs\\Programlar\\" .. tTablo[i] .. ".exe", "", "AutoPlay\\Docs\\Programlar", SW_SHOWNORMAL, true)
Application.Sleep(1000)
StatusDlg.SetMessage(tTablo[i] .. "Kuruldu!")
end
end
File.Delete("AutoPlay\\Docs\\kurulum.ini", false, false, false, nil)
StatusDlg.SetMeterPos(0)
Label.SetText("sayi", 0 .. " adet program seçildi")
for i=1,100 do
CheckBox.SetChecked("CheckBox" .. i, false)
end
StatusDlg.Hide()
Dialog.Message("Kurulum", "Seçilen " .. nSayi .. " programın kurulumu tamamlandı", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1)
nSayi = 0;
Window.Show(Application.GetWndHandle())
else
Dialog.TimedMessage("Hata", "Hiç bir program seçilmedi!", 1000, MB_ICONEXCLAMATION)
end
end
Bunlar Kullandıgım Global Functions kodları bunlardamı sorun var ?