Peter,
Wont that alter the style in the underlying table? May not be a problem of
course.
Richard Burkmar
ICL
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: 15 December 1999 08:05
To: [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Subject: Vedr: MI Changing selected object styles using MB
Hi Tim
You have to write a function and then use it in a Update
Include "mapbasic.def"
declare Function NewStyle(byval o as object) as object
...............
Update Selection set obj = NewStyle(obj)
...............
Function NewStyle(byval o as object) as object
dim tmpObj as object,
pStyle as Pen
pStyle = MakePen(.........)
tmpObj = o
Altter object tmpObj Info OBJ_INFO_CODE, pStyle
NewStyle = tmpObj
end function
Peter Laulund
National Survey and Cadaste, Denmark
"Tim Warman" <[EMAIL PROTECTED]> - 14-12-99 22:21:36
Besvar venligst til [EMAIL PROTECTED]
Til: "Mapinfo-L" <[EMAIL PROTECTED]>
cc: (bcc: Peter Laulund/MI/KMS)
Vedr�rende: MI Changing selected object styles using MB
----------------------------------------------------------------------
To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put
"unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
