الرسم في الدلفي

[King Soft]

الرسم في دلفي :
ويمكننا Timage والعنصر TForm وهو أحد خصائص العنصر Canvas يتم الرسم في دلفي فوق عنصر الكنفا
رسم عدد من الأشكال الهندسية بواسطة توابع معرفة فوق عنصر الكنفا .
رسم مستقيم :
لرسم مستقيم يجب تحديد نقطة البداية ونقطة للنهاية
هما إحداثيات نقطة x,y حيث

Form1.Canvas.MoveTo(x,y)

أ يتم تحديد نقطة البداية عن طريق التعليمة
البداية، إذا أردت من المستخدم أن يحدد نقطة البداية عن طريق الضغط على زر الفأرة فوق النموذج ضع هذه. للنموذج 1 التعليمة في الحدث OnMouseDown
ب يتم تحديد نقطة النهاية للمستقيم ضمن تعليمة رسم مستقيم وهي

 (Form1.Canvas.LineTo(x,y

حيث x هي احداثيات left و y هي احداثيات top

هما إحداثيات نقطة النهاية لمستقيم ، وإذا أردت أن يتم رسم المستقيم في المكان الذي يحرر فيه المستخدم زر
الفأرة ضع هذه التعليمات في الحدث OnMouseUp
نفذ الآن البرنامج واضغط على مؤشر الفأرة وأبقه مضغوطًا ثم حرك الفأرة إلى مكان جديد وحرر زر الفأرة ،
سيظهر عندها خط مستقيم بين نقطتي البداية والنهاية .
والذي يحدث أثناء OnMouseMove لإظهار الخط أثناء تحريك الفأرة ضع التعليمة التالية ضمن الحدث
تحريك الفأرة

Form1.Canvas.LineTo(x,y);

[miloudgrini]

شكرا جزيلا

[ABDELBAKI39]

جزاك الله خيرا اخي

[mebarkimouaadh]

هذا خطأ اخي الكريم ادرس لغة الدالفي جيدا

[w.imane]

شكررررررررررررا

[King Soft]

المشاركة الأصلية كتبت بواسطة mebarkimouaadh

هذا خطأ اخي الكريم ادرس لغة الدالفي جيدا

اين يكمن الخطا اخي