مشكلة:كيف يمكن سحب و تحريك label إلى فوق الصورة من خلال عملية السحب والإفلات؟

مغلق

بدأه computeach في 9 مارس 2007 · 2 رد · 620 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات

مشاركة: واتساب X فيسبوك تيليجرام

#19 مارس 2007 في 02:10 صاحب الموضوع

عندي مشكلة في عملية drag and drop والرجاء المساعدة

form تحتوي على label في بداية form

و imageBox في نهاية form

كيف يمكن سحب و تحريك label إلى فوق الصورة من خلال عملية السحب والإفلات؟

مع العمل استخدمت الكود التالي:

خصائص label

dragMode=1

Private Sub image1_DragDrop(Source As Control, X As Single, Y As Single)

Source.Move X, Y

End Sub

وعند عمل run لاحظت:

عند سحب label فوق الصورة يتحرك النص إلى أعلى اليسار بالرغم من أن الصورة موجودة في أسف الصفحة.

الرجاء المساعدة لأني متعطلة بسبب هذه المشكلة.

تم تعديل هذه المشاركة بواسطة computeach في 9 مارس 2007 في 02:16

#29 مارس 2007 في 02:58

جربي هذا الكود

Private Sub image1_DragDrop(Source As Control, X As Single, Y As Single)
Source.Move X + Image1.Left, Y + Image1.Top
End Sub

تم تعديل هذه المشاركة بواسطة _Voodoo_ في 9 مارس 2007 في 03:00

Ali Sayed

#311 مارس 2007 في 01:56

1000 شكرا

فعلا أنحلت المشكلة

هذا الموضوع مغلق.

عدد الزوار حالياً