m:=0; for i:=low(arr) to high(arr) do begin m := m+ AStr[i]; end; ShowMessage(IntToHex(m mod $FF, 2));
16,748
社区成员
33,247
社区内容
加载中
试试用AI创作助手写篇文章吧