13,826
社区成员
发帖
与我相关
我的任务
分享
//---------------------------------------------------------------------------
String FCS(String Value)
{
int i,f(0);
byte x;
for (int i=1;i<=Value.Length();i++)
{
x = (byte)Value[i];
f = f ^ (int)x;
}
return IntToHex(f,1);
}
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ShowMessage(FCS("1")) ;
}
//---------------------------------------------------------------------------