Hi All User
Please Translate C++ To Delphi
Thank You Very Much
<snip>
What does it do?
C++ and delphi are not compatible , better learn the algorithm and code it in delphi afresh.
Hi All User
Please Translate C++ To Delphi
Thank You Very Much
int Generate_Reloction_Map(BYTE* Reloc_Seg, DWORD Func_RVA, int Func_Size, DWORD* Reloc_Map)
{
BYTE* Reloc_Ptr = Reloc_Seg;
int _rel_Cnt = 0;
while (*(DWORD*)Reloc_Ptr)
{
DWORD Reloc_RVA = ((DWORD*)Reloc_Ptr)[0];
DWORD Block_Size = ((DWORD*)Reloc_Ptr)[1];
for (int i = 0; i < (Block_Size - 8) / 2; i++)
{
if ((Reloc_RVA + (((WORD*)(Reloc_Ptr + 8))[i] & 0xFFF) >= Func_RVA) &&
(Reloc_RVA + (((WORD*)(Reloc_Ptr + 8))[i] & 0xFFF) < Func_RVA + Func_Size))
{
if (Reloc_Map)
Reloc_Map[_rel_Cnt] = Reloc_RVA + (((WORD*)(Reloc_Ptr + 8))[i] & 0xFFF);
_rel_Cnt++;
}
}
Reloc_Ptr += Block_Size;
}
return _rel_Cnt;
}
What are you writing? An OS?
We're not a translation service. You may want to try the Looking to Hire forum.
It looked more like a malware writing kit to me.
We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.