Function at 0x487f10
Capabilities:
Resolve function by parsing pe exports

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffb8
push ebx
push esi
xor ecx, ecx
mov dword [ebp - 0x48], ecx
mov dword [ebp - 0x44], ecx
mov dword [ebp - 0x40], ecx
mov dword [ebp - 0x3c], ecx
mov dword [ebp - 0x1c], ecx
mov dword [ebp - 0x20], ecx
mov dword [ebp - 0x24], ecx
mov dword [ebp - 4], ecx
mov dword [ebp - 0x18], ecx
mov ebx, edx
mov esi, eax
xor eax, eax
push ebp
push 0x488432
push dword fs:[eax]
mov dword fs:[eax], esp
mov byte [ebp - 0x25], 0
test bl, bl
jne 0x487f68
test byte [esi + 0x1c], 0x10
jne 0x488402
mov eax, esi
call fcn.004885f4
test al, al
je 0x488402
lea eax, [ebp - 4]
mov edx, dword [0x599420]
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
xor eax, eax
mov dword [ebp - 0xc], eax
xor eax, eax
mov dword [ebp - 0x14], eax
xor eax, eax
mov dword [ebp - 0x2c], eax
xor eax, eax
mov dword [ebp - 8], eax
xor eax, eax
mov dword [ebp - 0x10], eax
xor edx, edx
push ebp
push 0x4883fb
push dword fs:[edx]
mov dword fs:[edx], esp
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TStringList_]
call sub.rtl120.bpl__Classes_TStringList__bctr_qqrv
mov dword [ebp - 0xc], eax
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TStringList_]
call sub.rtl120.bpl__Classes_TStringList__bctr_qqrv
mov dword [ebp - 0x14], eax
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TStringList_]
call sub.rtl120.bpl__Classes_TStringList__bctr_qqrv
mov dword [ebp - 0x2c], eax
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TStringList_]
call sub.rtl120.bpl__Classes_TStringList__bctr_qqrv
mov dword [ebp - 8], eax
mov eax, esi
call fcn.004872c4
dec eax
test eax, eax
jl 0x4880fd
inc eax
mov dword [ebp - 0x38], eax
mov dword [ebp - 0x30], 0
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.004872d4
cmp byte [eax + 0x3a], 0
je 0x4880f1
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.004872d4
mov eax, dword [eax + 0x30]
mov edx, 0x488450
call sub.rtl120.bpl__System__UStrEqual_qqrv
je 0x4880f1
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.004872d4
cmp dword [eax + 0x30], 0
je 0x4880f1
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.004872d4
mov eax, dword [eax + 0x30]
lea edx, [ebp - 0x3c]
call fcn.0048a2d0
mov eax, dword [ebp - 0x3c]
lea edx, [ebp - 0x1c]
call sub.rtl120.bpl__Sysutils_UpperCase_qqrx20System_UnicodeString
cmp dword [ebp - 0x1c], 0
jne 0x488083
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.004872d4
push eax
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.004872d4
mov ecx, dword [eax + 0x30]
xor edx, edx
mov eax, dword [ebp - 0x2c]
mov ebx, dword [eax]
call dword [ebx + 0x64]
jmp 0x4880f1
mov edx, dword [0x599420]
mov eax, dword [ebp - 0x1c]
call sub.rtl120.bpl__Sysutils_AnsiPos_qqrx20System_UnicodeStringt1
test eax, eax
je 0x4880f1
push ebp
mov eax, dword [ebp - 0x1c]
call fcn.00487c88
pop ecx
test al, al
jne 0x4880f1
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.004872d4
add eax, 0x30
push eax
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.004872d4
mov eax, dword [eax + 0x30]
lea edx, [ebp - 0x40]
call fcn.0048a1b4
mov edx, dword [ebp - 0x40]
pop eax
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.004872d4
push eax
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.004872d4
mov ecx, dword [eax + 0x30]
xor edx, edx
mov eax, dword [ebp - 0x2c]
mov ebx, dword [eax]
call dword [ebx + 0x64]
inc dword [ebp - 0x30]
dec dword [ebp - 0x38]
jne 0x487ff4
lea eax, [ebp - 0x24]
mov edx, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 0x2c]
mov edx, dword [eax]
call dword [edx + 0x14]
dec eax
test eax, eax
jl 0x4882ab
inc eax
mov dword [ebp - 0x38], eax
lea eax, [ebp - 4]
mov edx, dword [ebp - 0x24]
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, dword [ebp - 0x2c]
mov eax, dword [ebp - 0x14]
mov ecx, dword [eax]
call dword [ecx + 8]
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x44]
mov eax, dword [ebp - 0x14]
mov edx, dword [eax]
call dword [edx + 0x14]
dec eax
cmp eax, 0
jl 0x488239
mov dword [ebp - 0x30], eax
lea ecx, [ebp - 0x20]
mov edx, dword [ebp - 0x30]
mov eax, dword [ebp - 0x14]
mov ebx, dword [eax]
call dword [ebx + 0xc]
mov ebx, 1
jmp 0x488217
mov esi, dword [ebp - 0x20]
test esi, esi
je 0x488187
mov eax, esi
sub eax, 0xa
cmp word [eax], 2
je 0x488187
lea eax, [ebp - 0x20]
mov edx, dword [ebp - 0x20]
call sub.rtl120.bpl__System__InternalUStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
mov esi, eax
cmp word [esi + ebx*2 - 2], 0xd800
jb 0x48819c
cmp word [esi + ebx*2 - 2], 0xdfff
ja 0x48819c
inc ebx
jmp 0x488216
lea eax, [ebp - 0x44]
push eax
mov ecx, 1
mov edx, ebx
mov eax, dword [ebp - 0x20]
call sub.rtl120.bpl__System__UStrCopy_qqrx20System_UnicodeStringii
mov eax, dword [ebp - 0x44]
lea edx, [ebp - 0x1c]
call sub.rtl120.bpl__Sysutils_UpperCase_qqrx20System_UnicodeString
push ebp
mov eax, dword [ebp - 0x1c]
call fcn.00487c88
pop ecx
test al, al
je 0x488216
mov eax, dword [sym.imp.rtl120.bpl__Sysutils_SysLocale]
cmp byte [eax + 0xc], 0
je 0x4881e2
lea eax, [ebp - 0x20]
mov ecx, ebx
mov edx, dword [ebp - 0x1c]
call fcn.00487d3c
jmp 0x4881f1
lea edx, [ebp - 0x20]
mov ecx, ebx
mov eax, 0x488460
call sub.rtl120.bpl__System__UStrInsert_qqrx20System_UnicodeStringr20System_UnicodeStringi
mov edx, dword [ebp - 0x30]
mov eax, dword [ebp - 0x14]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov ecx, eax
mov edx, dword [ebp - 0x20]
mov eax, dword [ebp - 0xc]
mov ebx, dword [eax]
call dword [ebx + 0x3c]
mov edx, dword [ebp - 0x30]
mov eax, dword [ebp - 0x14]
mov ecx, dword [eax]
call dword [ecx + 0x48]
jmp 0x48822c
inc ebx
lea eax, [ebp - 0x20]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
cmp ebx, eax
jle 0x488168
dec dword [ebp - 0x30]
cmp dword [ebp - 0x30], 0xffffffff
jne 0x488150
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x14]
cmp eax, dword [ebp - 0x10]
jle 0x48824d
push ebp
call fcn.00487cb8
pop ecx
mov eax, dword [ebp - 0x14]
mov edx, dword [eax]
call dword [edx + 0x14]
test eax, eax
jle 0x4882ab
mov eax, dword [ebp - 0x14]
mov edx, dword [eax]
call dword [edx + 0x14]
mov esi, eax
dec esi
test esi, esi
jl 0x4882a2
inc esi
mov dword [ebp - 0x30], 0
mov edx, dword [ebp - 0x30]
mov eax, dword [ebp - 0x14]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov edx, eax
mov eax, dword [ebp - 0x2c]
mov ecx, dword [eax]
call dword [ecx + 0x5c]
mov ebx, eax
mov eax, dword [ebp - 0x2c]
mov edx, dword [eax]
call dword [edx + 0x14]
mov ecx, eax
dec ecx
mov edx, ebx
mov eax, dword [ebp - 0x2c]
mov ebx, dword [eax]
call dword [ebx + 0x78]
inc dword [ebp - 0x30]
dec esi
jne 0x488270
dec dword [ebp - 0x38]
jne 0x48811d
cmp dword [ebp - 0x10], 0
jne 0x4882b8
push ebp
call fcn.00487cb8
pop ecx
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx + 0x14]
test eax, eax
setg byte [ebp - 0x25]
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx + 0x14]
dec eax
test eax, eax
jl 0x4883cd
inc eax
mov dword [ebp - 0x38], eax
mov dword [ebp - 0x30], 0
lea ecx, [ebp - 0x20]
mov edx, dword [ebp - 0x30]
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0xc]
mov eax, dword [sym.imp.rtl120.bpl__Sysutils_SysLocale]
cmp byte [eax + 0xc], 0
je 0x4883ab
mov edx, dword [ebp - 0x20]
mov eax, 0x488460
call sub.rtl120.bpl__Sysutils_AnsiPos_qqrx20System_UnicodeStringt1
test eax, eax
jne 0x4883ab
cmp dword [ebp - 0x18], 0
je 0x4883ab
mov edx, dword [ebp - 0x20]
mov eax, 0x488460
call sub.rtl120.bpl__Sysutils_AnsiPos_qqrx20System_UnicodeStringt1
test eax, eax
jne 0x4883ab
mov eax, dword [ebp - 0x18]
test eax, eax
je 0x48834c
mov edx, eax
sub edx, 0xa
cmp word [edx], 2
je 0x48834c
lea eax, [ebp - 0x18]
mov edx, dword [ebp - 0x18]
call sub.rtl120.bpl__System__InternalUStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
mov ebx, eax
test ebx, ebx
je 0x488357
sub ebx, 4
mov ebx, dword [ebx]
lea eax, [ebp - 0x48]
push eax
mov ecx, 1
mov edx, ebx
mov eax, dword [ebp - 0x18]
call sub.rtl120.bpl__System__UStrCopy_qqrx20System_UnicodeStringii
mov edx, dword [ebp - 0x48]
lea eax, [ebp - 0x20]
xor ecx, ecx
call fcn.00487d3c
mov eax, dword [ebp - 0x18]
test eax, eax
je 0x488394
mov edx, eax
sub edx, 0xa
cmp word [edx], 2
je 0x488394
lea eax, [ebp - 0x18]
mov edx, dword [ebp - 0x18]
call sub.rtl120.bpl__System__InternalUStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
test eax, eax
je 0x48839d
sub eax, 4
mov eax, dword [eax]
lea edx, [ebp - 0x18]
mov ecx, 1
xchg edx, eax
call sub.rtl120.bpl__System__UStrDelete_qqrr20System_UnicodeStringii
mov edx, dword [ebp - 0x30]
mov eax, dword [ebp - 8]
mov ecx, dword [eax]
call dword [ecx + 0x18]
add eax, 0x30
mov edx, dword [ebp - 0x20]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
inc dword [ebp - 0x30]
dec dword [ebp - 0x38]
jne 0x4882e2
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x488402
mov eax, dword [ebp - 8]
call sub.rtl120.bpl__System_TObject_Free_qqrv
mov eax, dword [ebp - 0x2c]
call sub.rtl120.bpl__System_TObject_Free_qqrv
mov eax, dword [ebp - 0x14]
call sub.rtl120.bpl__System_TObject_Free_qqrv
mov eax, dword [ebp - 0xc]
call sub.rtl120.bpl__System_TObject_Free_qqrv
ret
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x488439
lea eax, [ebp - 0x48]
mov edx, 4
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0x24]
mov edx, 4
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrClr_qqrpv
ret