找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 1445|回复: 0

ActiveX/VBA Technical Newsletter - October 1999

[复制链接]

已领礼包: 145个

财富等级: 日进斗金

发表于 2002-1-7 01:58:33 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
ActiveX/VBA Technical Newsletter - October 1999  
This document is part of    AutoCAD VB(A) Newsletter Archive     



Dear AutoCAD ActiveX/VBA Developer,

==============================
/Note: the URL in this posting may be broken into several lines by the
transmission media. Please make sure that you have the full URL before
trying to access it./

Table of Contents
=================
1. Introduction
2. COM Automation Presentation by Albert Szilvasy
3. Have you seen our enhanced Solution Searching capability?
4. An Example Solution
5. Some Interesting New Solutions

1. Introduction
===============

We had two Developer Conferences since the last newsletter. One in
Europe and one in Asia/Pacific. The presentation material can be found
at the following URL:

http://adn.autodesk.com/techsupp/utilitiesconferences.htm
  

2. COM Automation Presentation by Albert Szilvasy
=================================================

As an ActiveX/VBA developer you will be very interested in the
"COM Automation by Albert Szilvasy" presentation next to the
Asia/Pacific Developer Days 1999 at the following URL:

http://adn.autodesk.com/techsupp/utilitiesconferences.htm

If you haven't used VBA/ActiveX yet then this presentation is a very
convincing demonstration as to why you should learn VBA/ActiveX.
In addition to the presentation there are a number of tools, utilities
and code samples to drive the point home. If you are an experienced
developer you will see just how pervasive this technology has become
over the past few years. The great news is you can leverage your existing
knowledge to create new kinds of applications. The latest versions of the
utilities and tools developed by the Developer Consulting Group are also
available in this download.

3. Have you seen our enhanced Solution Searching capability?
============================================================

By the time you read this you should have received the ADN General Newsletter.
We have sent this newsletter to all our members because it contains new
information on how we have restructured our Solution Searching capability.
This is just too good to miss. For more details see the ADN General Newsletter.
For a sneak preview of how good this is, select the following URL:

/search/newsearch.htm

4. An Example Solution
======================

Have you visited our solutions before? If not here is an example of what one
of our many solutions looks like. This particular solution demonstrates the
following:

HOW TO EXTRACT AN XREF PATH FROM ITS BLOCK DEFINITION
/cgi-bin/solution.pl?SID=43016

Here is the text of the Solution 43016

Question:

How to obtain the path information of an Xref which is attached to a drawing
but has no references in ModelSpace/PaperSpace?

Answer

It is an unfortunate omission that the Xref path can not be obtained from the
AcadBlock object directly. This has been logged as a wishlist item. The
workaround is to create a temporary reference to the Xref to access the path
property.

Sub xrefpath()
Dim obj As Object
Dim pt(0 To 2) As Double

For Each obj In ThisDrawing.Blocks
  If obj.IsXRef Then
         'Obtain the ObjectID of the inserted block.
           objid = ThisDrawing.ModelSpace.InsertBlock(pt, obj.Name, 1, 1, 1,
0).ObjectID
         'With the help of the ObjectID get to the Object(External reference)
         'so that you can extract the path information.
           Set oRef = ThisDrawing.ObjectIdToObject(objid)
           MsgBox oRef.Path
           oRef.Delete
  End If
Next obj
End Sub

5. Some Interesting New Solutions
=================================

HOW TO EXTRACT AN XREF PATH FROM ITS BLOCK DEFINITION
/cgi-bin/solution.pl?SID=43016

FORMING A SELECTION SET OF ENTITIES ALONG WITH THEIR PICKED POINTS
/cgi-bin/solution.pl?SID=44354

ACCESSING LDATA VALUES FROM VBA
/cgi-bin/solution.pl?SID=44952
  

-----------------------------------------------------------------------------
To subscribe or unsubscribe, go to
http://adn.autodesk.com/techsupp/docs/newsletters.htm
-----------------------------------------------------------------------------

     You received this message as a result of your registration
     on the ADN List Server subscription page.  If you no longer wish
     to receive these messages, read the next section, How to use this
     mailing list.

     How to use this mailing list:

     You may unsubscribe from this e-mail newsletter, or subscribe to
     a variety of other informative e-mail newsletters, by returning
     to the ADN List Server subscription page at
       http://adn.autodesk.com/techsupp/docs/newsletters.htm
     and changing your subscription preferences.

     Alternatively, from the subscribed account you can send an e-mail to
     <Majordomo-partnersys@autodesk.com> with the following command in the
     body of your email message:

     unsubscribe <list-name>

     ----------------------------------------------------------------------

     Autodesk Developer Network (ADN) information and events:

     For information on all ADN topics, please visit:
       http://www.autodesk.com/adn

     ----------------------------------------------------------------------

     THIS DOCUMENT IS PROVIDED FOR INFORMATIONAL PURPOSES ONLY.  The
     information contained in this document represents the current view of
     Autodesk Inc. on the issues discussed as of the date of publication.
     Because Autodesk must respond to change in market conditions, it
     should not be interpreted to be a commitment on the part of Autodesk
     and Autodesk cannot guarantee the accuracy of any information
     presented after the date of publication.
     INFORMATION PROVIDED IN THIS DOCUMENT IS PROVIDED 'AS IS' WITHOUT
     WARRANTY OF ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING BUT NOT
     LIMITED TO THE IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS FOR A
     PARTICULAR PURPOSE AND FREEDOM FROM INFRINGEMENT.
     The user assumes the entire risk as to the accuracy and the use of
     this document. This  document may be copied and distributed subject to
     the following conditions:
     1.   All text must be copied without modification and all pages must
          be included
     2.   All copies must contain Autodesk's copyright notice and any other
          notices provided therein
     3.   This document may not be distributed for profit

     ----------------------------------------------------------------------
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-12-5 02:57 , Processed in 0.377270 second(s), 31 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表