Function at 0x911c7c
Capabilities:
Delete file

Disassembly:
push ebp
mov ebp, esp
mov ecx, 9
push 0
push 0
dec ecx
jne 0x911c84
push ebx
push esi
push edi
mov dword [ebp - 0x14], eax
xor eax, eax
push ebp
push 0x911f62
push dword fs:[eax]
mov dword fs:[eax], esp
mov byte [ebp - 0x15], 0
mov eax, dword [ebp - 0x14]
cmp byte [eax + 0x79], 0
jne 0x911cb5
mov byte [ebp - 0x15], 1
jmp 0x911f32
lea edx, [ebp - 0x28]
mov eax, dword [sym.imp.vcl140.bpl__Forms_Application]
mov eax, dword [eax]
call sub.vcl140.bpl__Forms_TApplication_GetExeName_qqrv
mov eax, dword [ebp - 0x28]
lea edx, [ebp - 0x24]
call sub.rtl140.bpl__Sysutils_ExtractFilePath_qqrx20System_UnicodeString
mov edx, dword [ebp - 0x24]
lea eax, [ebp - 4]
mov ecx, 0x911f84
call sub.rtl140.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov eax, dword [ebp - 4]
call sub.rtl140.bpl__Sysutils_FileExists_qqrx20System_UnicodeString
test al, al
jne 0x911d0f
push 1
lea eax, [ebp - 0x2c]
mov ecx, dword [ebp - 4]
mov edx, 0x911fa0
call sub.rtl140.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov edx, dword [ebp - 0x2c]
xor ecx, ecx
mov eax, dword [ebp - 0x14]
call fcn.009128a8
jmp 0x911f32
push dword [ebp + 0xc]
push dword [ebp + 8]
lea edx, [ebp - 0xc]
mov eax, 0x911fc0
call sub.rtl140.bpl__Sysutils_FormatDateTime_qqrx20System_UnicodeString16System_TDateTime
mov eax, dword [ebp - 0x14]
push dword [eax + 0x74]
mov eax, dword [ebp - 0x14]
push dword [eax + 0x6c]
push dword [ebp - 0xc]
push 0x911fe0
lea eax, [ebp - 4]
mov edx, 4
call sub.rtl140.bpl__System__UStrCatN_qqrv
lea eax, [ebp - 4]
call fcn.00911bdc
xor eax, eax
mov dword [ebp - 0x20], eax
mov dl, 1
mov eax, dword [sym.imp.rtl140.bpl__Classes_TStringList_]
call sub.rtl140.bpl__Classes_TStringList__bctr_qqrv
mov dword [ebp - 0x1c], eax
xor eax, eax
push ebp
push 0x911f2b
push dword fs:[eax]
mov dword fs:[eax], esp
push 0
mov eax, dword [ebp - 0x14]
mov edx, dword [eax + 0x74]
mov eax, dword [0x9f1178]
mov eax, dword [eax]
mov ecx, dword [ebp - 0x1c]
call fcn.0056fd10
mov eax, dword [ebp - 0x1c]
mov edx, dword [eax]
call dword [edx + 0x14]
mov ebx, eax
dec ebx
cmp ebx, 0
jl 0x911df5
lea ecx, [ebp - 0x34]
mov edx, ebx
mov eax, dword [ebp - 0x1c]
mov esi, dword [eax]
call dword [esi + 0xc]
mov eax, dword [ebp - 0x34]
lea edx, [ebp - 0x30]
call sub.rtl140.bpl__Sysutils_ExtractFileExt_qqrx20System_UnicodeString
mov eax, dword [ebp - 0x30]
mov edx, 0x911ff4
call sub.rtl140.bpl__Sysutils_SameText_qqrx20System_UnicodeStringt1
test al, al
jne 0x911dc9
mov edx, ebx
mov eax, dword [ebp - 0x1c]
mov ecx, dword [eax]
call dword [ecx + 0x48]
jmp 0x911def
lea ecx, [ebp - 0x38]
mov edx, ebx
mov eax, dword [ebp - 0x1c]
mov esi, dword [eax]
call dword [esi + 0xc]
mov eax, dword [ebp - 0x38]
mov edx, dword [ebp - 0xc]
call sub.rtl140.bpl__Strutils_ContainsText_qqrx20System_UnicodeStringt1
test al, al
jne 0x911def
mov edx, ebx
mov eax, dword [ebp - 0x1c]
mov ecx, dword [eax]
call dword [ecx + 0x48]
dec ebx
cmp ebx, 0xffffffff
jne 0x911d94
mov eax, dword [ebp - 0x1c]
mov edx, dword [eax]
call dword [edx + 0x14]
test eax, eax
jne 0x911e2a
push 1
lea eax, [ebp - 0x3c]
mov ecx, dword [ebp - 4]
mov edx, 0x91200c
call sub.rtl140.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov edx, dword [ebp - 0x3c]
mov cl, 1
mov eax, dword [ebp - 0x14]
call fcn.009128a8
call sub.rtl140.bpl__System__TryFinallyExit_qqrv
jmp 0x911f32
lea edx, [ebp - 0x10]
mov eax, dword [0x9f10d4]
call fcn.009104ac
mov eax, dword [ebp - 0x1c]
mov edx, dword [eax]
call dword [edx + 0x14]
mov esi, eax
dec esi
test esi, esi
jl 0x911e85
inc esi
xor ebx, ebx
lea ecx, [ebp - 8]
mov edx, ebx
mov eax, dword [ebp - 0x1c]
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 8]
call sub.rtl140.bpl__Sysutils_FileExists_qqrx20System_UnicodeString
test al, al
je 0x911e81
inc dword [ebp - 0x20]
lea edx, [ebp - 0x40]
mov eax, dword [ebp - 8]
call sub.rtl140.bpl__Sysutils_ExtractFileName_qqrx20System_UnicodeString
mov eax, dword [ebp - 0x40]
push eax
mov eax, dword [ebp - 8]
push eax
mov eax, dword [ebp - 0x10]
push eax
mov eax, dword [eax]
call dword [eax + 0x10]
inc ebx
dec esi
jne 0x911e49
cmp dword [ebp - 0x20], 0
jle 0x911ed4
mov eax, dword [ebp - 4]
push eax
mov eax, dword [ebp - 0x10]
push eax
mov eax, dword [eax]
call dword [eax + 0x18]
push 1
push 0x912034
mov eax, dword [ebp - 0x1c]
mov edx, dword [eax]
call dword [edx + 0x14]
lea edx, [ebp - 0x48]
call sub.rtl140.bpl__Sysutils_IntToStr_qqri
push dword [ebp - 0x48]
push 0x912054
push dword [ebp - 4]
lea eax, [ebp - 0x44]
mov edx, 4
call sub.rtl140.bpl__System__UStrCatN_qqrv
mov edx, dword [ebp - 0x44]
mov cl, 1
mov eax, dword [ebp - 0x14]
call fcn.009128a8
mov eax, dword [ebp - 0x1c]
mov edx, dword [eax]
call dword [edx + 0x14]
mov esi, eax
dec esi
test esi, esi
jl 0x911f11
inc esi
xor ebx, ebx
lea ecx, [ebp - 8]
mov edx, ebx
mov eax, dword [ebp - 0x1c]
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 8]
call sub.rtl140.bpl__Sysutils_FileExists_qqrx20System_UnicodeString
test al, al
je 0x911f0d
mov eax, dword [ebp - 8]
call sub.rtl140.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
call sub.kernel32.dll_DeleteFileW
inc ebx
dec esi
jne 0x911ee6
mov byte [ebp - 0x15], 1
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x911f32
mov eax, dword [ebp - 0x1c]
call sub.rtl140.bpl__System_TObject_Free_qqrv
ret
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x911f69
lea eax, [ebp - 0x48]
mov edx, 0xa
call sub.rtl140.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0x10]
call sub.rtl140.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xc]
mov edx, 3
call sub.rtl140.bpl__System__UStrArrayClr_qqrpvi
ret