+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [سؤال] رسم نقطة والضغط عليها (/showthread.php?tid=237)
رسم نقطة والضغط عليها - اسلام الكبابى - 22-09-13
أعلم أن كود رسم نقطة هو مثلآ
كود :
PSet(30,20), vbRed
Form1.DrawWidth = 5[b]كما أعلم أن هناك أداة تسمى shape[/b][/b]
[b]ويمكن التحكم فى شكلها ولونها بحيث تكون عبارة عن دائرة صغيرة(نقطة) بالكود التالى
[/b]
كود :
Shape1.Shape = 3
Shape1.Height = 5: Shape1.Width = 5
Shape1.BorderColor = vbRed[b]ولكنى أريد كتابة كود معين عند ضغط المستخدم على هذه النقطة أو هذا ال shape
تمامآ كما نكتب كود عند ضغط المستخدم على أى text أو label
[/b]
RE: رسم نقطة والضغط عليها - asto - 23-09-13
لا يمكن ذلك افضل شي استخدام بكتشر داخله شكل النقطة
RE: رسم نقطة والضغط عليها - samee119485r - 23-09-13
السلام عليكم
ستخدم اليبل مع الاداه
وهاذا مثال
RE: رسم نقطة والضغط عليها - اسلام الكبابى - 24-09-13
الله ينور عليك 100%
فعلآ عمل المطلوب
RE: رسم نقطة والضغط عليها - اسلام الكبابى - 28-09-13
وكيف يمكن ذلك بعد ربط الفيجوال بيسك6 بالأوتوكاد
أى كيف يمكن بعد رسم شبكة المحاور الأفقية والرأسية فى صفحة الأوتوكاد
عمل أى كود يحدث عند ضغط المستخدم على نقطة من نقط تقاطعات المحاور
وليس على أى نقطة فى الصفحة
مثلآ كود يكتب "100" داخل الTEXT1
[/code]Text1.Text = 100
RE: رسم نقطة والضغط عليها - اسلام الكبابى - 20-10-13
ألا يمكن ذلك؟