大家帮忙:看我这个在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 该如何表达?
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 该如何表达?
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中定义为多少,
不过上边定义的纪录应该差不多