请教:在delphi中如何判断是否为块引用

零度花儿

请教:在delphi中如何判断是否为块引用?就是当你打开一幅.dwg图时如何判断出图中为块引用的部分,谢谢!

mccad

http://www.mjtd.com/object/acad2004/idh_isxref.htm

零度花儿

？我是想这样：我现在打开一幅1：500的地形图，我要首先用IsXRef判断为块引用的部分，然后用GetBoundingBox对块引用求边框的最大和最小点。关键是tempblock.IsXRef可以而tempblock.GetBoundingBox却不行啊，请问应该如何写这段代码呢，有谁能帮我解答一下，十分感谢！

雪山飞狐_lzh

vba是Object.GetBoundingBox d1,d2


d1和d2是左下角和右上角

零度花儿

问题是tempblock.IsXRef试用于块对象而GetBoundingBox不试用块，因此即使tempblock.IsXRef成立也不能写成tempblock.GetBoundingBox（）啊,代码如下： For j:=0 to acadDoc.Blocks.Count -1 do
begin
tempBlock := acadDoc.Blocks.Item(j);
msg:=msg+tempBlock.Name;
if tempblock.isxref then
begin
[U]tempblock.GetBoundingBox(min_start,max_start) [/U] end; end;

mccad

块不能<U>GetBoundingBox，但块参照就可以GetBoundingBox</U>