سطح المكتب
موضوع منقول من المنتدي القديم
الكاتب: أبو هادي
سطح المكتب ؟
السلام عليكم
الأخوة الكرام .. هل من الممكن عمل فورم يحتوي على أيقونات icons غير ثابتة أي يمكن ترحيكها وتغيير مواقعها كما هو سطح المكتب للويندوز .
آمل سرعة الرد للأهمية ولكم خالص شكري وتحياتي .
أبو حمود
نظريا اعتقد أنه ممكن ولكن تحتاج :
اولا لإدراج صور الأيقونات على النموذج
ثانيا تحتاج لكود لتتبع موقع الفأرة
ثالثا عند النقر على بالفأرة على أي أيقونة يشتغل حدث المؤقت ويقوم بنقل موقع الأيقونة التي تم النقر عليها الى مكان الفارة الحالي ولاينتهي النقل حتى ينقر على الأيونة مرة اخرى
هذه فكرة واعتقد أنه غير مشابهه لطريقة الوندوز
لكن اعتقد أن هذا الأمر متاح باستخدام دوال API ولكن كيف لا اعرف
ولك تحياتي
أبو هادي:
حيالك الله أخي أشرف
وشكرا لك أخي أبوحمود
هذا مثال شبيه لفكرة أبوحمود :
http://mypage.ayna.com/abbashmd/Desktop.zip
عند النقر على يمين الفأرة تنشط الأيقونة للتحرك ثم ينقر على الفورم للموقع الجديد بيسار الفأرة أو على نفس الأيقونة لإلغاء التنشيط .
ينقص الفكرة كيفية حفظ التعديلات بالفورم .. آمل المساهمة .
وللجميع خالص شكري وتحياتي
محمد طاهر:
السلام عليكم
أخي العزيز
حاولت بعض المحاولات للتحريك و لكنها ليست ناجحة بدرجة كافية
و لكن تم التحريك معي عن طريق حركة الماوس ب
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
Image1.Move (X), (Y)
End Subو لكن الحركة ليست كما تصورتها و لكن كلما أحرك الماوس حركة شديدة تبدأ الصورة فى التحرك
و أعتقد أنه يجب اقحام خواص ال
left , TOp
للصورة و الفورم فى الموضوع ليعمل بنجاح
أبو هادي :
مثال آخر بطريقة مختلفة عن الأولى وشبيهة جدا لسطح المكتب
http://mypage.ayna.com/abbashmd/Desktop2.zip
مع العلم أنه لا يزال موضوع حفظ التغييرات معلقا ويحتاج إلى مساهماتكم الكريمة .
حارث :
مشاركة تعتمد على حفظ التغييرات في جدول
