Function at 0x459888
Capabilities:
Access peb ldr_data

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffdc
push ebx
push esi
xor ecx, ecx
mov dword [ebp - 0x24], ecx
mov dword [ebp - 0x20], ecx
mov dword [ebp - 4], ecx
mov dword [ebp - 8], ecx
mov dword [ebp - 0xc], edx
mov ebx, eax
xor eax, eax
push ebp
push 0x459a14
push dword fs:[eax]
mov dword fs:[eax], esp
mov dl, 1
mov eax, dword [0x459764]
call sub.rtl160.bpl__System_TObject__bctr_qqrv
mov dword [ebp - 0x1c], eax
lea eax, [ebp - 8]
mov edx, dword [ebp - 0x1c]
test edx, edx
je 0x4598cd
sub edx, 0xfffffff8
call sub.rtl160.bpl__System__IntfCopy_qqrr45System__DelphiInterface_t17System_IInterface_x45System__DelphiInterface_t17System_IInte
mov eax, dword [ebp - 0x1c]
mov esi, ebx
mov dword [eax + 0xc], esi
mov eax, dword [esi + 0x30]
call sub.rtl160.bpl__System__UStrLen_qqrx20System_UnicodeString
test eax, eax
jle 0x4599d1
mov dl, 1
mov eax, dword [sym.imp.rtl160.bpl__System_Classes_TStringStream_]
call sub.rtl160.bpl__System_Classes_TStringStream__bctr_qqrv
mov dword [ebp - 0x10], eax
xor eax, eax
push ebp
push 0x4599ca
push dword fs:[eax]
mov dword fs:[eax], esp
push 0
push 0
push 0
lea eax, [ebp - 0x18]
call sub.AxComponentsRTL.bpl__Auslogics_System_Fileversioninfo_TVersionValue__bctr_qqrg
lea eax, [ebp - 4]
mov edx, dword [sym.imp.rtl160.bpl__System_Sysutils_EmptyStr]
mov edx, dword [edx]
call sub.rtl160.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 0x1c]
mov eax, dword [eax + 0xc]
mov edx, dword [eax + 0x30]
mov ecx, dword [ebp - 0x10]
mov eax, 0x459a30
call sub.AxComponentsRTL.bpl__Auslogics_System_Win_Internet_Internet_HttpRequest_qqrx20System_UnicodeStringt1p22System_Classes_TStr
test al, al
je 0x4599b4
lea eax, [ebp - 4]
push eax
lea edx, [ebp - 0x20]
mov eax, dword [ebp - 0x10]
call sub.rtl160.bpl__System_Classes_TStringStream_GetDataString_qqrv
mov edx, dword [ebp - 0x20]
lea ecx, [ebp - 0x18]
mov eax, dword [ebp - 0x1c]
mov eax, dword [eax + 0xc]
call fcn.00459a38
mov ebx, eax
test bl, bl
jne 0x459987
lea eax, [ebp - 4]
push eax
lea edx, [ebp - 0x24]
mov eax, dword [ebp - 0x10]
call sub.rtl160.bpl__System_Classes_TStringStream_GetDataString_qqrv
mov edx, dword [ebp - 0x24]
lea ecx, [ebp - 0x18]
mov eax, dword [ebp - 0x1c]
mov eax, dword [eax + 0xc]
call fcn.00459dec
mov ebx, eax
mov eax, dword [ebp - 0x1c]
mov eax, dword [eax + 0xc]
mov edx, ebx
call fcn.0045940c
mov eax, dword [ebp - 0x1c]
mov eax, dword [eax + 0xc]
mov edx, dword [ebp - 4]
call fcn.004594a4
test bl, bl
je 0x4599b4
lea edx, [ebp - 0x18]
mov eax, dword [ebp - 0x1c]
mov eax, dword [eax + 0xc]
call fcn.00459454
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4599d1
lea eax, [ebp - 0x10]
call sub.rtl160.bpl__System_Sysutils_FreeAndNil_qqrpv
ret
cmp dword [ebp - 0xc], 0
je 0x4599e9
mov edx, dword [ebp - 0x1c]
test edx, edx
je 0x4599e1
sub edx, 0xfffffff0
mov eax, dword [ebp - 0xc]
call sub.AxComponentsRTL.bpl__Auslogics_System_Thread_TThread_Synchronize_qqrp31Auslogics_System_Thread_TThread59System__DelphiInte
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x459a1b
lea eax, [ebp - 0x24]
mov edx, 2
call sub.rtl160.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 8]
call sub.rtl160.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 4]
call sub.rtl160.bpl__System__UStrClr_qqrpv
ret