إنضمامك إلي منتديات استراحات زايد يحقق لك معرفة كل ماهو جديد في عالم الانترنت ...

انضم الينا
استراحات زايد الصفحة الرئيسية

         :: قهوجي جده صبابين قهوه قهوجيين 0539307706 (آخر رد :ksa ads)       :: تفسير أحلام المطر عند ابن شيرين في المنام (آخر رد :نوران نور)       :: تداول الأسهم (آخر رد :محمد العوضي)       :: أهمية التداول والأسهم: (آخر رد :محمد العوضي)       :: ولي العهد في المنام (آخر رد :نوران نور)       :: تفسير الأحلام حول النار في المنزل (آخر رد :نوران نور)       :: قهوجي وصبابين قهوه ارقام قهوجيات في جدة 0552137702 (آخر رد :ksa ads)       :: تفسير حلم الرضاعة للمتزوجة لابن سيرين (آخر رد :نوران نور)       :: أبواب الألمنيوم الخارجية في مصر من الوسولوشن حلّ مثالي للأناقة والأمان (آخر رد :احمد عبدالخالق 15)       :: المواد العطرية من الأراضي (آخر رد :اسماعيل رضا)      

إضافة رد
 
LinkBack أدوات الموضوع انواع عرض الموضوع
  #1  
قديم 08-05-2019, 06:43 AM
عضو ماسي
بيانات محروم.كوم
 رقم العضوية : 503
 تاريخ التسجيل : Dec 2007
الجنس : female
علم الدوله :
 المشاركات : 2,100,612
عدد الـنقاط :3341
 تقييم المستوى : 2139

<div>لى سؤال بسيط بعد ربط الأوتوكاد بالفيجوال بيسك6
ما هو الكود اللازم لمعرفة احداثيات نقطة بداية مستقيم مرسوم ونقطة نهايته

هذا الكود نقلته من أحد المواضيع لمعرفة بعض خصائص مستقيم مرسوم
واشتغل معى تمام
كود PHP:
Private Sub Command4_Click()
Dim acadapp As AcadApplication
Dim newssett
As AcadSelectionSet
Dim obj3
As AcadEntity
Set newssett
= acadapp.ActiveDocument.SelectionSets.Add("kkkkk")
newssett.SelectOnScreen
For Each obj3 In newssett
If obj3.ObjectName = "AcDbLine" Then
Print " طول المستقيم "; obj3.Length
Print "زاوية ميله بالتقدير الدائرى "; obj3.angle
End
If
Next obj3
acadapp
.ActiveDocument.SelectionSets.Item("kkkkk").Delete

End Sub



ولما حاولت اضافة الجملتين التاليتين فى هذا الكود لمعرفة احداثيات نقطة بداية المستقيم ونقطة نهايته مع طوله وزاوية ميله
اعترض البرنامج
كود PHP:
Print "نقطة بدايته"; obj3.STARTX; obj3.STARTY
Print "نقطة نهايته"; obj3.ENDX; obj3.ENDY


فما هو الكود اللازم لمعرفة احداثيات نقطة بداية هذا المستقيم (الذى أشار اليه المستخدم فى صفحة الأوتوكاد) ونقطة نهايته
ولكم ألف شكر

__DEFINE_LIKE_SHARE__
رد مع اقتباس
إضافة رد

مواقع النشر (المفضلة)


تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code is متاحة
كود [IMG] متاحة
كود HTML معطلة
Trackbacks are متاحة
Pingbacks are متاحة
Refbacks are متاحة


المواضيع المتشابهه
الموضوع كاتب الموضوع المنتدى مشاركات آخر مشاركة
برنامج فحص حالة التسجيل في منتدى نقطة التطوير , تنبية عند فتح التسجيل فى نقطة التطوير محروم.كوم منتدى أخبار المواقع والمنتديات العربية والأجنبية 0 07-06-2015 11:40 PM
الأسهم السعودية تغلق مرتفعة بـ25 نقطة عند مستوي 8156.77 نقطة محروم.كوم منتدى أخبار المواقع والمنتديات العربية والأجنبية 0 08-19-2013 02:00 PM
#Bahrain 54نسيج | السهلة الشمالية | أحذر .. نقطة تفتيش !! نقطة تفتيش ح محروم.كوم منتدى أخبار المواقع والمنتديات العربية والأجنبية 0 07-17-2012 04:10 AM
نسيج | نقطة تفتيش على الهاي وي قرب أنصار جاليري و نقطة تفتيش أخرى قرب محروم.كوم منتدى أخبار المواقع والمنتديات العربية والأجنبية 0 05-03-2012 01:50 AM
سوق مسقط: المؤشر يرتفع 17 نقطة(+0.3%) عند مستوى 6,655 نقطة محروم.كوم منتدى أخبار المواقع والمنتديات العربية والأجنبية 0 03-10-2010 11:00 PM


الساعة الآن 05:21 PM


Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Content Relevant URLs by vBSEO 3.5.2 TranZ By Almuhajir

RSS RSS 2.0 XML MAP HTML