Function at 0x570e18
Capabilities:
Create process on windows

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffd4
push ebx
push esi
push edi
xor ebx, ebx
mov dword [ebp - 0x24], ebx
mov dword [ebp - 0x28], ebx
mov dword [ebp - 0x2c], ebx
mov dword [ebp - 8], ecx
mov dword [ebp - 4], edx
mov esi, eax
mov eax, dword [ebp - 4]
call sub.rtl140.bpl__System__UStrAddRef_qqrpv
mov eax, dword [ebp - 8]
call sub.rtl140.bpl__System__UStrAddRef_qqrpv
xor eax, eax
push ebp
push 0x570fdd
push dword fs:[eax]
mov dword fs:[eax], esp
xor eax, eax
mov dword [ebp - 0xc], eax
mov eax, dword [ebp + 8]
xor edx, edx
mov dword [eax], edx
mov edx, dword [ebp - 4]
mov eax, esi
call fcn.00568d54
mov edi, eax
push 1
lea edx, [ebp - 0x24]
mov eax, dword [ebp - 4]
call sub.rtl140.bpl__Sysutils_ExtractFilePath_qqrx20System_UnicodeString
mov eax, dword [ebp - 0x24]
call sub.rtl140.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
lea eax, [ebp - 0x28]
mov ecx, dword [ebp - 8]
mov edx, 0x570ffc
call sub.rtl140.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov eax, dword [ebp - 0x28]
call sub.rtl140.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
push 0x571034
push dword [ebp - 4]
push 0x571034
lea eax, [ebp - 0x2c]
mov edx, 3
call sub.rtl140.bpl__System__UStrCatN_qqrv
mov eax, dword [ebp - 0x2c]
call sub.rtl140.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
push 0x571038
push 0
call sub.shell32.dll_ShellExecuteW
call sub.rtl140.bpl__Sysutils_Now_qqrv
fstp qword [ebp - 0x18]
wait
mov edx, dword [ebp - 4]
mov eax, esi
call fcn.00568d54
mov ebx, eax
mov eax, dword [sym.imp.vcl140.bpl__Forms_Application]
mov eax, dword [eax]
call sub.vcl140.bpl__Forms_TApplication_ProcessMessages_qqrv
cmp edi, ebx
jne 0x570f14
call sub.rtl140.bpl__Sysutils_Now_qqrv
add esp, 0xfffffff8
fstp qword [esp]
wait
push dword [ebp - 0x14]
push dword [ebp - 0x18]
call sub.rtl140.bpl__Dateutils_MilliSecondsBetween_qqrx16System_TDateTimet1
cmp edx, 0
jne 0x570f12
cmp eax, 0x4e20
jb 0x570ed1
jmp 0x570f14
jl 0x570ed1
test ebx, ebx
je 0x570fb5
mov dword [ebp - 0xc], ebx
mov eax, dword [ebp + 8]
mov dword [eax], ebx
cmp byte [ebp + 0xc], 0
je 0x570fb5
mov byte [ebp - 0x1d], 0
mov eax, dword [sym.imp.vcl140.bpl__Forms_Application]
mov eax, dword [eax]
call sub.vcl140.bpl__Forms_TApplication_GetActiveFormHandle_qqrv
mov dword [ebp - 0x1c], eax
xor eax, eax
push ebp
push 0x570fae
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 0x1c]
push eax
call sub.user32.dll_IsWindowEnabled
test eax, eax
je 0x570f79
push 0
mov eax, dword [ebp - 0x1c]
push eax
call sub.user32.dll_EnableWindow
mov byte [ebp - 0x1d], 1
jmp 0x570f79
mov eax, dword [sym.imp.vcl140.bpl__Forms_Application]
mov eax, dword [eax]
call sub.vcl140.bpl__Forms_TApplication_ProcessMessages_qqrv
push ebx
call sub.user32.dll_IsWindowVisible
test eax, eax
jne 0x570f6d
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x570fb5
mov eax, dword [sym.imp.vcl140.bpl__Forms_Application]
mov eax, dword [eax]
call sub.vcl140.bpl__Forms_TApplication_BringToFront_qqrv
cmp byte [ebp - 0x1d], 0
je 0x570fad
push 0xffffffffffffffff
mov eax, dword [ebp - 0x1c]
push eax
call sub.user32.dll_EnableWindow
ret
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x570fe4
lea eax, [ebp - 0x2c]
mov edx, 3
call sub.rtl140.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 8]
mov edx, 2
call sub.rtl140.bpl__System__UStrArrayClr_qqrpvi
ret