Function at 0x487dc4
Capabilities:
Get file version info

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffbc
push ebx
push esi
push edi
xor ebx, ebx
mov dword [ebp - 0x44], ebx
mov dword [ebp - 0x40], ebx
mov dword [ebp - 0x3c], ebx
mov dword [ebp - 0x38], ebx
mov dword [ebp - 4], ebx
mov dword [ebp - 0xc], ecx
mov dword [ebp - 8], edx
mov esi, eax
mov eax, dword [ebp - 8]
test eax, eax
je 0x487df1
xor edx, edx
mov dword [eax], edx
mov eax, dword [ebp - 0xc]
test eax, eax
je 0x487dfc
xor edx, edx
mov dword [eax], edx
xor eax, eax
push ebp
push 0x487fe0
push dword fs:[eax]
mov dword fs:[eax], esp
mov byte [ebp - 0xd], 0
mov eax, dword [ebp - 8]
xor edx, edx
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 0xc]
xor edx, edx
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 0x1c]
push eax
mov eax, esi
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
mov edi, eax
push edi
call sub.version.dll_GetFileVersionInfoSizeW
mov ebx, eax
test ebx, ebx
je 0x487fbd
mov eax, ebx
call sub.rtl120.bpl__System__GetMem_qqri
mov dword [ebp - 0x14], eax
xor edx, edx
push ebp
push 0x487fb6
push dword fs:[edx]
mov dword fs:[edx], esp
mov eax, dword [ebp - 0x14]
push eax
push ebx
push 0
push edi
call sub.version.dll_GetFileVersionInfoW
cmp eax, 1
sbb eax, eax
inc eax
test al, al
jne 0x487e78
call sub.rtl120.bpl__System__TryFinallyExit_qqrv
jmp 0x487fbd
lea eax, [ebp - 4]
mov edx, 0x488000
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 0x20]
push eax
lea eax, [ebp - 0x24]
push eax
push 0x488014
mov eax, dword [ebp - 0x14]
push eax
call sub.version.dll_VerQueryValueW
test eax, eax
je 0x487ef4
mov eax, dword [ebp - 0x24]
cmp word [eax], 0
jne 0x487eb0
mov eax, dword [ebp - 0x24]
mov word [eax], 0x409
mov eax, dword [ebp - 0x24]
cmp word [eax + 2], 0
jne 0x487ec3
mov eax, dword [ebp - 0x24]
mov word [eax + 2], 0x4e4
lea eax, [ebp - 4]
push eax
mov eax, dword [ebp - 0x24]
movzx eax, word [eax]
mov dword [ebp - 0x34], eax
mov byte [ebp - 0x30], 0
mov eax, dword [ebp - 0x24]
movzx eax, word [eax + 2]
mov dword [ebp - 0x2c], eax
mov byte [ebp - 0x28], 0
lea edx, [ebp - 0x34]
mov ecx, 1
mov eax, 0x488054
call sub.rtl120.bpl__Sysutils_Format_qqrx20System_UnicodeStringpx14System_TVarRecxi
lea eax, [ebp - 0x1c]
push eax
lea eax, [ebp - 0x18]
push eax
push 0x488074
push dword [ebp - 4]
push 0x4880a4
lea eax, [ebp - 0x38]
mov edx, 3
call sub.rtl120.bpl__System__UStrCatN_qqrv
mov eax, dword [ebp - 0x38]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
mov eax, dword [ebp - 0x14]
push eax
call sub.version.dll_VerQueryValueW
cmp eax, 1
sbb eax, eax
inc eax
test al, al
je 0x487f4c
lea edx, [ebp - 0x3c]
mov eax, dword [ebp - 0x18]
call sub.rtl120.bpl__Sysutils_StrPas_qqrpxb
mov edx, dword [ebp - 0x3c]
mov eax, dword [ebp - 8]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov byte [ebp - 0xd], 1
lea eax, [ebp - 0x1c]
push eax
lea eax, [ebp - 0x18]
push eax
push 0x488074
push dword [ebp - 4]
push 0x4880cc
lea eax, [ebp - 0x40]
mov edx, 3
call sub.rtl120.bpl__System__UStrCatN_qqrv
mov eax, dword [ebp - 0x40]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
mov eax, dword [ebp - 0x14]
push eax
call sub.version.dll_VerQueryValueW
cmp eax, 1
sbb eax, eax
inc eax
test al, al
je 0x487fa0
lea edx, [ebp - 0x44]
mov eax, dword [ebp - 0x18]
call sub.rtl120.bpl__Sysutils_StrPas_qqrpxb
mov edx, dword [ebp - 0x44]
mov eax, dword [ebp - 0xc]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x487fbd
mov eax, dword [ebp - 0x14]
call sub.rtl120.bpl__System__FreeMem_qqrpv
ret
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x487fe7
lea eax, [ebp - 0x44]
mov edx, 4
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrClr_qqrpv
ret