Function at 0x408b10
Capabilities:
Create process on windows

Disassembly:
push ebp
mov ebp, esp
mov ecx, 0x2b
push 0
push 0
dec ecx
jne 0x408b18
push ecx
push ebx
push esi
push edi
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x4098c7
push dword fs:[eax]
mov dword fs:[eax], esp
mov byte [ebp - 0x35], 0
mov dl, 1
mov eax, dword [sym.imp.rtl70.bpl__Classes_TStringList_]
call sub.rtl70.bpl__System_TObject__bctr_qqrv
mov dword [ebp - 0x34], eax
lea eax, [ebp - 0x30]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
mov eax, dword [ebp - 4]
mov ecx, dword [eax + 0x20]
lea eax, [ebp - 0x50]
mov edx, 0x4098e4
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov edx, dword [ebp - 0x50]
lea eax, [ebp - 0x4c]
call sub.rtl70.bpl__System__WStrFromLStr_qqrr17System_WideStringx17System_AnsiString
mov eax, dword [ebp - 0x4c]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x18]
push eax
mov eax, dword [eax]
call dword [eax + 0x94]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
lea eax, [ebp - 0x40]
push eax
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x20]
lea eax, [ebp - 0x54]
mov ecx, 0x4098f4
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov ecx, dword [ebp - 0x54]
mov edx, 0x409904
mov eax, dword [ebp - 0x30]
call fcn.004060b4
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov esi, dword [eax + 8]
dec esi
test esi, esi
jl 0x408c9e
inc esi
xor ebx, ebx
mov eax, dword [ebp - 4]
cmp byte [eax + 0x10], 0
je 0x408beb
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov eax, dword [eax + 8]
mov edx, 0x409918
call sub.rtl70.bpl__System__LStrCmp_qqrv
je 0x408c96
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov eax, dword [eax + 8]
mov edx, 0x409918
call sub.rtl70.bpl__System__LStrCmp_qqrv
jne 0x408c24
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov ecx, dword [eax + 0xc]
lea eax, [ebp - 0x3c]
mov edx, 0x409928
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov edx, dword [eax + 0xc]
mov eax, dword [ebp - 4]
call fcn.00406c8c
cmp word [0x41f2c2], 0
je 0x408c66
lea eax, [ebx + 1]
imul eax, eax, 0x32
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0x14]
mov ecx, dword [edx + 8]
cdq
idiv ecx
mov edx, eax
mov eax, dword [0x41f2c4]
call dword [0x41f2c0]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov edx, dword [eax + 0xc]
lea eax, [ebp - 0x10]
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov edx, dword [eax + 0x14]
lea eax, [ebp - 0x1c]
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
inc ebx
dec esi
jne 0x408bc2
xor ecx, ecx
mov dl, 1
mov eax, dword [sym.imp.VCLZipD7_3.bpl__Vclunzip_TVCLUnZip_]
call sub.VCLZipD7_3.bpl__Vclunzip_TVCLUnZip__bctr_qqrp18Classes_TComponent
mov dword [ebp - 0x48], eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov esi, dword [eax + 8]
dec esi
test esi, esi
jl 0x4091d0
inc esi
xor ebx, ebx
lea eax, [ebp - 8]
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0x20]
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov edx, dword [eax + 0xc]
lea eax, [ebp - 0x10]
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov edx, dword [eax + 8]
lea eax, [ebp - 0x18]
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov edx, dword [eax + 0x1c]
lea eax, [ebp - 0x14]
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov edx, dword [eax + 0x14]
lea eax, [ebp - 0x1c]
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
lea eax, [ebp - 0x20]
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0xc]
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov eax, dword [eax + 8]
mov edx, 0x40993c
call sub.rtl70.bpl__System__LStrCmp_qqrv
je 0x408d8c
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov eax, dword [eax + 8]
mov edx, 0x409918
call sub.rtl70.bpl__System__LStrCmp_qqrv
je 0x408d8c
mov eax, dword [ebp - 0x20]
call sub.rtl70.bpl__Sysutils_DirectoryExists_qqrx17System_AnsiString
test al, al
jne 0x408d8c
mov eax, dword [ebp - 0x20]
call sub.rtl70.bpl__Sysutils_ForceDirectories_qqr17System_AnsiString
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov eax, dword [eax + 8]
mov edx, 0x40993c
call sub.rtl70.bpl__System__LStrCmp_qqrv
jne 0x408e3d
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x2c]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov al, byte [eax + 0x10]
push eax
lea eax, [ebp - 0x58]
mov ecx, dword [ebp - 0x10]
mov edx, 0x409928
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov ecx, dword [ebp - 0x58]
mov edx, dword [ebp - 0x48]
mov eax, dword [ebp - 4]
call fcn.00408574
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
cmp byte [eax + 0x18], 0
je 0x408fc7
mov eax, dword [ebp - 4]
push dword [eax + 0x2c]
push 0x409950
mov al, byte [0x409954]
push eax
lea eax, [ebp - 0x60]
push eax
xor ecx, ecx
mov edx, 0x409960
mov eax, dword [ebp - 0x10]
call sub.rtl70.bpl__Sysutils_StringReplace_qqrx17System_AnsiStringt1t149System__Set_t21Sysutils_SysUtils__94_iuc_0_iuc_1_
push dword [ebp - 0x60]
lea eax, [ebp - 0x5c]
mov edx, 3
call sub.rtl70.bpl__System__LStrCatN_qqrv
mov edx, dword [ebp - 0x5c]
mov eax, dword [ebp - 0x34]
mov ecx, dword [eax]
call dword [ecx + 0x38]
jmp 0x408fc7
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov eax, dword [eax + 8]
mov edx, 0x409970
call sub.rtl70.bpl__System__LStrCmp_qqrv
jne 0x408eee
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x28]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov al, byte [eax + 0x10]
push eax
lea eax, [ebp - 0x64]
mov ecx, dword [ebp - 0x10]
mov edx, 0x409928
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov ecx, dword [ebp - 0x64]
mov edx, dword [ebp - 0x48]
mov eax, dword [ebp - 4]
call fcn.00408574
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
cmp byte [eax + 0x18], 0
je 0x408fc7
mov eax, dword [ebp - 4]
push dword [eax + 0x2c]
push 0x409950
mov al, byte [0x409954]
push eax
lea eax, [ebp - 0x6c]
push eax
xor ecx, ecx
mov edx, 0x409960
mov eax, dword [ebp - 0x10]
call sub.rtl70.bpl__Sysutils_StringReplace_qqrx17System_AnsiStringt1t149System__Set_t21Sysutils_SysUtils__94_iuc_0_iuc_1_
push dword [ebp - 0x6c]
lea eax, [ebp - 0x68]
mov edx, 3
call sub.rtl70.bpl__System__LStrCatN_qqrv
mov edx, dword [ebp - 0x68]
mov eax, dword [ebp - 0x34]
mov ecx, dword [eax]
call dword [ecx + 0x38]
jmp 0x408fc7
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov eax, dword [eax + 8]
mov edx, 0x409918
call sub.rtl70.bpl__System__LStrCmp_qqrv
jne 0x408f45
mov byte [ebp - 0x35], 1
mov eax, dword [ebp - 4]
cmp byte [eax + 0x10], 0
jne 0x408fc7
push 0x409984
push 0
lea eax, [ebp - 0x70]
mov ecx, dword [ebp - 0x10]
mov edx, 0x409928
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov ecx, dword [ebp - 0x70]
mov edx, dword [ebp - 0x48]
mov eax, dword [ebp - 4]
call fcn.00408574
jmp 0x408fc7
mov eax, dword [ebp - 0x20]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov al, byte [eax + 0x10]
push eax
lea eax, [ebp - 0x74]
mov ecx, dword [ebp - 0x10]
mov edx, 0x409928
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov ecx, dword [ebp - 0x74]
mov edx, dword [ebp - 0x48]
mov eax, dword [ebp - 4]
call fcn.00408574
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
cmp byte [eax + 0x18], 0
je 0x408fc7
push dword [ebp - 0x20]
push 0x409950
mov al, byte [0x409954]
push eax
lea eax, [ebp - 0x7c]
push eax
xor ecx, ecx
mov edx, 0x409960
mov eax, dword [ebp - 0x10]
call sub.rtl70.bpl__Sysutils_StringReplace_qqrx17System_AnsiStringt1t149System__Set_t21Sysutils_SysUtils__94_iuc_0_iuc_1_
push dword [ebp - 0x7c]
lea eax, [ebp - 0x78]
mov edx, 3
call sub.rtl70.bpl__System__LStrCatN_qqrv
mov edx, dword [ebp - 0x78]
mov eax, dword [ebp - 0x34]
mov ecx, dword [eax]
call dword [ecx + 0x38]
mov al, byte [0x40998c]
push eax
lea eax, [ebp - 0x84]
push eax
xor ecx, ecx
mov edx, 0x409960
mov eax, dword [ebp - 0x10]
call sub.rtl70.bpl__Sysutils_StringReplace_qqrx17System_AnsiStringt1t149System__Set_t21Sysutils_SysUtils__94_iuc_0_iuc_1_
mov eax, dword [ebp - 0x84]
lea edx, [ebp - 0x80]
call sub.rtl70.bpl__Sysutils_UpperCase_qqrx17System_AnsiString
mov eax, dword [ebp - 0x80]
push eax
lea edx, [ebp - 0x88]
mov eax, dword [ebp - 0x40]
call sub.rtl70.bpl__Sysutils_UpperCase_qqrx17System_AnsiString
mov edx, dword [ebp - 0x88]
pop eax
call sub.rtl70.bpl__System__LStrCmp_qqrv
jne 0x4090cc
lea eax, [ebp - 0x98]
mov edx, dword [ebp - 0x20]
call sub.rtl70.bpl__Variants__VarFromLStr_qqrr8TVarDatax17System_AnsiString
lea eax, [ebp - 0x98]
push eax
lea eax, [ebp - 0xa8]
push eax
mov eax, dword [ebp - 0x20]
call sub.rtl70.bpl__System__LStrLen_qqrx17System_AnsiString
mov edx, dword [ebp - 0x20]
cmp byte [edx + eax - 1], 0x5c
sete al
push eax
mov al, 0x5c
mov byte [ebp - 0xbb], al
mov byte [ebp - 0xbc], 1
lea eax, [ebp - 0xb8]
lea edx, [ebp - 0xbc]
call sub.rtl70.bpl__Variants__VarFromPStr_qqrr8TVarDatarx28System__SmallString_iuc_255_
lea eax, [ebp - 0xb8]
push eax
lea eax, [ebp - 0xcc]
xor edx, edx
call sub.rtl70.bpl__Variants__VarFromLStr_qqrr8TVarDatax17System_AnsiString
lea edx, [ebp - 0xcc]
pop ecx
pop eax
call fcn.00406360
lea edx, [ebp - 0xa8]
pop eax
call sub.rtl70.bpl__Variants__VarAdd_qqrr8TVarDatarx8TVarData
lea eax, [ebp - 0x98]
push eax
lea eax, [ebp - 0xdc]
mov edx, dword [ebp - 0x40]
call sub.rtl70.bpl__Variants__VarFromLStr_qqrr8TVarDatax17System_AnsiString
lea edx, [ebp - 0xdc]
pop eax
call sub.rtl70.bpl__Variants__VarAdd_qqrr8TVarDatarx8TVarData
lea edx, [ebp - 0x98]
lea eax, [ebp - 0x24]
call sub.rtl70.bpl__Variants__VarToLStr_qqrr17System_AnsiStringrx8TVarData
lea eax, [ebp - 0x44]
mov edx, dword [ebp - 0x1c]
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
cmp dword [eax + 0x20], 0
je 0x40919b
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov eax, dword [eax + 8]
mov edx, 0x40993c
call sub.rtl70.bpl__System__LStrCmp_qqrv
jne 0x40912b
mov al, byte [0x409954]
push eax
lea eax, [ebp - 0x10]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov eax, dword [eax + 0x20]
mov edx, dword [ebp - 4]
mov ecx, dword [edx + 0x2c]
mov edx, 0x40993c
call sub.rtl70.bpl__Sysutils_StringReplace_qqrx17System_AnsiStringt1t149System__Set_t21Sysutils_SysUtils__94_iuc_0_iuc_1_
jmp 0x409182
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov eax, dword [eax + 0x20]
cmp byte [eax], 0x5c
jne 0x40915d
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov ecx, dword [eax + 0x20]
lea eax, [ebp - 0x10]
mov edx, dword [ebp - 0x20]
call sub.rtl70.bpl__System__LStrCat3_qqrv
jmp 0x409182
push dword [ebp - 0x20]
push 0x409950
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
push dword [eax + 0x20]
lea eax, [ebp - 0x10]
mov edx, 3
call sub.rtl70.bpl__System__LStrCatN_qqrv
mov eax, dword [ebp - 0x10]
call sub.rtl70.bpl__Sysutils_FileExists_qqrx17System_AnsiString
test al, al
je 0x40919b
mov edx, 1
mov eax, dword [ebp - 0x10]
call fcn.004063ec
cmp word [0x41f2c2], 0
je 0x4091c8
lea eax, [ebx + 1]
imul eax, eax, 0x32
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0x14]
mov ecx, dword [edx + 8]
cdq
idiv ecx
mov edx, eax
add edx, 0x32
mov eax, dword [0x41f2c4]
call dword [0x41f2c0]
inc ebx
dec esi
jne 0x408cc4
mov eax, dword [ebp - 4]
push dword [eax + 8]
push 0x409950
lea edx, [ebp - 0xe8]
mov eax, dword [ebp - 4]
call fcn.004080fc
push dword [ebp - 0xe8]
lea eax, [ebp - 0xe4]
mov edx, 3
call sub.rtl70.bpl__System__LStrCatN_qqrv
mov eax, dword [ebp - 0xe4]
lea edx, [ebp - 0xe0]
call fcn.00405eec
mov edx, dword [ebp - 0xe0]
mov eax, dword [ebp - 4]
add eax, 0x1c
call sub.rtl70.bpl__System__IntfCopy_qqrr45System__DelphiInterface_t17System_IInterface_x45System__DelphiInterface_t17System_IInter
lea eax, [ebp - 0x28]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x1c]
push eax
mov eax, dword [eax]
call dword [eax + 0xb4]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
lea eax, [ebp - 0xc]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
push 0x409994
mov eax, dword [ebp - 0x28]
push eax
mov eax, dword [eax]
call dword [eax + 0x94]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
cmp dword [ebp - 0xc], 0
jne 0x4092a3
lea eax, [ebp - 0xc]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
push 0x409994
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x1c]
push eax
mov eax, dword [eax]
call dword [eax + 0xbc]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
lea eax, [ebp - 0xec]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
mov eax, dword [ebp - 0xc]
push eax
mov eax, dword [ebp - 0x28]
push eax
mov eax, dword [eax]
call dword [eax + 0x54]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
lea eax, [ebp - 0xc]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
push 0x4099a4
mov eax, dword [ebp - 0x28]
push eax
mov eax, dword [eax]
call dword [eax + 0x94]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
cmp dword [ebp - 0xc], 0
jne 0x409369
lea eax, [ebp - 0xc]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
push 0x4099a4
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x1c]
push eax
mov eax, dword [eax]
call dword [eax + 0xbc]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
lea eax, [ebp - 0xf0]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
mov eax, dword [ebp - 0xc]
push eax
mov eax, dword [ebp - 0x28]
push eax
mov eax, dword [eax]
call dword [eax + 0x54]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
lea eax, [ebp - 0x2c]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
push 0x4099c0
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x1c]
push eax
mov eax, dword [eax]
call dword [eax + 0xd4]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
lea eax, [ebp - 0xf4]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
mov eax, dword [ebp - 0x2c]
push eax
lea eax, [ebp - 0xf8]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
mov eax, dword [ebp - 0xc]
push eax
mov eax, dword [eax]
call dword [eax + 0x44]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
mov eax, dword [ebp - 0xf8]
push eax
mov eax, dword [eax]
call dword [eax + 0x20]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
mov eax, dword [ebp - 4]
mov ecx, dword [eax + 0x24]
mov edx, 0x4099e4
mov eax, dword [ebp - 0xc]
call fcn.004064e8
lea eax, [ebp - 0xc]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
lea eax, [ebp - 0xfc]
mov edx, dword [ebp - 8]
call sub.rtl70.bpl__System__WStrFromLStr_qqrr17System_WideStringx17System_AnsiString
mov eax, dword [ebp - 0xfc]
push eax
mov eax, dword [ebp - 0x28]
push eax
mov eax, dword [eax]
call dword [eax + 0x94]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
cmp dword [ebp - 0xc], 0
jne 0x409529
lea eax, [ebp - 0xc]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
lea eax, [ebp - 0x100]
mov edx, dword [ebp - 8]
call sub.rtl70.bpl__System__WStrFromLStr_qqrr17System_WideStringx17System_AnsiString
mov eax, dword [ebp - 0x100]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x1c]
push eax
mov eax, dword [eax]
call dword [eax + 0xbc]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
lea eax, [ebp - 0x104]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
mov eax, dword [ebp - 0xc]
push eax
mov eax, dword [ebp - 0x28]
push eax
mov eax, dword [eax]
call dword [eax + 0x54]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
lea eax, [ebp - 0x2c]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
push 0x4099f8
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x1c]
push eax
mov eax, dword [eax]
call dword [eax + 0xd4]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
lea eax, [ebp - 0x108]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
mov eax, dword [ebp - 0x2c]
push eax
lea eax, [ebp - 0x10c]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
mov eax, dword [ebp - 0xc]
push eax
mov eax, dword [eax]
call dword [eax + 0x44]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
mov eax, dword [ebp - 0x10c]
push eax
mov eax, dword [eax]
call dword [eax + 0x20]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
lea eax, [ebp - 0x11c]
mov edx, dword [ebp - 0x44]
call sub.rtl70.bpl__Variants__OleVarFromLStr_qqrr8TVarDatax17System_AnsiString
push dword [ebp - 0x110]
push dword [ebp - 0x114]
push dword [ebp - 0x118]
push dword [ebp - 0x11c]
mov eax, dword [ebp - 0x2c]
push eax
mov eax, dword [eax]
call dword [eax + 0x24]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
lea eax, [ebp - 0x2c]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
push 0x409a08
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x1c]
push eax
mov eax, dword [eax]
call dword [eax + 0xd4]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
lea eax, [ebp - 0x120]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
mov eax, dword [ebp - 0x2c]
push eax
lea eax, [ebp - 0x124]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
mov eax, dword [ebp - 0xc]
push eax
mov eax, dword [eax]
call dword [eax + 0x44]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
mov eax, dword [ebp - 0x124]
push eax
mov eax, dword [eax]
call dword [eax + 0x20]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
lea eax, [ebp - 0x134]
mov edx, dword [ebp - 0x24]
call sub.rtl70.bpl__Variants__OleVarFromLStr_qqrr8TVarDatax17System_AnsiString
push dword [ebp - 0x128]
push dword [ebp - 0x12c]
push dword [ebp - 0x130]
push dword [ebp - 0x134]
mov eax, dword [ebp - 0x2c]
push eax
mov eax, dword [eax]
call dword [eax + 0x24]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
jmp 0x40953f
cmp dword [ebp - 0x24], 0
je 0x40953f
mov ecx, dword [ebp - 0x24]
mov edx, 0x409904
mov eax, dword [ebp - 0xc]
call fcn.004064e8
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov esi, dword [eax + 8]
dec esi
test esi, esi
jl 0x4095e6
inc esi
xor ebx, ebx
push ebp
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov eax, dword [eax + 0x1c]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov eax, dword [eax + 4]
mov edx, 0x409a24
pop ecx
call fcn.0040863c
pop ecx
push ebp
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov eax, dword [eax + 8]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov eax, dword [eax + 4]
mov edx, 0x409a34
pop ecx
call fcn.0040863c
pop ecx
push ebp
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov eax, dword [eax + 0x14]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x14]
mov edx, ebx
call sub.rtl70.bpl__Classes_TList_Get_qqri
mov eax, dword [eax + 4]
mov edx, 0x409a48
pop ecx
call fcn.0040863c
pop ecx
inc ebx
dec esi
jne 0x409554
push ebp
call fcn.004088e0
pop ecx
mov eax, dword [ebp - 4]
push dword [eax + 8]
push 0x409950
lea edx, [ebp - 0x14c]
mov eax, dword [ebp - 4]
call fcn.004080fc
push dword [ebp - 0x14c]
lea eax, [ebp - 0x148]
mov edx, 3
call sub.rtl70.bpl__System__LStrCatN_qqrv
mov edx, dword [ebp - 0x148]
lea eax, [ebp - 0x144]
call sub.rtl70.bpl__Variants__OleVarFromLStr_qqrr8TVarDatax17System_AnsiString
push dword [ebp - 0x138]
push dword [ebp - 0x13c]
push dword [ebp - 0x140]
push dword [ebp - 0x144]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x1c]
push eax
mov eax, dword [eax]
call dword [eax + 0x108]
call sub.rtl70.bpl__System__CheckAutoResult_qqrl
xor eax, eax
push ebp
push 0x409702
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 0x34]
mov edx, dword [eax]
call dword [edx + 0x14]
test eax, eax
jle 0x4096ec
mov eax, dword [ebp - 0x34]
mov edx, dword [eax]
call dword [edx + 0x14]
mov esi, eax
dec esi
test esi, esi
jl 0x4096ec
inc esi
xor ebx, ebx
push 0x409a58
lea ecx, [ebp - 0x154]
mov edx, ebx
mov eax, dword [ebp - 0x34]
mov edi, dword [eax]
call dword [edi + 0xc]
push dword [ebp - 0x154]
push 0x409a70
lea eax, [ebp - 0x150]
mov edx, 3
call sub.rtl70.bpl__System__LStrCatN_qqrv
mov ecx, dword [ebp - 0x150]
mov edx, ebx
mov eax, dword [ebp - 0x34]
mov edi, dword [eax]
call dword [edi + 0x20]
push 0
lea ecx, [ebp - 0x158]
mov edx, ebx
mov eax, dword [ebp - 0x34]
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x158]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
call sub.kernel32.dll_WinExec
inc ebx
dec esi
jne 0x409685
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x409709
mov eax, dword [ebp - 0x34]
call sub.rtl70.bpl__System_TObject_Free_qqrv
ret