Function at 0x4b03a0
Capabilities:
Access peb ldr_data
Check for peb ntglobalflag flag
Get number of processors
Get process heap flags
Get process heap force flags
Resolve function by parsing pe exports

Disassembly:
push ebp
mov ebp, esp
mov ecx, 0x15
push 0
push 0
dec ecx
jne 0x4b03a8
push ecx
push ebx
push esi
push edi
mov ebx, 0x5a9614
xor eax, eax
push ebp
push 0x4b0cbb
push dword fs:[eax]
mov dword fs:[eax], esp
mov byte [ebx], 0
mov byte [ebp - 5], 0
lea edx, [ebp - 0x20]
xor eax, eax
call sub.rtl120.bpl__System_ParamStr_qqri
mov eax, dword [ebp - 0x20]
lea edx, [ebp - 0x1c]
call sub.rtl120.bpl__Sysutils_ExtractFilePath_qqrx20System_UnicodeString
mov edx, dword [ebp - 0x1c]
lea eax, [ebp - 4]
mov ecx, 0x4b0cdc
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__Sysutils_FileExists_qqrx20System_UnicodeString
test al, al
je 0x4b0c95
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TMemoryStream_]
call sub.rtl120.bpl__System_TObject__bctr_qqrv
mov dword [ebp - 0x14], eax
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TMemoryStream_]
call sub.rtl120.bpl__System_TObject__bctr_qqrv
mov dword [ebp - 0x10], eax
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TStringList_]
call sub.rtl120.bpl__Classes_TStringList__bctr_qqrv
mov dword [ebp - 0x18], eax
xor eax, eax
push ebp
push 0x4b0c8e
push dword fs:[eax]
mov dword fs:[eax], esp
mov edx, dword [ebp - 4]
mov eax, dword [ebp - 0x14]
call sub.rtl120.bpl__Classes_TMemoryStream_LoadFromFile_qqrx20System_UnicodeString
xor eax, eax
push ebp
push 0x4b047b
push dword fs:[eax]
mov dword fs:[eax], esp
push 0x4b0cf8
push 0
push 0
push 0
mov ecx, dword [ebp - 0x10]
mov edx, dword [ebp - 0x14]
mov eax, dword [0x4aa1e4]
call fcn.004af368
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x4b0494
push 0
push 0
mov eax, dword [ebp - 0x10]
call sub.rtl120.bpl__Classes_TStream_SetPosition_qqrxj
mov edx, dword [ebp - 0x10]
mov eax, dword [ebp - 0x18]
mov ecx, dword [eax]
call dword [ecx + 0x70]
xor ecx, ecx
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Inifiles_TMemIniFile_]
call sub.rtl120.bpl__Inifiles_TMemIniFile__bctr_qqrx20System_UnicodeString
mov dword [ebp - 0xc], eax
mov edx, dword [ebp - 0x18]
mov eax, dword [ebp - 0xc]
call sub.rtl120.bpl__Inifiles_TMemIniFile_SetStrings_qqrp16Classes_TStrings
xor eax, eax
push ebp
push 0x4b0c61
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebx + 4]
push eax
lea eax, [ebp - 0x24]
push eax
mov ecx, 0x4b0d50
mov edx, 0x4b0d50
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x24]
lea eax, [ebx + 4]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 8]
push eax
lea eax, [ebp - 0x28]
push eax
mov ecx, 0x4b0d68
mov edx, 0x4b0d8c
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x28]
lea eax, [ebx + 8]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0xc]
push eax
lea eax, [ebp - 0x2c]
push eax
mov edx, 0x4b0d8c
mov ecx, 0x4b0da0
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x2c]
lea eax, [ebx + 0xc]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x10]
push eax
lea eax, [ebp - 0x30]
push eax
mov edx, 0x4b0d8c
mov ecx, 0x4b0dc4
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x30]
lea eax, [ebx + 0x10]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x14]
push eax
lea eax, [ebp - 0x34]
push eax
mov edx, 0x4b0d8c
mov ecx, 0x4b0de8
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x34]
lea eax, [ebx + 0x14]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x18]
push eax
lea eax, [ebp - 0x38]
push eax
mov edx, 0x4b0d8c
mov ecx, 0x4b0e0c
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x38]
lea eax, [ebx + 0x18]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
movzx eax, byte [ebx + 0x1c]
push eax
mov edx, 0x4b0d8c
mov ecx, 0x4b0e30
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0x1c], al
movzx eax, byte [ebx + 0x1d]
push eax
mov edx, 0x4b0d8c
mov ecx, 0x4b0e58
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0x1d], al
movzx eax, byte [ebx + 0x1e]
push eax
mov edx, 0x4b0d8c
mov ecx, 0x4b0e80
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0x1e], al
movzx eax, byte [ebx + 0x1f]
push eax
mov edx, 0x4b0d8c
mov ecx, 0x4b0ea8
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0x1f], al
mov eax, dword [ebx + 0x24]
push eax
lea eax, [ebp - 0x3c]
push eax
mov ecx, 0x4b0ed4
mov edx, 0x4b0ef0
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x3c]
lea eax, [ebx + 0x24]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x28]
push eax
lea eax, [ebp - 0x40]
push eax
mov edx, 0x4b0ef0
mov ecx, 0x4b0f08
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x40]
lea eax, [ebx + 0x28]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x2c]
push eax
lea eax, [ebp - 0x44]
push eax
mov edx, 0x4b0ef0
mov ecx, 0x4b0f24
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x44]
lea eax, [ebx + 0x2c]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x30]
push eax
lea eax, [ebp - 0x48]
push eax
mov edx, 0x4b0ef0
mov ecx, 0x4b0f48
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x48]
lea eax, [ebx + 0x30]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x34]
push eax
lea eax, [ebp - 0x4c]
push eax
mov edx, 0x4b0ef0
mov ecx, 0x4b0f6c
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x4c]
lea eax, [ebx + 0x34]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x38]
push eax
lea eax, [ebp - 0x50]
push eax
mov edx, 0x4b0ef0
mov ecx, 0x4b0f90
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x50]
lea eax, [ebx + 0x38]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x3c]
push eax
lea eax, [ebp - 0x54]
push eax
mov edx, 0x4b0ef0
mov ecx, 0x4b0fb8
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x54]
lea eax, [ebx + 0x3c]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x40]
push eax
lea eax, [ebp - 0x58]
push eax
mov edx, 0x4b0ef0
mov ecx, 0x4b0fdc
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x58]
lea eax, [ebx + 0x40]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x44]
push eax
lea eax, [ebp - 0x5c]
push eax
mov edx, 0x4b0ef0
mov ecx, 0x4b1004
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x5c]
lea eax, [ebx + 0x44]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x48]
push eax
lea eax, [ebp - 0x60]
push eax
mov edx, 0x4b0ef0
mov ecx, 0x4b1030
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x60]
lea eax, [ebx + 0x48]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x4c]
push eax
lea eax, [ebp - 0x64]
push eax
mov edx, 0x4b0ef0
mov ecx, 0x4b1058
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x64]
lea eax, [ebx + 0x4c]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x50]
push eax
lea eax, [ebp - 0x68]
push eax
mov edx, 0x4b0ef0
mov ecx, 0x4b1084
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x68]
lea eax, [ebx + 0x50]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x54]
push eax
lea eax, [ebp - 0x6c]
push eax
mov edx, 0x4b0ef0
mov ecx, 0x4b10b4
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x6c]
lea eax, [ebx + 0x54]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x58]
push eax
lea eax, [ebp - 0x70]
push eax
mov edx, 0x4b0ef0
mov ecx, 0x4b10e0
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x70]
lea eax, [ebx + 0x58]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x5c]
push eax
lea eax, [ebp - 0x74]
push eax
mov edx, 0x4b0ef0
mov ecx, 0x4b1108
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x74]
lea eax, [ebx + 0x5c]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x60]
push eax
lea eax, [ebp - 0x78]
push eax
mov edx, 0x4b0ef0
mov ecx, 0x4b1130
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x78]
lea eax, [ebx + 0x60]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x64]
push eax
lea eax, [ebp - 0x7c]
push eax
mov ecx, 0x4b1160
mov edx, 0x4b1188
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x7c]
lea eax, [ebx + 0x64]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x68]
push eax
lea eax, [ebp - 0x80]
push eax
mov edx, 0x4b1188
mov ecx, 0x4b11a4
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x80]
lea eax, [ebx + 0x68]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x6c]
push eax
lea eax, [ebp - 0x84]
push eax
mov edx, 0x4b1188
mov ecx, 0x4b11cc
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x84]
lea eax, [ebx + 0x6c]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x70]
push eax
lea eax, [ebp - 0x88]
push eax
mov edx, 0x4b1188
mov ecx, 0x4b11f4
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x88]
lea eax, [ebx + 0x70]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x74]
push eax
lea eax, [ebp - 0x8c]
push eax
mov edx, 0x4b1188
mov ecx, 0x4b121c
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x8c]
lea eax, [ebx + 0x74]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
movzx eax, byte [ebx + 0x78]
push eax
mov edx, 0x4b1188
mov ecx, 0x4b1248
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0x78], al
movzx eax, byte [ebx + 0x79]
push eax
mov edx, 0x4b1188
mov ecx, 0x4b1270
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0x79], al
movzx eax, byte [ebx + 0x7a]
push eax
mov edx, 0x4b1188
mov ecx, 0x4b1290
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0x7a], al
movzx eax, byte [ebx + 0x7b]
push eax
mov edx, 0x4b1188
mov ecx, 0x4b12b4
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0x7b], al
movzx eax, byte [ebx + 0x7c]
push eax
mov edx, 0x4b1188
mov ecx, 0x4b12d8
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0x7c], al
movzx eax, byte [ebx + 0x7d]
push eax
mov edx, 0x4b1188
mov ecx, 0x4b12fc
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0x7d], al
mov eax, dword [ebx + 0x80]
push eax
lea eax, [ebp - 0x90]
push eax
mov ecx, 0x4b1320
mov edx, 0x4b1344
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x90]
lea eax, [ebx + 0x80]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x84]
push eax
lea eax, [ebp - 0x94]
push eax
mov edx, 0x4b1344
mov ecx, 0x4b1360
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x94]
lea eax, [ebx + 0x84]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x88]
push eax
lea eax, [ebp - 0x98]
push eax
mov edx, 0x4b1344
mov ecx, 0x4b1384
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x98]
lea eax, [ebx + 0x88]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x8c]
push eax
lea eax, [ebp - 0x9c]
push eax
mov edx, 0x4b1344
mov ecx, 0x4b13a8
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0x9c]
lea eax, [ebx + 0x8c]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x94]
push eax
lea eax, [ebp - 0xa0]
push eax
mov ecx, 0x4b13cc
mov edx, 0x4b13f8
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0xa0]
lea eax, [ebx + 0x94]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x98]
push eax
lea eax, [ebp - 0xa4]
push eax
mov edx, 0x4b13f8
mov ecx, 0x4b141c
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0xa4]
lea eax, [ebx + 0x98]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x9c]
push eax
lea eax, [ebp - 0xa8]
push eax
mov edx, 0x4b13f8
mov ecx, 0x4b1448
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0xa8]
lea eax, [ebx + 0x9c]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0xa0]
push eax
lea eax, [ebp - 0xac]
push eax
mov edx, 0x4b13f8
mov ecx, 0x4b1470
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi]
mov edx, dword [ebp - 0xac]
lea eax, [ebx + 0xa0]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
movzx eax, byte [ebx + 0xa8]
push eax
mov ecx, 0x4b1498
mov edx, 0x4b14c4
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0xa8], al
mov eax, dword [ebx + 0xac]
push eax
mov edx, 0x4b14c4
mov ecx, 0x4b14dc
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 8]
mov dword [ebx + 0xac], eax
movzx eax, byte [ebx + 0x20]
push eax
mov edx, 0x4b0d8c
mov ecx, 0x4b1504
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0x20], al
movzx eax, byte [ebx + 0x21]
push eax
mov edx, 0x4b0d8c
mov ecx, 0x4b1534
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0x21], al
movzx eax, byte [ebx + 0x22]
push eax
mov edx, 0x4b0d8c
mov ecx, 0x4b155c
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0x22], al
movzx eax, byte [ebx + 0xa4]
push eax
mov ecx, 0x4b1580
mov edx, 0x4b15a4
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0xa4], al
movzx eax, byte [ebx + 0xa5]
push eax
mov edx, 0x4b15a4
mov ecx, 0x4b15c0
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0xa5], al
movzx eax, byte [ebx + 0xa6]
push eax
mov edx, 0x4b15a4
mov ecx, 0x4b15e4
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0xa6], al
movzx eax, byte [ebx + 0xa7]
push eax
mov edx, 0x4b15a4
mov ecx, 0x4b1618
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x10]
mov byte [ebx + 0xa7], al
mov byte [ebp - 5], 1
mov byte [ebx], 1
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4b0c68
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 0x4b0cc2
lea eax, [ebp - 0xac]
mov edx, 0x25
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrClr_qqrpv
ret