Function at 0x40af80
Capabilities:
Print debug messages

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffff98
push ebx
push esi
push edi
xor ebx, ebx
mov dword [ebp - 0x68], ebx
mov dword [ebp - 0x3c], ebx
mov dword [ebp - 0x38], ebx
mov dword [ebp - 0x1c], ebx
mov dword [ebp - 0x30], ebx
mov dword [ebp - 0x34], ebx
mov dword [ebp - 0xc], ebx
mov dword [ebp - 0x10], ebx
mov dword [ebp - 0x14], ebx
mov dword [ebp - 0x18], ebx
mov dword [ebp - 8], ecx
mov dword [ebp - 4], edx
mov ebx, dword [ebp + 0x14]
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrAddRef_qqrpv
mov eax, dword [ebp - 8]
call sub.rtl120.bpl__System__UStrAddRef_qqrpv
mov eax, dword [ebp + 0x10]
call sub.rtl120.bpl__System__UStrAddRef_qqrpv
xor eax, eax
push ebp
push 0x40b222
push dword fs:[eax]
mov dword fs:[eax], esp
inc dword [0x56c048]
lea eax, [ebp - 0x14]
xor edx, edx
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
cmp byte [ebp + 0xc], 0
je 0x40b048
lea eax, [ebp - 0x1c]
push eax
mov eax, dword [ebp - 4]
mov dword [ebp - 0x2c], eax
mov byte [ebp - 0x28], 0x11
lea edx, [ebp - 0x34]
mov eax, dword [ebx]
call sub.rtl120.bpl__System_TObject_ClassName_qqrv
push dword [ebp - 0x34]
push 0x40b240
push dword [ebx + 4]
lea eax, [ebp - 0x30]
mov edx, 3
call sub.rtl120.bpl__System__UStrCatN_qqrv
mov eax, dword [ebp - 0x30]
mov dword [ebp - 0x24], eax
mov byte [ebp - 0x20], 0x11
lea edx, [ebp - 0x2c]
mov ecx, 1
mov eax, 0x40b250
call fcn.00407918
mov eax, dword [ebp - 0x1c]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
call sub.kernel32.dll_OutputDebugStringW
cmp dword [0x56c01c], 0
je 0x40b1ea
mov eax, dword [0x56c01c]
cmp byte [eax + 0x40], 0
je 0x40b1ea
mov eax, dword [0x56c01c]
cmp byte [eax + 0x41], 0
je 0x40b1ea
lea edx, [ebp - 0x38]
mov eax, dword [ebx]
call sub.rtl120.bpl__System_TObject_ClassName_qqrv
push dword [ebp - 0x38]
push 0x40b240
push dword [ebx + 4]
lea eax, [ebp - 0x18]
mov edx, 3
call sub.rtl120.bpl__System__UStrCatN_qqrv
xor eax, eax
push ebp
push 0x40b0c6
push dword fs:[eax]
mov dword fs:[eax], esp
call fcn.00407988
add esp, 0xfffffff8
fstp qword [esp]
wait
lea edx, [ebp - 0xc]
mov eax, 0x40b28c
call fcn.004079a8
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x40b0dd
lea eax, [ebp - 0x14]
push eax
call sub.kernel32.dll_GetCurrentThreadId
xor edx, edx
push edx
push eax
lea eax, [ebp - 0x3c]
call fcn.00407768
mov eax, dword [ebp - 0x3c]
mov ecx, 4
mov edx, 1
call sub.rtl120.bpl__System__UStrCopy_qqrx20System_UnicodeStringii
cmp dword [ebp + 0x10], 0
je 0x40b131
push 0x40b2d0
push dword [ebp + 0x10]
push 0x40b2e0
push dword [ebp - 0x18]
push 0x40b2f0
push dword [ebp - 8]
lea eax, [ebp - 8]
mov edx, 6
call sub.rtl120.bpl__System__UStrCatN_qqrv
jmp 0x40b149
push dword [ebp - 0x18]
push 0x40b2f0
push dword [ebp - 8]
lea eax, [ebp - 8]
mov edx, 3
call sub.rtl120.bpl__System__UStrCatN_qqrv
lea eax, [ebp - 0x10]
push eax
mov eax, dword [ebp - 0xc]
mov dword [ebp - 0x64], eax
mov byte [ebp - 0x60], 0x11
mov eax, dword [0x56c020]
mov dword [ebp - 0x5c], eax
mov byte [ebp - 0x58], 0x11
mov eax, dword [ebp - 4]
mov dword [ebp - 0x54], eax
mov byte [ebp - 0x50], 0x11
mov eax, dword [ebp - 0x14]
mov dword [ebp - 0x4c], eax
mov byte [ebp - 0x48], 0x11
mov eax, dword [ebp - 8]
mov dword [ebp - 0x44], eax
mov byte [ebp - 0x40], 0x11
lea edx, [ebp - 0x64]
mov ecx, 4
mov eax, 0x40b300
call fcn.00407918
lea edx, [ebp - 0x68]
mov eax, dword [ebp + 8]
call fcn.00407760
mov edx, dword [ebp - 0x68]
lea eax, [ebp - 0x10]
mov ecx, dword [ebp - 0x10]
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
call 0x40a7fc
test al, al
je 0x40b1ea
xor eax, eax
push ebp
push 0x40b1e3
push dword fs:[eax]
mov dword fs:[eax], esp
mov edx, dword [ebp - 0x10]
mov eax, dword [0x56c03c]
mov ecx, dword [eax]
call dword [ecx + 0x38]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x40b1ea
call fcn.0040a840
ret
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x40b229
lea eax, [ebp - 0x68]
call sub.rtl120.bpl__System__UStrClr_qqrpv
lea eax, [ebp - 0x3c]
mov edx, 4
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0x1c]
mov edx, 7
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp + 0x10]
call sub.rtl120.bpl__System__UStrClr_qqrpv
ret