Thankyou to all who replied in very quick time

 

I used Mike Taylor’s bit of coding at start

 

iCurrentMaterial                                                       as integer,

sMaterialType                                           as String,

 

sMaterialType = info_ws_point.Material

 

 

   Fetch First >From lut_Ruraltanks

       Do While Not EOT(lut_Ruraltanks)

          i = i + 1

          p_string(i)  =   lut_Ruraltanks.Material_type

            If p_string(i) = sMaterialType then ' Or whatever the variable is holding this info

                     I_material = i

                     end if

 

 Bill Thorns bit in dialog

 

Control popupmenu  

                Title From Variable p_string

                Width  60

                Height 12

                  Value I_material

                  ID 6

                 Position 225, 60

                 Into I_material

 

 

One more nail in the coffin for this MBX

 

Regards

 

Andrew Hare

GIS Administrator

Waimate District Council

P.O Box 122

Waimate

New Zealand

Ph:  +64 3 689 8079

Fax: +64 3 689 8075

 

_______________________________________________
MapInfo-L mailing list
[email protected]
http://www.directionsmag.com/mailman/listinfo/mapinfo-l

Reply via email to