MI LAYER_INFO_NAME and ObjectInfo

[Eric Frost / HR and Associates, Inc.]

What is wrong with this code:

Include "MapBasic.Def"

Dim szLayerName As String
szLayerName = LayerInfo(FrontWindow(), 1, LAYER_INFO_NAME)

Fetch First From szLayerName

Dim obj_type As Integer
obj_type = ObjectInfo(szLayerName.obj, OBJ_INFO_TYPE) 

I have tried all sorts of work-arounds like assigning the object to an
object variable and Run Command but have not hit on the solution.

Thanks in advance!

----------------------------------------------------------------------
To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put
"unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]