type定义一个结构名(TEST),一定要有 TEST = record 这句吗?
如果一定要加上面一句,我的过程在引用TEST结构中的数据时出现了数据错位的现象,是否因为过程是无返回值的呢?type
TEST = record
test1:word;
test2:ARRAY [0..10] of WORD;
test3:byte;
end ;
PTESE=^TEST;
var
aaa:PTEST;………………
………………
Procedure DEMO(aaa:PTEST);stdcall;
begin
aaa.test1 BEGIN里测试结构内值,发现数据错位了;(
aaa.test3
如果一定要加上面一句,我的过程在引用TEST结构中的数据时出现了数据错位的现象,是否因为过程是无返回值的呢?type
TEST = record
test1:word;
test2:ARRAY [0..10] of WORD;
test3:byte;
end ;
PTESE=^TEST;
var
aaa:PTEST;………………
………………
Procedure DEMO(aaa:PTEST);stdcall;
begin
aaa.test1 BEGIN里测试结构内值,发现数据错位了;(
aaa.test3
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货