Jump to content

Buraya Program Kurulum Kodu Gelecek


prototype
 Share

Recommended Posts

Şimdi arkadaşlar kuracak programı seçiyorum kur butonuna basınca "Kurulum Başarıyla Tamamlandı" uyarısı hemen geliyor ama bakıyorum program ondan sonra kuruluyor yani "Kurulum Başarıyla Tamamlandı" uyarısı program tam olarak kurulmadan çıkıyor. bunu nasıl ayarlayabilir lütfen yardım edin nolur..

Kullanmış olduğum kodlar bunlar;


[codebox]if c1 then -- eğer 1. checkbox seçili ise
-- buraya program kurulum kodu gelecek
Paragraph.SetText("Paragraph1", "Program Kurulumu Tamamlandı !") -- kurulum tamamlandı mesajı ver
Application.Sleep(2000) --2 saniye bekle (buna normalde gerek yok sadece görüntü için...)
result = File.Run("AutoPlay\\Docs\\programs\\5CCleaner.exe", "", "", SW_SHOWNORMAL, false);
Progress.StepIt("Progress1", 0, 100)
end[/codebox]

Kurulum kodu buraya gelcek yazan yere ne yazacağımm ? Edited by prototype
Link to comment
Share on other sites

[size="3"][font="Comic Sans MS"][b]Selam Kardeş Aşagıdaki gibi düzenlersen sorunun ortadan kalkar.[/b][/font][/size]

[codebox]if c1 then -- eğer 1. checkbox seçili ise
-- buraya program kurulum kodu gelecek
File.Run("AutoPlay\\Docs\\CheckBox1.exe", "", "", SW_SHOWNORMAL, true);
Progress.StepIt("Progress1", 0, 100)
Paragraph.SetText("Paragraph1", "Program Kurulumu Tamamlandı !") -- kurulum tamamlandı mesajı ver
end[/codebox]

[size="3"][font="Comic Sans MS"][b]kolay gelsin ...[/b][/font][/size]

Link to comment
Share on other sites

[quote]Progress.StepIt("Progress1", 0, 100)[/quote]

Bu kod hatalı, doğrusu şu şekilde olacak:

[quote]Progress.StepIt("Progress1")[/quote]

ama çalışma esnasında hata vermez sadece bilgi için söylüyorum.

Link to comment
Share on other sites

[quote name='KintaRo' date='25 June 2011 - 14:15 ' timestamp='1309004125' post='1035278']
Bu kod hatalı, doğrusu şu şekilde olacak:



ama çalışma esnasında hata vermez sadece bilgi için söylüyorum.
[/quote]


Teşekkürler abi.. ancak bişi sorucam mesela programları kur butonuna tıklayınca progres bar yavaş yavaş dolmadan direkt kurulum bitince doluyor yani ilerlemiyor kurulum bitince progres bar otomatik ful doluyor..

Link to comment
Share on other sites

[b]Bak Kardeş Diyelim Ki; 5 checkBox'lı AIO hazırlıyorsun.Kur Butuno ve Progress Bar ekledin.Progress bar'ın ilerlemesi için kur butununa;Aşagıdaki kodları yazacaksın
Kur Butonunu On Click Evresine;[/b][font="Comic Sans MS"][/font][size="2"][/size]

[codebox]c1 = CheckBox.GetChecked("CheckBox1")
c2 = CheckBox.GetChecked("CheckBox2")
c3 = CheckBox.GetChecked("CheckBox3")
c4 = CheckBox.GetChecked("CheckBox4")
c5 = CheckBox.GetChecked("CheckBox5")

---------------------------------------------
nToplam = 0;
for i=1,5 do
if CheckBox.GetChecked("CheckBox" .. i) then
nToplam = nToplam+1
end
end
---------------------------------------------
Progress.SetRange("Progress1", 0, nToplam)
Progress.SetCurrentPos("Progress1", 0)

---------------------------------------------

if c1 then
File.Run("AutoPlay\\Docs\\CheckBox1.exe", "", "", SW_SHOWNORMAL, true);
nPos = Progress.GetCurrentPos("Progress1")
Progress.SetCurrentPos("Progress1", nPos+1)
Paragraph.SetText("Paragraph1", "CheckBox1 kurulumu başarıyla tamamlandı.")
end
if c2 then
File.Run("AutoPlay\\Docs\\CheckBox2.exe", "", "", SW_SHOWNORMAL, true);
nPos = Progress.GetCurrentPos("Progress1")
Progress.SetCurrentPos("Progress1", nPos+1)
Paragraph.SetText("Paragraph1", "CheckBox2 kurulumu başarıyla tamamlandı.")
end
if c3 then
File.Run("AutoPlay\\Docs\\CheckBox3.exe", "", "", SW_SHOWNORMAL, true);
nPos = Progress.GetCurrentPos("Progress1")
Progress.SetCurrentPos("Progress1", nPos+1)
Paragraph.SetText("Paragraph1", "CheckBox3 kurulumu başarıyla tamamlandı.")
end
if c4 then
File.Run("AutoPlay\\Docs\\CheckBox4.exe", "", "", SW_SHOWNORMAL, true);
nPos = Progress.GetCurrentPos("Progress1")
Progress.SetCurrentPos("Progress1", nPos+1)
Paragraph.SetText("Paragraph1", "CheckBox4 kurulumu başarıyla tamamlandı.")
end
if c5 then
File.Run("AutoPlay\\Docs\\CheckBox5.exe", "", "", SW_SHOWNORMAL, true);
nPos = Progress.GetCurrentPos("Progress1")
Progress.SetCurrentPos("Progress1", nPos+1)
Paragraph.SetText("Paragraph1", "CheckBox5 kurulumu başarıyla tamamlandı.")
end
------------------------------------------------------------------------

Dialog.Message("Başarılı!", "Seçtiğiniz Programlar Başarıyla Kuruldu.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1)[/codebox]

Edited by Edit_Excellent
Link to comment
Share on other sites

kodlar evet dogru gecen verdiğim kodlar yalnız bu 54 checkbox için, 5 tane için su sekilde yapin :

[quote]---------------------------------------------
nToplam = 0;
for i=1,5 do
if CheckBox.GetChecked("CheckBox" .. i) then
nToplam = nToplam+1
end
end
---------------------------------------------[/quote]

Link to comment
Share on other sites

  • 3 years yıl...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...