بسم الله الرحمن الرحيم
مشكور أخ وسام والله يعطيك الصحة والعافية
كنت أتمنى ألا يقتصر العمل على وضع الكود البرمجي بل يتخطى إلى شرح هذا الكود
فمثلاً متى نستخدم كل عبارة وما هي أهميتها
ما هو
IMxDocument, IMap, IEnumLayer
ومتى نستخدمهم ؟
فسابقاً كنا نعرف متغير ما X من نوع Integer
أما الآن فنعرف متغير pMxDoc من نوعIMxDocument
ما هو هذا النوع وهل هناك أنواع أخرى من نفس النمط يمكن الاستفادة منها؟
يعني نريد دروس من نوع (لا تعطيني سمكة ولكن علمني كيف أصطاد)
Dim pMxDoc As IMxDocument
Set pMxDoc = ThisDocument
Dim pMap As IMap
Set pMap = pMxDoc.FocusMap
Dim pLayer As ILayer
Dim pMapLayers As IEnumLayer
Set pMapLayers = pMap.Layers
Set pLayer = pMapLayers.Next
Do Until pLayer Is Nothing
MsgBox pLayer.Name
Set pLayer = pMapLayers.Next
Loop
وجزاكم الله كل خير
رد مع اقتباس