Function at 0x46b16c
Capabilities:
Set file attributes

Disassembly:
push ebp
mov ebp, esp
push ecx
mov ecx, 6
push 0
push 0
dec ecx
jne 0x46b175
push ecx
xchg dword [ebp - 4], ecx
push ebx
push esi
push edi
mov dword [ebp - 0x10], ecx
mov dword [ebp - 4], edx
mov dword [ebp - 0xc], eax
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrAddRef_qqrpv
xor eax, eax
push ebp
push 0x46b48a
push dword fs:[eax]
mov dword fs:[eax], esp
mov edx, 0x46b4a8
mov eax, dword [ebp - 0xc]
call fcn.0046ad6c
xor eax, eax
push ebp
push 0x46b42a
push dword fs:[eax]
mov dword fs:[eax], esp
mov byte [ebp - 0x15], 1
lea eax, [ebp - 8]
mov edx, dword [ebp - 0xc]
mov edx, dword [edx + 0x48]
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 0xc]
mov ecx, dword [eax + 0x48]
lea eax, [ebp - 0x1c]
mov edx, 0x46b4d8
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov edx, dword [ebp - 0x1c]
mov eax, dword [ebp - 0xc]
call fcn.0046ad6c
xor eax, eax
push ebp
push 0x46b3cb
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x20]
mov ecx, dword [ebp - 8]
mov edx, 0x46b520
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov edx, dword [ebp - 0x20]
mov eax, dword [ebp - 0xc]
call fcn.0046ad6c
push 0x80
mov eax, dword [ebp - 8]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
call sub.kernel32.dll_SetFileAttributesW
mov eax, dword [ebp - 8]
call sub.rtl120.bpl__Sysutils_DeleteFile_qqrx20System_UnicodeString
mov edx, 0x46b560
mov eax, dword [ebp - 0xc]
call fcn.0046ad6c
push 0xffff
mov ecx, dword [ebp - 8]
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TFileStream_]
call sub.rtl120.bpl__Classes_TFileStream__bctr_qqrx20System_UnicodeStringus
mov dword [ebp - 0x14], eax
mov edx, 0x46b5b8
mov eax, dword [ebp - 0xc]
call fcn.0046ad6c
xor eax, eax
push ebp
push 0x46b31f
push dword fs:[eax]
mov dword fs:[eax], esp
mov edx, 0x46b60c
mov eax, dword [ebp - 0xc]
call fcn.0046ad6c
lea eax, [ebp - 0x24]
mov ecx, dword [ebp - 4]
mov edx, 0x46b658
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov edx, dword [ebp - 0x24]
mov eax, dword [ebp - 0xc]
call fcn.0046ad6c
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x40]
mov ecx, dword [ebp - 0x14]
mov edx, dword [ebp - 4]
call fcn.0043dfbc
mov edx, 0x46b694
mov eax, dword [ebp - 0xc]
call fcn.0046ad6c
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x40]
call fcn.00440504
lea edx, [ebp - 0x2c]
call sub.rtl120.bpl__Sysutils_IntToStr_qqri
mov ecx, dword [ebp - 0x2c]
lea eax, [ebp - 0x28]
mov edx, 0x46b6dc
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov edx, dword [ebp - 0x28]
mov eax, dword [ebp - 0xc]
call fcn.0046ad6c
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x40]
call fcn.00440504
lea edx, [ebp - 0x30]
call sub.rtl120.bpl__Sysutils_IntToStr_qqri
mov edx, dword [ebp - 0x30]
mov eax, dword [ebp + 8]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x40]
call fcn.00440504
cmp eax, 0xc8
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x46b3b5
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x46b3d2
mov eax, dword [ebp - 0x14]
call sub.rtl120.bpl__System_TObject_Free_qqrv
ret