MI-L Re: TableOpen in MapBasic

[JAL]

----- Videresendt af Jakob Lanstorp/Kampsax - 10-09-01 08:44 -----
                                                                                       
                         
                    Jakob                                                              
                         
                    Lanstorp             Til:    "Simon O'Keefe" <[EMAIL PROTECTED]>     
                         
                                         cc:                                           
                         
                    10-09-01             Vedr.:  Re: TableOpen                         
                         
                    09:35                                                              
                         
                                                                                       
                         
                                                                                       
                         



Try this,

Include "MAPBASIC.DEF"

Declare Sub Main
Declare Function TableOpen(Byval szTab as string) as logical

Sub Main
     If TableOpen("MYTABLE") Then
          Note "Table is open"
     Else
          Note "Table is NOT open"
     End If
End Sub

Function TableOpen(Byval szTab as string) as logical
     Dim i as integer
     TableOpen = FALSE

     For i =  1 to numtables()
          If TableInfo(i,TAB_INFO_NAME) = szTab Then
               TableOpen = TRUE
          End if
     Next
End Function


Venlig hilsen,
Jakob Lanstorp, GIS-Developer

Kampsax   GIS Software & Solutions, Rugaardsvej 55, 5000 Odense, DK
tel: + 45 63 13 50 13, dir: + 45 63 13 50 11, fax: + 45 63 13 50 90
mailto:[EMAIL PROTECTED] , http://www.mapinfo.dk, http://www.kampsax.dk
Authorized MapInfo Partner & Distributor in Denmark and Norway


Hi all,

>From a MapBasic program I am writing, I would like to be able to tell
whether a certain table (eg sample.TAB) is already open or not. Any
suggestions?

Thanks,

Simon




_______________________________________________________________________
List hosting provided by Directions Magazine | www.directionsmag.com |
To unsubscribe, send e-mail to [EMAIL PROTECTED] and
put "unsubscribe MapInfo-L" in the message body.