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

مشاهدة النسخة كاملة : سؤال مقلوب !!!!


سعيدون
17-02-2015, 01:33 PM
السلام عليكم اخواني
تعرفون جميعا انه يمكن تعويض الازار التي ندرجها على الاوتوبلاي بما يعادلها من قيم في الكيبورد مثلا e_key == 13 تعادل enter وهكذا أنا فكرت ان افعل العكس بمعنى ان قيمة الزر على الكيبورد تتحول عندما اضغط على ازرار مشروعي الافتراضي على الاوتوبلاي
المشكل واضح اعتقد فهل من سبيل الى ذلك؟؟
ولكم الشكر الجزيل

ثامر أبو بلقيس
17-02-2015, 01:43 PM
السلام عليكم ورحمة الله وبركاته

في حدث الصفحة مثلا و في on key

أكتب

if e_Key~= "" then
Dialog.Message("Notice", e_Key);
end

عند المعاينة اضغط على ازرار لوح المفاتيح هل الناتج هو المطلوب ؟

سعيدون
17-02-2015, 01:55 PM
السلام عليكم ورحمة الله وبركاته

في حدث الصفحة مثلا و في on key

أكتب

if e_Key~= "" then
Dialog.Message("Notice", e_Key);
end

عند المعاينة اضغط على ازرار لوح المفاتيح هل الناتج هو المطلوب ؟


اخي ابو بلقيس غرضي هو التالي
ان اضيف ازرار للحاسبة التي بداتها كمشروع
وفكرت في كيفية اعطاء قيمة واحد للز واحد و اثنان للزر اثنان وهكذا
فكان الكود هو التي:
if x ==0 and
e_key == 49 then
Input.SetText("Input1", e_key);
x=1;
else
Input.SetText("Input1", "");
end

لعلي قد وفت الشرح حقه
بارك الله فيك
خذ بعين الاعتبار انني مبندئ

ثامر أبو بلقيس
17-02-2015, 02:11 PM
السلام عليكم ورحمة الله وبركاته

أخي بدون أكواد لديك مشروع فيه انبوت جيد

لماذا أكتب معادلة عندما اضغط على المفتاح 49 أو 97 حتى يكتب رقم 1 في الانبوت؟؟

ها مباشرة يحقق ذلك بمجرد أن أضغط على المفتاح يكتب 1 في الانبوت المفعل

في الحقيقة لم أفهم المطلوب أو ماذا تريد بالضبط

المـهاجر
17-02-2015, 02:26 PM
إذا كنت تعانى من عدم تفعيل الإنبوت فى التوقيت المناسب
Page.SetFocus("Input1");
ضعها فى زر الناتج =
و زر عملية جديدة c

ياسرهتهت
17-02-2015, 04:20 PM
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
اخي سعيدون
انت تريد ان يكتب الزر القيمة المكتوبة عليه في الانبوت
مثل الاله العادية

شاهد الملف في المرفقات محاولة مبتدء :abc_102:

موفق بإذن الله ... لك مني أجمل تحية .

ثامر أبو بلقيس
17-02-2015, 04:35 PM
السلام عليكم ورحمة الله وبركاته

بارك الله فيك أخي ياسر في ملفك في زر =

امسح المكتوب و غيره بــ
s = Input.GetText("Input1");
Input.SetText("Input1",s.."="..loadstring(string.format("return %s",s))());


وحاول رفع ملف ينفذ الكتابة البرمجية :abc_138:

ياسرهتهت
17-02-2015, 05:28 PM
بسم الله الرحمن الرحيم
شكراً جزيلاً استاذنــــا العزيز (ابو بلقيس)
علي هذا التعديل والمعلومة المفيدة
المهم استاذي الكريم من اين جاء هذا الكود ؟ وكيف ؟
Input.SetText("Input1",loadstring(string.format("return %s",s))());

اقصد هل من الممكن شرحه ؟

فكما تلاحظ استاذي غير موجود في string


http://im46.gulfup.com/QeoQbq.png


الموضوع يحتاج بعض الشرح البسيط لو امكن ذالك ؟


==============================
هذا الملف المفتوح بعد التعديل

http://www.gulfup.com/?XJxZbR

ولقد استخدمت الجزء الاخير من الكود فقط

Input.SetText("Input1",loadstring(string.format("return %s",s))());

حتي لا يحدث خطأ اثناء استمرار العمليات بعد الضغط علي =
-----------------------------------------------------------------------------

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .
:abc_152::abc_152::abc_152:

ثامر أبو بلقيس
17-02-2015, 05:46 PM
السلام عليكم ورحمة الله وبركاته
الكود اذ عرجت على الاستفسارات
تجده هنا
لشخص يتحدث مع نفسه
http://www.abc4web.net/vb/showthread.php?t=30615

وتجد موازي له في الشروحات
هنا
http://www.abc4web.net/vb/showthread.php?t=30727

نعم لا يوجد هذا الكود و مثله المئات في البرنامج

أحاول منذ مدة ضخ أكواد lua في الموقع على شكل تمرينات
أو معلومات أو حلول تطبيقية كوني لا أحبذ الشروخات :abc_138:

ياسرهتهت
17-02-2015, 08:21 PM
بسم الله الرحمن الرحيم

شكرا لك استاذي الكريم
:abc_152::abc_152::abc_152:

سعيدون
17-02-2015, 09:20 PM
مسرور بهذه الردود الساخنة والمفيدة
بارك الله فيكم جميعا ايها النبهاء
تواجدكم __مدرسة __قائمة بذاتها
شكرا لكم جميعا على التفاعل المجدي
:abc_152::abc_152::abc_152:

ثامر أبو بلقيس
19-11-2015, 08:40 PM
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .