المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : اضافة فعل جديد الى هذه الدالة


الفهد الصياد
15-04-2013, 03:22 PM
-- Get the user's display information.
display = System.GetDisplayInfo();

if (display ~= nil) then
-- If the user's running less than 1024 x 768, display a dialog.
if (display.Height < 768) then
Dialog.Message("Notice", "Your resolution is currently set to

"..display.Width.." x "..display.Height..".\r\n"..
"You must have at least 1024 x 768 to view this application

properly.", MB_OK, MB_ICONINFORMATION);
end
end

هذة الدالة تقوم بقراءة دقة الشاشة وتعطى رسالة تنبية ان كانت الدقة اقل من 1024*768 قبل بدء المشروع
ما اطلبة اضافة امر لها يغلق المشروع تماما بعد الضغط على ok فى الرسالة الى حين تغيير الدقى الى 1024*768 فهل هذا ممكن.... ولكم جزيل الشكر

ثامر أبو بلقيس
15-04-2013, 03:44 PM
-- Get the user's display information.
display = System.GetDisplayInfo();

if (display ~= nil) then
-- If the user's running less than 1024 x 768, display a dialog.
if (display.Height < 768) then
Dialog.Message("Notice", "Your resolution is currently set to"..display.Width.." x "..display.Height..".\r\n".."You must have at least 1024 x 768 to view this applicationproperly.", MB_OK, MB_ICONINFORMATION);
Application.Exit(0);

end
end

الفهد الصياد
15-04-2013, 08:41 PM
خالص ودى وامتنانى على سرعة الرد