大家帮忙:看我这个在VB中的数据类型定义,在DELPHI中如何表达?
VB中:
Type PointInfo
        id As Long                              '[ID] Global node ID
        parent_id As Long                       '[ND] Belonged unit ID
        point_type As Byte                      '[PT] point type: default 0
        record_type As Byte                     '[RT] record type: AX / DX / GP / DU
        pname(0 To NAME_LEN - 1) As Byte        '[PN] point name
        desc(0 To DESC_LEN - 1) As Byte         '[ED] point description
end Type请问,如果放到DELPHI里定义,该如何改写?特别是pname(0 To NAME_LEN - 1) As Byte 该如何表达?

解决方案 »

  1.   

    type PointInfo = record
      id : longword;
      parent_id : longword;
      point_type : byte;
      record_type : byte;
      pname : array[0..255] of byte;
      desc  : array[0..255] of byte;
    end;没有用过vb,不太清楚
    NAME_LEN, DESC_LEN 到底在Vb中定义为多少,
    不过上边定义的纪录应该差不多 
      

  2.   

    pname(0 To NAME_LEN - 1) As Byte 中的NAME_LEN是常量,表示这个字段的长度限制在NAME_LEN个字符之内。