Hi
All,
I'm
slowly trying to learn MapBasic with the MapBasic window in MapInfo and the User
Guides for MapBasic that I downloaded. I'm trying to change the symbol for
a selection using mapbasic. When I look up the commands in the reference
guide, it states that the Do While statement isn't supported in the MapBasic
window, nor is any of the other looping statements nor is the If Then
statement. Is it possible to perform looping or to test for things (like
If Then) from the MapBasic window.
I
don't have Mapbasic, other than from within MapInfo, but thought I could write
some simple scripts to automate some of the repetitive tasks I have and just
copy them into the mapbasic window to run them.
The code that I have so far:
-----------------------------------------------------------------------------------------------------
select
* from OverDue where Due_Tested = "NO BFP" into NoBFPtab
Dim bfpobj As Object, bfpsymbol As Symbol
bfpsymbol = MakeSymbol(34,0,6)
Fetch First >From NoBFPtab
Do While Not EOT(NoBFPtab)
bfpobj = NoBFPtab.obj
Alter Object bfpobj
Info OBJ_INFO_SYMBOL, bfpsymbol
Update NoBFPtab Set obj = bfpobj
Fetch Next >From NoBFPtab
Dim bfpobj As Object, bfpsymbol As Symbol
bfpsymbol = MakeSymbol(34,0,6)
Fetch First >From NoBFPtab
Do While Not EOT(NoBFPtab)
bfpobj = NoBFPtab.obj
Alter Object bfpobj
Info OBJ_INFO_SYMBOL, bfpsymbol
Update NoBFPtab Set obj = bfpobj
Fetch Next >From NoBFPtab
-----------------------------------------------------------------------------------------------------
Any
help is be appreciated.
Don
_______________________________________________ MapInfo-L mailing list [email protected] http://www.directionsmag.com/mailman/listinfo/mapinfo-l
