Process Name

T

Timo Gransch

Hello,

how do I retrieve the display name of a shape? I have a page with one
shape with the display name "Test". The Name, NameID and NameU
properties of the shape don't give me what I want.

Thanks in advance,
Timo
 
T

Timo Gransch

al said:
could you show us an example of how you are trying to grab it?

Sorry for late reply.

Function StoreVisioShape(oShape As Object, lPageID As Long) As Long
Dim lShapeID As Long

lShapeID=UboundEx(g_aoPages(lPageID).aoVisioShapes)+1
ReDim Preserve g_aoPages(lPageID).aoVisioShapes(lShapeID)

g_aoPages(lPageID).aoVisioShapes(lShapeID).sName=oShape.Text

[...]

StoreVisioShape=lShapeID
End Function

Regards,
Timo
 
R

Russ McKenna

is it the Comment line?


Timo Gransch said:
al said:
could you show us an example of how you are trying to grab it?

Sorry for late reply.

Function StoreVisioShape(oShape As Object, lPageID As Long) As Long
Dim lShapeID As Long

lShapeID=UboundEx(g_aoPages(lPageID).aoVisioShapes)+1
ReDim Preserve g_aoPages(lPageID).aoVisioShapes(lShapeID)

g_aoPages(lPageID).aoVisioShapes(lShapeID).sName=oShape.Text

[...]

StoreVisioShape=lShapeID
End Function

Regards,
Timo
 
A

al edlund

as a debug technique have you tried putting something like
msgbox oShape.text
before your assignment to see what is returned by the call or
even sooner in the function to test what is being sent.
 
Top