أرجو من جميع من لديه الخبرة ان يجيبني للضرورة
اريد textbox مثل هذه اي تعطي حرية التحرك الحمل والاسقاط
وجزاكم الله كل خير
السلام عليكم ورحمة الله
أهلاً أخي الكريم :happy:
بدآية أقول لك لو بحثت في النت لكنت ستجد ضآلتك إن شآء الله :)
لكن لا بأس
يمكنك تصميم نفس الأدآة يعني تكبيرهآ وتصغيرهآ وذلك بوضع مربعآت صغيرة على الجوآنب ومن أضف كود التعديل على حجم الادآة
ستجد خآصية في التكست بوكس إبحث عنهآ وهي المسؤولة عن حجمه
بخصوص الحمل والإسقآط لا اعرف الطريقة لذلك لكن يمكنك ان تضع Dialog فيه 2 تكست بوكس ليحدد المستخدم مكآن الأدآة
أو يمكنك وضع زر الرفع وزر التحريك لليمين والشمآل و .....
والله اعلم
بالتوفيق لك
عليك إتقآن اللغة قبل ان تعلمهآ
من يريد ان يتعلم البرمجة فليمسح رآبط ستآر من ذآكرته
عفوا يا استاذ ليس المطلوب الذي تكلمت عنه هذه التكست تكون موضوعة عند العميل هو يحركها ويكبرها ويصغرها كيفما شاء
ارجوكم ان تجاوبوني والله مضطرة كثيرررررررر
السلام عليكم و رحمه الله و بركاته
هذا لعملية النقل
لدينا فورم بها صندوق نص اسمه textbox1
اجعل الخاصية AllowDrop للفورم تساوي True
ثم أضف هذا الكود
Dim isMove As Boolean = False
Private Sub TextBox1_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles TextBox1.MouseMove
If e.Button = Windows.Forms.MouseButtons.Left Then
TextBox1.DoDragDrop(TextBox1, DragDropEffects.Move)
isMove = True
End If
End Sub
Private Sub form1_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles Me.DragDrop
isMove = False
End Sub
Private Sub form1_DragEnter(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles MyBase.DragEnter
e.Effect = DragDropEffects.Move
End Sub
Private Sub form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove
If isMove = True Then
TextBox1.Location = e.Location
isMove = False
End If
End Subو المثال في المرفقات
و الله اعلم
شكرا على اجابتك ولكن ليس هذا المطلوب تماما اريد نقاط الارتكاز تظهر حتى يستطيع المستخدم تكبير وتصغير التكست كيفما يشاء
ارجو الرد وشكرا
الا يوجد الرد
شكرا لك جاري التجربة ولكن اريد منك شي اخر ارجوك ان تعطيني كود كيف احرك textbox بالاسهم وكود تحريكها بالماوس وجزاك الله كل خير وحقق لك ماتتمناه
تم تعديل هذه المشاركة بواسطة chica في 27 أبريل 2010 في 16:55
معليش ماني فاهم