Hola que tal estan? Estoy intentando convertir este pedazo de codigo de c++ a delphi pero se me esta complicando, tal vez puedan darme una mano?
C++
Código:
bool Match(const BYTE * pData, const BYTE * bMask, const char * szMask)
{
for (; *szMask; ++szMask, ++pData, ++bMask)
if (*szMask == 'x' && *pData != *bMask)
return false;
return (*szMask) == NULL;
}
Lo que llegue a hacer en Delphi:
Código:
function Match(const pData:PBYTE; bMask:PBYTE; const szMask:PCHAR) : boolean;
var
i: integer;
begin
Result := true;
for i := 0 to StrLen(szMask)-1 do
if((szMask^ = 'x') and (pData^ <> bMask^)) then
Result := false;
break;
inc(szMask);
inc(pData);
inc(bMask);
end;
Estos son los errores que el compiler tira:
Código:
[Error] test.dpr(36): Left side cannot be assigned to
[Error] test.dpr(37): Left side cannot be assigned to
para las lineas:
Código:
inc(szMask);
inc(pData);
Gracias!