Dear List
Pease consider the code below and can anyone tell me why I get the error
message:
"Can't evaluate expression for column Obj. Operation cancelled"...
on the Update Selection line.
In the dialogue I'm using the Symbol Picker to select a font symbol, and
selcting one of my Facility types from an array. Then I'm trying to
change the symbol to that selected, for all Facilities on the map who
are of that type.
e.g. all churches could be displayed as a spire, factories as a factory
pic, museums with the "M" building, et al. Note thefre are 2 arrays
side-by-side: one holding the desc and the other the code.
'ppfreciate it
Terry McDonnell
Sub FAC_SYMBOLS_DIALOG
'_____________________
Dim lsSymbol as Symbol,
lcSymbolStyle, lcCommand as String,
lnSelID as SmallInt,
loObj as Object
DIALOG
Title "Select Symbols for Facility Type"
Control StaticText
Position 10,10
Title "Select:"
Control SymbolPicker
Position 60,10
Into lsSymbol
Control StaticText
Position 10,40
Title "Facilty Types:"
Control PopUpMenu
Position 60,40
Title from Variable gaFacTypes
Into lnSelID
Control OKButton
Control CancelButton
If CommandInfo( CMD_INFO_DLG_OK) Then
lcSymbolStyle = STR$( lsSymbol)
lcCommand = "MakeFontSymbol( " + lcSymbolStyle + ")"
Select * from FacMast
where FacMast.Fac_Code = gaFacCodes( lnSelID)
Update Selection
set Obj = lcCommand
End If
End Sub
