Function at 0x4b41c0
Capabilities:
Read data from internet
Receive data

Disassembly:
push ebp
mov ebp, esp
push ecx
mov ecx, 0x8c
push 0
push 0
dec ecx
jne 0x4b41c9
xchg dword [ebp - 4], ecx
push ebx
push esi
push edi
mov edi, ecx
mov ebx, edx
mov dword [ebp - 4], eax
mov esi, dword [ebp + 8]
xor eax, eax
push ebp
push 0x4b4a44
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
add eax, 0x18
call sub.rtl70.bpl__System__LStrClr_qqrpv
mov eax, dword [ebp - 4]
xor edx, edx
mov dword [eax + 0x14], edx
mov eax, dword [ebp - 4]
cmp dword [eax + 0x30], 0
jne 0x4b48c8
xor eax, eax
push ebp
push 0x4b48c1
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x34]
shl edx, 0x14
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x38]
call fcn.004021cc
lea edx, [ebp - 0x410]
mov eax, ebx
call sub.rtl70.bpl__Sysutils_StrPas_qqrpxc
cmp dword [ebp - 0x410], 0
jne 0x4b456f
push 0
push 0
push 0
push 0
mov eax, dword [ebp - 4]
mov eax, dword [eax + 8]
push eax
call sub.wininet.dll_HttpSendRequestA
test eax, eax
je 0x4b43b3
mov dl, 1
mov eax, dword [sym.imp.rtl70.bpl__Classes_TMemoryStream_]
call sub.rtl70.bpl__System_TObject__bctr_qqrv
mov dword [ebp - 8], eax
xor eax, eax
push ebp
push 0x4b43ac
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x40c]
xor ecx, ecx
mov edx, 0x400
call sub.rtl70.bpl__System__FillChar_qqrpvic
jmp 0x4b42c0
cmp dword [ebp - 0xc], 0
je 0x4b42e0
lea edx, [ebp - 0x40c]
mov ecx, dword [ebp - 0xc]
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0x10]
lea eax, [ebp - 0x40c]
xor ecx, ecx
mov edx, 0x400
call sub.rtl70.bpl__System__FillChar_qqrpvic
lea eax, [ebp - 0xc]
push eax
push 0x400
lea eax, [ebp - 0x40c]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 8]
push eax
call sub.wininet.dll_InternetReadFile
test eax, eax
jne 0x4b4297
push 0
push 0
mov eax, dword [ebp - 8]
call sub.rtl70.bpl__Classes_TStream_SetPosition_qqrxj
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx]
push edx
push eax
mov eax, dword [ebp - 4]
mov ebx, dword [eax + 0x34]
shl ebx, 0x14
mov eax, ebx
cdq
cmp edx, dword [esp + 4]
jne 0x4b4310
cmp eax, dword [esp]
pop edx
pop eax
jae 0x4b4326
jmp 0x4b4314
pop edx
pop eax
jge 0x4b4326
mov ecx, ebx
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x38]
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0xc]
jmp 0x4b433d
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx]
mov ecx, eax
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x38]
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0xc]
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx]
mov edx, dword [ebp - 4]
mov dword [edx + 0x14], eax
cmp byte [ebp + 0xc], 0
je 0x4b4374
lea edx, [ebp - 0x414]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x38]
call sub.rtl70.bpl__Sysutils_StrPas_qqrpxc
mov eax, dword [ebp - 0x414]
mov edx, dword [ebp - 4]
add edx, 0x18
call sub.rtl70.bpl__System_Utf8ToAnsi_qqrx17System_AnsiString
jmp 0x4b4396
lea edx, [ebp - 0x418]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x38]
call sub.rtl70.bpl__Sysutils_StrPas_qqrpxc
mov edx, dword [ebp - 0x418]
mov eax, dword [ebp - 4]
add eax, 0x18
call sub.rtl70.bpl__System__LStrAsg_qqrpvpxv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4b488b
mov eax, dword [ebp - 8]
call sub.rtl70.bpl__System_TObject_Free_qqrv
ret
call sub.kernel32.dll_GetLastError
cmp eax, 0x2f0c
je 0x4b43cf
call sub.kernel32.dll_GetLastError
cmp eax, 0x2f19
jne 0x4b4540
mov eax, dword [ebp - 4]
call sym.P_Interface.bpl__Unitxmlhttp_TXmlhttp_SetToIgnoreCerticateErrors_qqrv
push 0
push 0
push 0
push 0
mov eax, dword [ebp - 4]
mov eax, dword [eax + 8]
push eax
call sub.wininet.dll_HttpSendRequestA
test eax, eax
je 0x4b488b
mov dl, 1
mov eax, dword [sym.imp.rtl70.bpl__Classes_TMemoryStream_]
call sub.rtl70.bpl__System_TObject__bctr_qqrv
mov dword [ebp - 8], eax
xor eax, eax
push ebp
push 0x4b4539
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x40c]
xor ecx, ecx
mov edx, 0x400
call sub.rtl70.bpl__System__FillChar_qqrpvic
jmp 0x4b444d
cmp dword [ebp - 0xc], 0
je 0x4b446d
lea edx, [ebp - 0x40c]
mov ecx, dword [ebp - 0xc]
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0x10]
lea eax, [ebp - 0x40c]
xor ecx, ecx
mov edx, 0x400
call sub.rtl70.bpl__System__FillChar_qqrpvic
lea eax, [ebp - 0xc]
push eax
push 0x400
lea eax, [ebp - 0x40c]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 8]
push eax
call sub.wininet.dll_InternetReadFile
test eax, eax
jne 0x4b4424
push 0
push 0
mov eax, dword [ebp - 8]
call sub.rtl70.bpl__Classes_TStream_SetPosition_qqrxj
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx]
push edx
push eax
mov eax, dword [ebp - 4]
mov ebx, dword [eax + 0x34]
shl ebx, 0x14
mov eax, ebx
cdq
cmp edx, dword [esp + 4]
jne 0x4b449d
cmp eax, dword [esp]
pop edx
pop eax
jae 0x4b44b3
jmp 0x4b44a1
pop edx
pop eax
jge 0x4b44b3
mov ecx, ebx
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x38]
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0xc]
jmp 0x4b44ca
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx]
mov ecx, eax
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x38]
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0xc]
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx]
mov edx, dword [ebp - 4]
mov dword [edx + 0x14], eax
cmp byte [ebp + 0xc], 0
je 0x4b4501
lea edx, [ebp - 0x41c]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x38]
call sub.rtl70.bpl__Sysutils_StrPas_qqrpxc
mov eax, dword [ebp - 0x41c]
mov edx, dword [ebp - 4]
add edx, 0x18
call sub.rtl70.bpl__System_Utf8ToAnsi_qqrx17System_AnsiString
jmp 0x4b4523
lea edx, [ebp - 0x420]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x38]
call sub.rtl70.bpl__Sysutils_StrPas_qqrpxc
mov edx, dword [ebp - 0x420]
mov eax, dword [ebp - 4]
add eax, 0x18
call sub.rtl70.bpl__System__LStrAsg_qqrpvpxv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4b488b
mov eax, dword [ebp - 8]
call sub.rtl70.bpl__System_TObject_Free_qqrv
ret
call sub.kernel32.dll_GetLastError
xor edx, edx
push edx
push eax
lea eax, [ebp - 0x424]
call sub.rtl70.bpl__Sysutils_IntToStr_qqrj
mov ecx, dword [ebp - 0x424]
mov eax, dword [ebp - 4]
add eax, 0x1c
mov edx, 0x4b4a5c
call sub.rtl70.bpl__System__LStrCat3_qqrv
jmp 0x4b488b
push edi
push ebx
push 0
push 0
mov eax, dword [ebp - 4]
mov eax, dword [eax + 8]
push eax
call sub.wininet.dll_HttpSendRequestA
test eax, eax
je 0x4b46d6
mov dl, 1
mov eax, dword [sym.imp.rtl70.bpl__Classes_TMemoryStream_]
call sub.rtl70.bpl__System_TObject__bctr_qqrv
mov dword [ebp - 8], eax
xor eax, eax
push ebp
push 0x4b46cf
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x40c]
xor ecx, ecx
mov edx, 0x400
call sub.rtl70.bpl__System__FillChar_qqrpvic
jmp 0x4b45e3
cmp dword [ebp - 0xc], 0
je 0x4b4603
lea edx, [ebp - 0x40c]
mov ecx, dword [ebp - 0xc]
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0x10]
lea eax, [ebp - 0x40c]
xor ecx, ecx
mov edx, 0x400
call sub.rtl70.bpl__System__FillChar_qqrpvic
lea eax, [ebp - 0xc]
push eax
push 0x400
lea eax, [ebp - 0x40c]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 8]
push eax
call sub.wininet.dll_InternetReadFile
test eax, eax
jne 0x4b45ba
push 0
push 0
mov eax, dword [ebp - 8]
call sub.rtl70.bpl__Classes_TStream_SetPosition_qqrxj
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx]
push edx
push eax
mov eax, dword [ebp - 4]
mov ebx, dword [eax + 0x34]
shl ebx, 0x14
mov eax, ebx
cdq
cmp edx, dword [esp + 4]
jne 0x4b4633
cmp eax, dword [esp]
pop edx
pop eax
jae 0x4b4649
jmp 0x4b4637
pop edx
pop eax
jge 0x4b4649
mov ecx, ebx
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x38]
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0xc]
jmp 0x4b4660
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx]
mov ecx, eax
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x38]
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0xc]
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx]
mov edx, dword [ebp - 4]
mov dword [edx + 0x14], eax
cmp byte [ebp + 0xc], 0
je 0x4b4697
lea edx, [ebp - 0x428]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x38]
call sub.rtl70.bpl__Sysutils_StrPas_qqrpxc
mov eax, dword [ebp - 0x428]
mov edx, dword [ebp - 4]
add edx, 0x18
call sub.rtl70.bpl__System_Utf8ToAnsi_qqrx17System_AnsiString
jmp 0x4b46b9
lea edx, [ebp - 0x42c]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x38]
call sub.rtl70.bpl__Sysutils_StrPas_qqrpxc
mov edx, dword [ebp - 0x42c]
mov eax, dword [ebp - 4]
add eax, 0x18
call sub.rtl70.bpl__System__LStrAsg_qqrpvpxv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4b488b
mov eax, dword [ebp - 8]
call sub.rtl70.bpl__System_TObject_Free_qqrv
ret
call sub.kernel32.dll_GetLastError
cmp eax, 0x2f0c
je 0x4b46f2
call sub.kernel32.dll_GetLastError
cmp eax, 0x2f19
jne 0x4b4861
mov eax, dword [ebp - 4]
call sym.P_Interface.bpl__Unitxmlhttp_TXmlhttp_SetToIgnoreCerticateErrors_qqrv
push edi
push ebx
push 0
push 0
mov eax, dword [ebp - 4]
mov eax, dword [eax + 8]
push eax
call sub.wininet.dll_HttpSendRequestA
test eax, eax
je 0x4b488b
mov dl, 1
mov eax, dword [sym.imp.rtl70.bpl__Classes_TMemoryStream_]
call sub.rtl70.bpl__System_TObject__bctr_qqrv
mov dword [ebp - 8], eax
xor eax, eax
push ebp
push 0x4b485a
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x40c]
xor ecx, ecx
mov edx, 0x400
call sub.rtl70.bpl__System__FillChar_qqrpvic
jmp 0x4b476e
cmp dword [ebp - 0xc], 0
je 0x4b478e
lea edx, [ebp - 0x40c]
mov ecx, dword [ebp - 0xc]
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0x10]
lea eax, [ebp - 0x40c]
xor ecx, ecx
mov edx, 0x400
call sub.rtl70.bpl__System__FillChar_qqrpvic
lea eax, [ebp - 0xc]
push eax
push 0x400
lea eax, [ebp - 0x40c]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 8]
push eax
call sub.wininet.dll_InternetReadFile
test eax, eax
jne 0x4b4745
push 0
push 0
mov eax, dword [ebp - 8]
call sub.rtl70.bpl__Classes_TStream_SetPosition_qqrxj
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx]
push edx
push eax
mov eax, dword [ebp - 4]
mov ebx, dword [eax + 0x34]
shl ebx, 0x14
mov eax, ebx
cdq
cmp edx, dword [esp + 4]
jne 0x4b47be
cmp eax, dword [esp]
pop edx
pop eax
jae 0x4b47d4
jmp 0x4b47c2
pop edx
pop eax
jge 0x4b47d4
mov ecx, ebx
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x38]
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0xc]
jmp 0x4b47eb
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx]
mov ecx, eax
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x38]
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0xc]
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx]
mov edx, dword [ebp - 4]
mov dword [edx + 0x14], eax
cmp byte [ebp + 0xc], 0
je 0x4b4822
lea edx, [ebp - 0x430]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x38]
call sub.rtl70.bpl__Sysutils_StrPas_qqrpxc
mov eax, dword [ebp - 0x430]
mov edx, dword [ebp - 4]
add edx, 0x18
call sub.rtl70.bpl__System_Utf8ToAnsi_qqrx17System_AnsiString
jmp 0x4b4844
lea edx, [ebp - 0x434]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x38]
call sub.rtl70.bpl__Sysutils_StrPas_qqrpxc
mov edx, dword [ebp - 0x434]
mov eax, dword [ebp - 4]
add eax, 0x18
call sub.rtl70.bpl__System__LStrAsg_qqrpvpxv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4b488b
mov eax, dword [ebp - 8]
call sub.rtl70.bpl__System_TObject_Free_qqrv
ret
call sub.kernel32.dll_GetLastError
xor edx, edx
push edx
push eax
lea eax, [ebp - 0x438]
call sub.rtl70.bpl__Sysutils_IntToStr_qqrj
mov ecx, dword [ebp - 0x438]
mov eax, dword [ebp - 4]
add eax, 0x1c
mov edx, 0x4b4a5c
call sub.rtl70.bpl__System__LStrCat3_qqrv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4b49f5
mov eax, dword [ebp - 4]
mov eax, dword [eax + 8]
push eax
call sub.wininet.dll_InternetCloseHandle
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0xc]
push eax
call sub.wininet.dll_InternetCloseHandle
mov eax, dword [ebp - 4]
xor edx, edx
mov dword [eax + 8], edx
mov eax, dword [ebp - 4]
xor edx, edx
mov dword [eax + 0xc], edx
ret
xor eax, eax
push ebp
push 0x4b49ee
push dword fs:[eax]
mov dword fs:[eax], esp
xor eax, eax
push ebp
push 0x4b499b
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x440]
mov edx, ebx
call sub.rtl70.bpl__System__LStrFromPChar_qqrr17System_AnsiStringpc
mov edx, dword [ebp - 0x440]
lea eax, [ebp - 0x43c]
call sub.rtl70.bpl__System__WStrFromLStr_qqrr17System_WideStringx17System_AnsiString
mov eax, dword [ebp - 0x43c]
push eax
push 0x4b4a68
mov eax, dword [ebp - 4]
add eax, 0x20
push eax
push 0
call sub.rtl70.bpl__Variants__DispInvoke_qp8TVarDatarx8TVarDatap16System_TCallDescpv
add esp, 0x10
push 0x4b4a74
mov eax, dword [ebp - 4]
add eax, 0x20
push eax
lea eax, [ebp - 0x454]
push eax
call sub.rtl70.bpl__Variants__DispInvoke_qp8TVarDatarx8TVarDatap16System_TCallDescpv
add esp, 0xc
lea edx, [ebp - 0x454]
lea eax, [ebp - 0x444]
call sub.rtl70.bpl__Variants__VarToLStr_qqrr17System_AnsiStringrx8TVarData
mov eax, dword [ebp - 0x444]
call sub.rtl70.bpl__System__LStrLen_qqrx17System_AnsiString
mov edx, dword [ebp - 4]
mov dword [edx + 0x14], eax
push 0x4b4a74
mov eax, dword [ebp - 4]
add eax, 0x20
push eax
lea eax, [ebp - 0x464]
push eax
call sub.rtl70.bpl__Variants__DispInvoke_qp8TVarDatarx8TVarDatap16System_TCallDescpv
add esp, 0xc
lea edx, [ebp - 0x464]
mov eax, esi
call sub.rtl70.bpl__Variants__VarToLStr_qqrr17System_AnsiStringrx8TVarData
mov eax, dword [ebp - 4]
add eax, 0x18
mov edx, dword [esi]
call sub.rtl70.bpl__System__LStrAsg_qqrpvpxv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x4b49b8
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4b49f5
mov eax, dword [ebp - 4]
mov eax, dword [eax + 8]
push eax
call sub.wininet.dll_InternetCloseHandle
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0xc]
push eax
call sub.wininet.dll_InternetCloseHandle
mov eax, dword [ebp - 4]
xor edx, edx
mov dword [eax + 8], edx
mov eax, dword [ebp - 4]
xor edx, edx
mov dword [eax + 0xc], edx
ret