منع السحب والافلات أثناء عمل التجميعية

[ثامر أبو بلقيس]

السلام عليكم
تعلمت ذات يوم من الأستاذ هيثم كيفية منع
السحب و الافلات أثناء عمل التجميعية قد تضاف مع منع النسخ
و اللصق لتشكلا منظومة حماية مقبولة على كل :
لو تجرب مثلا و تضغط على أي ملف موجود على سطح المكتب
وتقوم بسحبه أثناء عملية السحب اضغط على زر echap
ستلاحظ أن الإفلات يتم اجباريا من هنا جاءت الفكرة و لتطبيقها
في تجميعياتك نقوم بالآتي :
في البداية نقوم بتفعيل البليجين LuaCom
ثم في الحدث on show
Page.StartTimer(100, 1);
في on timer
if System.IsKeyDown(1) then
WScript= luacom.CreateObject("WScript.Shell")
WScript:SendKeys("{ESC}")
end
---------------------------------
if System.IsKeyDown(2) then
WScript= luacom.CreateObject("WScript.Shell")
WScript:SendKeys("{ESC}")
end

بعد معاينة المشروع ستلاحظ أن عملية السحب و الافلات
ممنوعة إلى غاية إغلاق التجميعية :abc_138:

[فرح صالحي]

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

[عبود عبود]

شكــــــرا جزيلا ............ جزاك الله خيـــــرا

:abc_022:

[ثامر أبو بلقيس]

شكرا على المرور الطيب أخي صالحي :abc_138:

:abc_080:

:abc_080:

[ثامر أبو بلقيس]

شكرا أخي عبود :abc_152:

[امل الماضي]

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

[abohmam]

بارك الله فيك أخى ابا بلقيس

جزاك الله خيرا على هذا الملف الرائع

:abc_022:

[فرح صالحي]

السلام عليكم ورحمة الله وبركاته
هذه باكورة التجربة اخي ثامر
http://www.gulfup.com/?J10OK6
لا اعرف ان كنت اخترت الملف المناسب ام لا .... ربما هناك تعارض بين الاوامر لا اعرف
في انتظار الفحص والتقييم .......
سلامي

[ثامر أبو بلقيس]

شكرا أخي صالحي مثالك لو نريد عنونته
فهو السماح للسحب و الافلات داخل التجميعية و منعه
خارجها

المهم دعني أخبرك أن منع عملية السحب و الافلات و منعها
أثناء عمل التجميعية تستعملها مثلا عندك عمل محفوظ بصيغة exe
بعد اشتغاله سيفك في التومب
بفرض أنك منعت النسخ و اللصق لكن عندما يسحب أحد الملفات و يفلت يتم استخلاصه
فبهذه الأكواد تدعم عملك لتمنع كذلك السحب و الافلات بالماوس

موفق :abc_022:

[فرح صالحي]

السلام عليكم ورحمة الله وبركاته
شكرا على الايضاحات اخي ثامر .
جازاك الله عنا كل خير
في رعاية الله اتركك

[أبو يوسف]

جزاك الله خيرا اخانا أبا بلقيس:abc_152: وبارك الله فيك

[الهمام]

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

[الحارث بن فيصل]

خالص الشكر والامتنان على ما بذلتموه من جهود مباركة

[ثامر أبو بلقيس]

مرور عطر :abc_138: