Function at 0x422234
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 0x42223c
push ecx
push ebx
push esi
push edi
mov ebx, 0x8081e4
xor eax, eax
push ebp
push 0x422b4f
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, 0x422b70
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 0x422b29
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 0x422b22
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 0x42230f
push dword fs:[eax]
mov dword fs:[eax], esp
push 0x422b8c
push 0
push 0
push 0
mov ecx, dword [ebp - 0x10]
mov edx, dword [ebp - 0x14]
mov eax, dword [0x41752c]
call fcn.00420da0
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x422328
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 0x422af5
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebx + 4]
push eax
lea eax, [ebp - 0x24]
push eax
mov ecx, 0x422be4
mov edx, 0x422be4
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, 0x422bfc
mov edx, 0x422c20
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, 0x422c20
mov ecx, 0x422c34
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, 0x422c20
mov ecx, 0x422c58
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, 0x422c20
mov ecx, 0x422c7c
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, 0x422c20
mov ecx, 0x422ca0
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, 0x422c20
mov ecx, 0x422cc4
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, 0x422c20
mov ecx, 0x422cec
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, 0x422c20
mov ecx, 0x422d14
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, 0x422c20
mov ecx, 0x422d3c
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, 0x422d68
mov edx, 0x422d84
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, 0x422d84
mov ecx, 0x422d9c
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, 0x422d84
mov ecx, 0x422db8
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, 0x422d84
mov ecx, 0x422ddc
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, 0x422d84
mov ecx, 0x422e00
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, 0x422d84
mov ecx, 0x422e24
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, 0x422d84
mov ecx, 0x422e4c
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, 0x422d84
mov ecx, 0x422e70
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, 0x422d84
mov ecx, 0x422e98
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, 0x422d84
mov ecx, 0x422ec4
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, 0x422d84
mov ecx, 0x422eec
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, 0x422d84
mov ecx, 0x422f18
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, 0x422d84
mov ecx, 0x422f48
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, 0x422d84
mov ecx, 0x422f74
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, 0x422d84
mov ecx, 0x422f9c
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, 0x422d84
mov ecx, 0x422fc4
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, 0x422ff4
mov edx, 0x42301c
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, 0x42301c
mov ecx, 0x423038
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, 0x42301c
mov ecx, 0x423060
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, 0x42301c
mov ecx, 0x423088
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, 0x42301c
mov ecx, 0x4230b0
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, 0x42301c
mov ecx, 0x4230dc
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, 0x42301c
mov ecx, 0x423104
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, 0x42301c
mov ecx, 0x423124
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, 0x42301c
mov ecx, 0x423148
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, 0x42301c
mov ecx, 0x42316c
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, 0x42301c
mov ecx, 0x423190
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, 0x4231b4
mov edx, 0x4231d8
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, 0x4231d8
mov ecx, 0x4231f4
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, 0x4231d8
mov ecx, 0x423218
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, 0x4231d8
mov ecx, 0x42323c
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, 0x423260
mov edx, 0x42328c
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, 0x42328c
mov ecx, 0x4232b0
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, 0x42328c
mov ecx, 0x4232dc
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, 0x42328c
mov ecx, 0x423304
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, 0x42332c
mov edx, 0x423358
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, 0x423358
mov ecx, 0x423370
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, 0x422c20
mov ecx, 0x423398
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, 0x422c20
mov ecx, 0x4233c8
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, 0x422c20
mov ecx, 0x4233f0
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, 0x423414
mov edx, 0x423438
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, 0x423438
mov ecx, 0x423454
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, 0x423438
mov ecx, 0x423478
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, 0x423438
mov ecx, 0x4234ac
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 0x422afc
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 0x422b56
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