Function at 0x57c670
Capabilities:
Create process on windows

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffff8c
push ebx
push esi
push edi
xor ebx, ebx
mov dword [ebp - 0x70], ebx
mov dword [ebp - 0x74], ebx
mov dword [ebp - 0x68], ebx
mov dword [ebp - 0x6c], ebx
mov dword [ebp - 0x64], ebx
mov dword [ebp - 0x60], ebx
mov dword [ebp - 8], ebx
mov dword [ebp - 4], ecx
mov edi, edx
mov ebx, eax
mov esi, dword [ebp + 8]
mov eax, dword [ebp - 4]
call sub.rtl70.bpl__System__LStrAddRef_qqrpv
xor eax, eax
push ebp
push 0x57c88c
push dword fs:[eax]
mov dword fs:[eax], esp
push 0x57c8a8
push ebx
push 0x57c8a8
lea eax, [ebp - 8]
mov edx, 3
call sub.rtl70.bpl__System__LStrCatN_qqrv
test edi, edi
je 0x57c6e2
push dword [ebp - 8]
push 0x57c8b4
push edi
lea eax, [ebp - 8]
mov edx, 3
call sub.rtl70.bpl__System__LStrCatN_qqrv
lea edx, [ebp - 0x60]
mov eax, ebx
call fcn.0057c55c
mov eax, dword [ebp - 0x60]
mov edx, 0x57c8c0
call sub.rtl70.bpl__Sysutils_CompareText_qqrx17System_AnsiStringt1
test eax, eax
je 0x57c718
lea edx, [ebp - 0x64]
mov eax, ebx
call fcn.0057c55c
mov eax, dword [ebp - 0x64]
mov edx, 0x57c8d0
call sub.rtl70.bpl__Sysutils_CompareText_qqrx17System_AnsiStringt1
test eax, eax
jne 0x57c788
call fcn.0057c39c
test al, al
je 0x57c758
push 0x57c8a8
lea eax, [ebp - 0x6c]
call fcn.0057c5f0
mov eax, dword [ebp - 0x6c]
lea edx, [ebp - 0x68]
call fcn.0057c5ac
push dword [ebp - 0x68]
push 0x57c8e0
push dword [ebp - 8]
push 0x57c8a8
lea eax, [ebp - 8]
mov edx, 5
call sub.rtl70.bpl__System__LStrCatN_qqrv
jmp 0x57c788
push 0x57c8a8
lea eax, [ebp - 0x74]
call fcn.0057c61c
mov eax, dword [ebp - 0x74]
lea edx, [ebp - 0x70]
call fcn.0057c5ac
push dword [ebp - 0x70]
push 0x57c8f8
push dword [ebp - 8]
lea eax, [ebp - 8]
mov edx, 4
call sub.rtl70.bpl__System__LStrCatN_qqrv
cmp dword [ebp - 4], 0
jne 0x57c798
lea edx, [ebp - 4]
mov eax, ebx
call fcn.0057c648
lea eax, [ebp - 0x4c]
xor ecx, ecx
mov edx, 0x44
call sub.rtl70.bpl__System__FillChar_qqrpvic
mov dword [ebp - 0x4c], 0x44
mov dword [ebp - 0x20], 1
mov ax, word [ebp + 0xc]
mov word [ebp - 0x1c], ax
cmp dword [ebp - 4], 0
je 0x57c7cf
mov eax, dword [ebp - 4]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
mov ebx, eax
jmp 0x57c7d1
xor ebx, ebx
lea eax, [ebp - 0x5c]
push eax
lea eax, [ebp - 0x4c]
push eax
push ebx
push 0
push 0x4000000
push 0
push 0
push 0
mov eax, dword [ebp - 8]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
push 0
call sub.kernel32.dll_CreateProcessA
cmp eax, 1
sbb eax, eax
inc eax
mov ebx, eax
test bl, bl
jne 0x57c80c
call sub.kernel32.dll_GetLastError
mov dword [esi], eax
jmp 0x57c864
mov eax, dword [ebp - 0x58]
push eax
call sub.kernel32.dll_CloseHandle
cmp byte [ebp + 0x10], 0
je 0x57c826
push 0xffffffffffffffff
mov eax, dword [ebp - 0x5c]
push eax
call sub.user32.dll_WaitForInputIdle
cmp byte [ebp + 0x14], 0
je 0x57c851
mov eax, dword [sym.imp.vcl70.bpl__Forms_Application]
mov eax, dword [eax]
call sub.vcl70.bpl__Forms_TApplication_ProcessMessages_qqrv
push 0xff
push 0xffffffffffffffff
push 0
lea eax, [ebp - 0x5c]
push eax
push 1
call sub.user32.dll_MsgWaitForMultipleObjects
cmp eax, 1
je 0x57c82c
push esi
mov eax, dword [ebp - 0x5c]
push eax
call sub.kernel32.dll_GetExitCodeProcess
mov eax, dword [ebp - 0x5c]
push eax
call sub.kernel32.dll_CloseHandle
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x57c893
lea eax, [ebp - 0x74]
mov edx, 6
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 8]
mov edx, 2
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
ret