You need add a sentence Update Table for each row in table that you
modify
Example
Dim objText As Object
Dim numIdRow as Integer
'If You table have a one record
Do While Not EOT(MyTable)
objText= MyTable.Obj
numIdRow = MyTable.RowId
Alter object objText
Info OBJ_INFO_TEXTSTRING ,"whatever"
Update MyTable Set Obj = objText Where RowId = numIdRow
Fetch Next From MyTable
Loop
Ok I hope this help you
Jorge Cordero
-----Original Message-----
From: Simon Roy [mailto:[EMAIL PROTECTED]
Sent: Monday, April 18, 2005 2:42 PM
To: Mapinfo-L
Subject: MI-L Alter object
Hi,
Beginner question�.
Can anybody tell me what�s wrong with this?
�The selection is a text object in a Layout
Dim objText As object
objText = selection.obj
Note objectinfo(objText, OBJ_INFO_TEXTSTRING)
Alter object objText
Info OBJ_INFO_TEXTSTRING ,"whatever"
When I run this part of code, The Note gives me the text string of the
selected object correctly, but the Alter statement seems to be ignored
(nothing is happening).
Thank you
Simon Roy
_______________________________
Sp�cialiste en g�omatique
Carto-M�dia, Environnement Illimit� inc.
t�l.:514-849-7281
fax.:514-849-6770
---------------------------------------------------------------------
List hosting provided by Directions Magazine | www.directionsmag.com |
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Message number: 16135
