If (CMD==0 x0b000)//readfile
{

Char * pread=cmddata (char *);
/* if (* pread==0 & amp; & * (pread + 2)==0 x14)
{
Memset (pread, 0 does);
* pread=0 x32;
Memcpy (pread + 2, "01234567890123456789012345678901234567890123456789", 50);

}
If (* pread==0 x32 & amp; & * (pread + 2)==0 x32)
{
Memset (pread, 0 does);
* pread=0 x32;
Memcpy (pread + 2, "QSQWQSQ_QS [] _] [EGEKMEGEKMOWU UWU [] [] _] [UW_ACAGACAOA, 50);
"
}
If (* pread==0 x64 & amp; & * (pread + 2)==0 x32)
{*/
Memset (pread, 0 does);
* pread=0 x32;
Memcpy (pread + 2, "JHJDB @ BDJH @ ^ \ \ ^ ^ X \ \ ^ ^ P VTVPVTLN @ NFDF @ FDFXVT \ \ ZXZ \ \ RPR \ \ Z", 50);

//}


return 0;
This is the code BCB, I want to use Delphi implementation, how to do

CodePudding user response:

C and basic one to one correspondence PASCAL
Memset==the fill
Memcpy==copy
Specific search help

CodePudding user response:

Comparison of===
Pointer * change ^
Instead of $0 x
& & With the and
Memset switch to fillchar
Corresponding pread memcpy switch to copy () is defined as a dynamic array

CodePudding user response:

Master......