Dialog.mesasage' De Evet Ve Hayır Seçeneği

[byhabit]

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?

[nightmare3519]

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

[byhabit]

Teşekkür ederim Deniyorum Sonucu yazarım

[byhabit]

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]

[nightmare3519]

--

 

Ne hatası alıyorsunuz onuda yazsanız?

Edited August 26, 2013 by nightmare3519

[nightmare3519]

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

[byhabit]

http://www.tnctr.com/uploads/imgs/pre_1377550092__ekran_alnts.jpg

[nightmare3519]

Tamam  üstteki mesajımda sorunun nedenini ve çözüm kodlarıyla beraber verdim kolay gelsin iyi kodlamalar :)

[byhabit]

Teşekkürler Düzeldi.