byhabit Posted August 26, 2013 Share Posted August 26, 2013 Bir komutu yürütttükten sonra Dialog.message'de Evet ve Hayır Seçeneği çıkartıp evet'e bastığımda farkı bir komut Çalıştırıp hayıra Basıncada uygulamadan çıkması için Ne yapmam gerekir? Quote Link to comment Share on other sites More sharing options...
nightmare3519 Posted August 26, 2013 Share Posted August 26, 2013 (edited) nSor = Dialog.Message("Notice", "Your message here.", MB_YESNO, MB_ICONINFORMATION, MB_DEFBUTTON1); if nSor == IDYES then --Evete basılınca çalışacak kodlar else --Hayır basılınca çalışacak kodlar end Kodu düzelttim bu şekilde kullanabilirsin Edited August 26, 2013 by nightmare3519 Quote Link to comment Share on other sites More sharing options...
byhabit Posted August 26, 2013 Author Share Posted August 26, 2013 Teşekkür ederim Deniyorum Sonucu yazarım Quote Link to comment Share on other sites More sharing options...
byhabit Posted August 26, 2013 Author Share Posted August 26, 2013 Hata aldım kodlara bakabilirmisiniz Sorun nerdedir? [spoiler]os = System.GetOSName(); if os == "Windows XP" then File.Run(_SourceFolder.."\\XP.exe", "", "", SW_SHOWNORMAL, true); nSor = Dialog.Message("Windows Ayar", "Yükeme Tamamlandı Sistem Yeniden Başatılsınmı?.", MB_YESNO, MB_ICONINFORMATION, MB_DEFBUTTON1); if nSor == IDYES then DLL.CallFunction("PC.dll", "SetPCPowerState", 4, DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL); else Application.Exit(0); end elseif os == "Windows 7" then if not System.Is64BitOS() then Registry.SetValue(HKEY_LOCAL_MACHINE, "Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\System", "EnableLUA", "00000000", REG_DWORD); Dialog.TimedMessage("Lütfen Bekleyin...", "Windows 7 UAC Denetimi Kapatılırken Lütfen Bekleyin.", 2000, MB_ICONINFORMATION); result = Dialog.Message("Başarılı!", "UAC Denetimi Başarıyla Devre Dışı Bırakıldı.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1); File.Run(_SourceFolder.."\\x86.exe", "", "", SW_SHOWNORMAL, true); nSor = Dialog.Message("Windows Ayar", "Yükeme Tamamlandı Sistem Yeniden Başatılsınmı?.", MB_YESNO, MB_ICONINFORMATION, MB_DEFBUTTON1); if nSor == IDYES then DLL.CallFunction("PC.dll", "SetPCPowerState", 4, DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL); else Application.Exit(0); end Registry.SetValue(HKEY_LOCAL_MACHINE, "Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\System", "EnableLUA", "00000000", REG_DWORD); Dialog.TimedMessage("Lütfen Bekleyin...", "Windows 7 UAC Denetimi Kapatılırken Lütfen Bekleyin.", 2000, MB_ICONINFORMATION); result = Dialog.Message("Başarılı!", "UAC Denetimi Başarıyla Devre Dışı Bırakıldı.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1); File.Run(_SourceFolder.."\\x64.exe", "", "", SW_SHOWNORMAL, true); nSor = Dialog.Message("Windows Ayar", "Yükeme Tamamlandı Sistem Yeniden Başatılsınmı?.", MB_YESNO, MB_ICONINFORMATION, MB_DEFBUTTON1); if nSor == IDYES then DLL.CallFunction("PC.dll", "SetPCPowerState", 4, DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL); else Application.Exit(0); end end[/spoiler] Quote Link to comment Share on other sites More sharing options...
nightmare3519 Posted August 26, 2013 Share Posted August 26, 2013 (edited) -- Ne hatası alıyorsunuz onuda yazsanız? Edited August 26, 2013 by nightmare3519 Quote Link to comment Share on other sites More sharing options...
nightmare3519 Posted August 26, 2013 Share Posted August 26, 2013 (edited) os = System.GetOSName(); if os == "Windows XP" then File.Run(_SourceFolder.."\\XP.exe", "", "", SW_SHOWNORMAL, true); nSor = Dialog.Message("Windows Ayar", "Yükeme Tamamlandı Sistem Yeniden Başatılsınmı?.", MB_YESNO, MB_ICONINFORMATION, MB_DEFBUTTON1); if nSor == IDYES then DLL.CallFunction("PC.dll", "SetPCPowerState", 4, DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL); else Application.Exit(0); end elseif os == "Windows 7" then if not System.Is64BitOS() then Dialog.TimedMessage("Lütfen Bekleyin...", "Windows 7 UAC Denetimi Kapatılırken Lütfen Bekleyin.", 2000, MB_ICONINFORMATION); result = Dialog.Message("Başarılı!", "UAC Denetimi Başarıyla Devre Dışı Bırakıldı.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1); File.Run(_SourceFolder.."\\x86.exe", "", "", SW_SHOWNORMAL, true); nSor = Dialog.Message("Windows Ayar", "Yükeme Tamamlandı Sistem Yeniden Başatılsınmı?.", MB_YESNO, MB_ICONINFORMATION, MB_DEFBUTTON1); if nSor == IDYES then DLL.CallFunction("PC.dll", "SetPCPowerState", 4, DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL); else Application.Exit(0); end else Registry.SetValue(HKEY_LOCAL_MACHINE, "Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\System", "EnableLUA", "00000000", REG_DWORD); Dialog.TimedMessage("Lütfen Bekleyin...", "Windows 7 UAC Denetimi Kapatılırken Lütfen Bekleyin.", 2000, MB_ICONINFORMATION); result = Dialog.Message("Başarılı!", "UAC Denetimi Başarıyla Devre Dışı Bırakıldı.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1); File.Run(_SourceFolder.."\\x64.exe", "", "", SW_SHOWNORMAL, true); nSor = Dialog.Message("Windows Ayar", "Yükeme Tamamlandı Sistem Yeniden Başatılsınmı?.", MB_YESNO, MB_ICONINFORMATION, MB_DEFBUTTON1); if nSor == IDYES then DLL.CallFunction("PC.dll", "SetPCPowerState", 4, DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL); else Application.Exit(0); end end end Böyle denermisiniz? if not System.Get64BitOS then ---windows 7 32 bit else--burayı unutmuşsunuz. --windows 7 64 bit end--ve burayı Edited August 26, 2013 by nightmare3519 Quote Link to comment Share on other sites More sharing options...
byhabit Posted August 26, 2013 Author Share Posted August 26, 2013 http://www.tnctr.com/uploads/imgs/pre_1377550092__ekran_alnts.jpg Quote Link to comment Share on other sites More sharing options...
nightmare3519 Posted August 26, 2013 Share Posted August 26, 2013 Tamam üstteki mesajımda sorunun nedenini ve çözüm kodlarıyla beraber verdim kolay gelsin iyi kodlamalar :) Quote Link to comment Share on other sites More sharing options...
byhabit Posted August 26, 2013 Author Share Posted August 26, 2013 Teşekkürler Düzeldi. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
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.