Function at 0x4e2d5c
Capabilities:
Send data
Send http request

Disassembly:
push ebp
mov ebp, esp
xor ecx, ecx
push ecx
push ecx
push ecx
push ecx
push ecx
push ecx
push ecx
push ebx
push esi
push edi
mov ebx, edx
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x4e2f63
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
cmp byte [eax + 0x74], 0
je 0x4e2d96
lea eax, [ebp - 0x1c]
mov edx, 0x4e2f7c
call sub.rtl60.bpl__System__LStrLAsg_qqrpvpxv
jmp 0x4e2da3
lea eax, [ebp - 0x1c]
mov edx, 0x4e2fac
call sub.rtl60.bpl__System__LStrLAsg_qqrpvpxv
mov dl, 1
mov eax, dword [ebp - 4]
call fcn.004e2a38
push 2
lea eax, [ebp - 0x10]
mov ecx, 1
mov edx, dword [0x4e2d34]
call sub.rtl60.bpl__System__DynArraySetLength_qqrv
add esp, 4
mov eax, 0x4e2fc4
mov edx, dword [ebp - 0x10]
mov dword [edx], eax
mov eax, dword [ebp - 0x10]
xor edx, edx
mov dword [eax + 4], edx
mov esi, 0x4400000
mov eax, dword [ebp - 4]
cmp dword [eax + 0x58], 4
jne 0x4e2dfa
or esi, 0x800000
mov eax, dword [ebp - 4]
test byte [eax + 0x75], 2
je 0x4e2dfa
or esi, 0x3000
xor eax, eax
mov dword [ebp - 8], eax
xor edx, edx
push ebp
push 0x4e2f0f
push dword fs:[edx]
mov dword fs:[edx], esp
mov eax, dword [ebp - 4]
push eax
push esi
mov eax, dword [ebp - 0x10]
push eax
push 0
push 0
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x50]
call sub.rtl60.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
push 0x4e2fd0
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x68]
push eax
call sub.wininet.dll_HttpOpenRequestA
mov dword [ebp - 8], eax
cmp dword [ebp - 8], 0
setne dl
xor dl, 1
mov cl, 1
mov eax, dword [ebp - 4]
call fcn.004e25a8
lea edx, [ebp - 0x14]
mov eax, dword [ebp - 4]
call fcn.004e292c
push 0x20000000
mov eax, dword [ebp - 0x14]
call sub.rtl60.bpl__System__LStrLen_qqrx17System_AnsiString
push eax
mov eax, dword [ebp - 0x14]
call sub.rtl60.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
mov eax, dword [ebp - 8]
push eax
call sub.wininet.dll_HttpAddRequestHeadersA
push 0x20000000
mov eax, dword [ebp - 0x1c]
call sub.rtl60.bpl__System__LStrLen_qqrx17System_AnsiString
push eax
mov eax, dword [ebp - 0x1c]
call sub.rtl60.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
mov eax, dword [ebp - 8]
push eax
call sub.wininet.dll_HttpAddRequestHeadersA
lea edx, [ebp - 0x18]
mov eax, ebx
call sub.rtl60.bpl__System_UTF8Encode_qqrx17System_WideString
mov eax, dword [ebp - 0x18]
call sub.rtl60.bpl__System__LStrLen_qqrx17System_AnsiString
push eax
lea eax, [ebp - 0x18]
call sub.rtl60.bpl__System__UniqueStringA_qqrr17System_AnsiString
push eax
push 0
push 0
mov eax, dword [ebp - 8]
push eax
call sub.wininet.dll_HttpSendRequestA
mov edx, eax
cmp edx, 1
sbb edx, edx
neg edx
mov cl, 1
mov eax, dword [ebp - 4]
call fcn.004e25a8
lea eax, [ebp - 0xc]
push eax
push 7
call sub.kernel32.dll_GetLastError
push eax
mov eax, dword [ebp - 8]
push eax
call sub.user32.dll_GetDesktopWindow
push eax
call sub.wininet.dll_InternetErrorDlg
sub eax, 1
jb 0x4e2f05
sub eax, 0x4c6
je 0x4e2efe
jmp 0x4e2ea3
call sub.rtl60.bpl__Sysutils_Abort_qqrv
jmp 0x4e2ea3
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x4e2f37
mov ebx, dword [ebp - 8]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4e2f6a
lea eax, [ebp - 0x1c]
mov edx, 3
call sub.rtl60.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x10]
mov edx, dword [0x4e2d34]
call sub.rtl60.bpl__System__DynArrayClear_qqrrpvpv
ret