type
TSenddata=array of byte
function CRC(var sendata:TSenddata; Len: Integer): word;
这样试一下。很久没玩delphi。。。不知道是否正确。但希望能帮到您
你怎么写的 ？声明不同的数据类型，是需要有结束符的
sendata = array[0..38] of byte;
TForm1 = class(TForm)
是不是少了“;”号
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ号：24596024