Autodesk 15606-011408-9300 - MAP R6.3 UPG, Developer'S Manual

Page: 188 / 208

188
|
Chapter 7 Applications
Getting SDF File Information—a Visual Basic
Example
The SDFInfo example code shows how to open and access an SDF file to
retrieve its information, such as precision, key length, bounding box, etc. It
also shows how to search for features within the SDF file using sequential
search, spatial search, and key-indexed search. This example is written in
Visual Basic.
GetObjectTypeString = "POLYGON"
Case sdfPolylineObject:
GetObjectTypeString = "POLYLINE"
Case sdfPolyPolylineObject:
GetObjectTypeString = "POLYPOLYLINE"
Case sdfPolyPolygonObject:
GetObjectTypeString = "POLYPOLYGON"
End Select
End Function
SDFInfo Example Code
VERSION 6.00
Object = "{3B7C8863-D78F-101B-B9B5-04021C009402}#1.2#0"; "RICHTX32.OCX"
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "comdlg32.ocx"
Begin VB.Form frmLab1
Caption = "Form1"
ClientHeight = 3360
ClientLeft = 48
ClientTop = 276
ClientWidth = 5820
LinkTopic = "Form1"
ScaleHeight = 3360
ScaleWidth = 5820
StartUpPosition = 3 'Windows Default
Begin VB.CommandButton btnExit
Caption = "Exit"
Height = 288
Left = 4440
TabIndex = 7
Top = 3000
Width = 1212
End
Begin VB.CommandButton btnSrchKey
Caption = "Key Search"
Height = 288
Left = 4440
ConvertSDF Example Code ( continued )