Function at 0x487ed8
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 0x4883fa
push dword fs:[eax]
mov dword fs:[eax], esp
mov byte [ebp - 0x25], 0
test bl, bl
jne 0x487f30
test byte [esi + 0x1c], 0x10
jne 0x4883ca
mov eax, esi
call fcn.004885bc
test al, al
je 0x4883ca
lea eax, [ebp - 4]
mov edx, dword [0x590420]
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 0x4883c3
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.0048728c
dec eax
test eax, eax
jl 0x4880c5
inc eax
mov dword [ebp - 0x38], eax
mov dword [ebp - 0x30], 0
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.0048729c
cmp byte [eax + 0x3a], 0
je 0x4880b9
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.0048729c
mov eax, dword [eax + 0x30]
mov edx, 0x488418
call sub.rtl120.bpl__System__UStrEqual_qqrv
je 0x4880b9
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.0048729c
cmp dword [eax + 0x30], 0
je 0x4880b9
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.0048729c
mov eax, dword [eax + 0x30]
lea edx, [ebp - 0x3c]
call fcn.0048a298
mov eax, dword [ebp - 0x3c]
lea edx, [ebp - 0x1c]
call sub.rtl120.bpl__Sysutils_UpperCase_qqrx20System_UnicodeString
cmp dword [ebp - 0x1c], 0
jne 0x48804b
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.0048729c
push eax
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.0048729c
mov ecx, dword [eax + 0x30]
xor edx, edx
mov eax, dword [ebp - 0x2c]
mov ebx, dword [eax]
call dword [ebx + 0x64]
jmp 0x4880b9
mov edx, dword [0x590420]
mov eax, dword [ebp - 0x1c]
call sub.rtl120.bpl__Sysutils_AnsiPos_qqrx20System_UnicodeStringt1
test eax, eax
je 0x4880b9
push ebp
mov eax, dword [ebp - 0x1c]
call fcn.00487c50
pop ecx
test al, al
jne 0x4880b9
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.0048729c
add eax, 0x30
push eax
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.0048729c
mov eax, dword [eax + 0x30]
lea edx, [ebp - 0x40]
call fcn.0048a17c
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.0048729c
push eax
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.0048729c
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 0x487fbc
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 0x488273
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 0x488201
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 0x4881df
mov esi, dword [ebp - 0x20]
test esi, esi
je 0x48814f
mov eax, esi
sub eax, 0xa
cmp word [eax], 2
je 0x48814f
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 0x488164
cmp word [esi + ebx*2 - 2], 0xdfff
ja 0x488164
inc ebx
jmp 0x4881de
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.00487c50
pop ecx
test al, al
je 0x4881de
mov eax, dword [sym.imp.rtl120.bpl__Sysutils_SysLocale]
cmp byte [eax + 0xc], 0
je 0x4881aa
lea eax, [ebp - 0x20]
mov ecx, ebx
mov edx, dword [ebp - 0x1c]
call fcn.00487d04
jmp 0x4881b9
lea edx, [ebp - 0x20]
mov ecx, ebx
mov eax, 0x488428
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 0x4881f4
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 0x488130
dec dword [ebp - 0x30]
cmp dword [ebp - 0x30], 0xffffffff
jne 0x488118
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x14]
cmp eax, dword [ebp - 0x10]
jle 0x488215
push ebp
call fcn.00487c80
pop ecx
mov eax, dword [ebp - 0x14]
mov edx, dword [eax]
call dword [edx + 0x14]
test eax, eax
jle 0x488273
mov eax, dword [ebp - 0x14]
mov edx, dword [eax]
call dword [edx + 0x14]
mov esi, eax
dec esi
test esi, esi
jl 0x48826a
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 0x488238
dec dword [ebp - 0x38]
jne 0x4880e5
cmp dword [ebp - 0x10], 0
jne 0x488280
push ebp
call fcn.00487c80
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 0x488395
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 0x488373
mov edx, dword [ebp - 0x20]
mov eax, 0x488428
call sub.rtl120.bpl__Sysutils_AnsiPos_qqrx20System_UnicodeStringt1
test eax, eax
jne 0x488373
cmp dword [ebp - 0x18], 0
je 0x488373
mov edx, dword [ebp - 0x20]
mov eax, 0x488428
call sub.rtl120.bpl__Sysutils_AnsiPos_qqrx20System_UnicodeStringt1
test eax, eax
jne 0x488373
mov eax, dword [ebp - 0x18]
test eax, eax
je 0x488314
mov edx, eax
sub edx, 0xa
cmp word [edx], 2
je 0x488314
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 0x48831f
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.00487d04
mov eax, dword [ebp - 0x18]
test eax, eax
je 0x48835c
mov edx, eax
sub edx, 0xa
cmp word [edx], 2
je 0x48835c
lea eax, [ebp - 0x18]
mov edx, dword [ebp - 0x18]
call sub.rtl120.bpl__System__InternalUStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
test eax, eax
je 0x488365
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 0x4882aa
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4883ca
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 0x488401
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