Skip to content

README.md

Latest commit

 

History

History
34 lines (24 loc) · 606 Bytes

README.md

File metadata and controls

34 lines (24 loc) · 606 Bytes

WYX的blog

个人blog

blog

  • 1
  • 2
  • 3

baidu

haod

k

Public Overrides Function Read(ByRef CoreObj As MapFileCoreLib.MIGraphy, ByVal fno As Integer, ByVal fid As Integer, ByRef rec As GraphyRec) As Boolean
        Dim param() As Double = Nothing
        Dim TempObj As Object = Nothing
        CoreObj.GetObj(fno, fid, rec.caption, rec.type, rec.status, ObjCode, TempObj)
        If TempObj Is Nothing Then Return False

        param = CType(TempObj, Double())

        Read(CoreObj, param)

        param = Nothing
        Return True
    End Function

  • []

  • [x]