Function at 0x5d5cb8
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 0x5d5ed4
push dword fs:[eax]
mov dword fs:[eax], esp
push @Variants@VarIsType$qqrrx14System@Variantpxusxi
push ebx
push @Variants@VarIsType$qqrrx14System@Variantpxusxi
lea eax, [ebp - 8]
mov edx, 3
call sub.rtl70.bpl__System__LStrCatN_qqrv
test edi, edi
je 0x5d5d2a
push dword [ebp - 8]
push 0x5d5efc
push edi
lea eax, [ebp - 8]
mov edx, 3
call sub.rtl70.bpl__System__LStrCatN_qqrv
lea edx, [ebp - 0x60]
mov eax, ebx
call reloc.rtl70.bpl__Variants_VarEnsureRange_qqrrx14System_Variantt1t1
mov eax, dword [ebp - 0x60]
mov edx, 0x5d5f08
call sub.rtl70.bpl__Sysutils_CompareText_qqrx17System_AnsiStringt1
test eax, eax
je 0x5d5d60
lea edx, [ebp - 0x64]
mov eax, ebx
call reloc.rtl70.bpl__Variants_VarEnsureRange_qqrrx14System_Variantt1t1
mov eax, dword [ebp - 0x64]
mov edx, 0x5d5f18
call sub.rtl70.bpl__Sysutils_CompareText_qqrx17System_AnsiStringt1
test eax, eax
jne 0x5d5dd0
call fcn.005d59e4
test al, al
je 0x5d5da0
push @Variants@VarIsType$qqrrx14System@Variantpxusxi
lea eax, [ebp - 0x6c]
call fcn.005d5c38
mov eax, dword [ebp - 0x6c]
lea edx, [ebp - 0x68]
call fcn.005d5bf4
push dword [ebp - 0x68]
push 0x5d5f28
push dword [ebp - 8]
push @Variants@VarIsType$qqrrx14System@Variantpxusxi
lea eax, [ebp - 8]
mov edx, 5
call sub.rtl70.bpl__System__LStrCatN_qqrv
jmp 0x5d5dd0
push @Variants@VarIsType$qqrrx14System@Variantpxusxi
lea eax, [ebp - 0x74]
call fcn.005d5c64
mov eax, dword [ebp - 0x74]
lea edx, [ebp - 0x70]
call fcn.005d5bf4
push dword [ebp - 0x70]
push 0x5d5f40
push dword [ebp - 8]
lea eax, [ebp - 8]
mov edx, 4
call sub.rtl70.bpl__System__LStrCatN_qqrv
cmp dword [ebp - 4], 0
jne 0x5d5de0
lea edx, [ebp - 4]
mov eax, ebx
call @Variants@VarIsStr$qqrrx14System@Variant
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 @Variants@VarIsNumeric$qqrrx14System@Variant
mov eax, dword [ebp - 4]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
mov ebx, eax
jmp 0x5d5e19
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 0x5d5e54
call sub.kernel32.dll_GetLastError
mov dword [esi], eax
jmp 0x5d5eac
mov eax, dword [ebp - 0x58]
push eax
call sub.kernel32.dll_CloseHandle
cmp byte [ebp + 0x10], 0
je 0x5d5e6e
push 0xffffffffffffffff
mov eax, dword [ebp - 0x5c]
push eax
call sub.user32.dll_WaitForInputIdle
cmp byte [ebp + 0x14], 0
je 0x5d5e99
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 @Variants@VarIsCustom$qqrrx14System@Variant
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 0x5d5edb
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