Function at 0x41285c
Capabilities:
Get file system object information

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffe78
push ebx
push esi
push edi
mov dword [ebp - 0xc], ecx
mov dword [ebp - 8], edx
mov dword [ebp - 4], eax
mov ebx, dword [ebp + 0x18]
mov eax, dword [ebp + 0x20]
call sub.rtl60.bpl__System__LStrAddRef_qqrpv
xor eax, eax
push ebp
push 0x412a49
push dword fs:[eax]
mov dword fs:[eax], esp
lea edx, [ebp - 0x10]
mov eax, dword [ebp + 0x20]
call sub.rtl60.bpl__System__ValLong_qqrx17System_AnsiStringri
mov edi, eax
lea eax, [ebp - 0x178]
xor ecx, ecx
mov edx, 0x160
call sub.rtl60.bpl__System__FillChar_qqrpvic
cmp dword [ebp + 0x20], 0
je 0x412917
cmp dword [ebp - 0x10], 0
je 0x412917
mov eax, dword [ebp + 0x20]
call sub.rtl60.bpl__Sysutils_FileExists_qqrx17System_AnsiString
test al, al
jne 0x4128cd
mov eax, dword [ebp + 0x20]
call fcn.00412838
test al, al
je 0x4128f0
push 0x4000
push 0x160
lea eax, [ebp - 0x178]
push eax
push 0
mov eax, dword [ebp + 0x20]
call sub.rtl60.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
call sub.shell32.dll_SHGetFileInfoA
jmp 0x412911
push 0x4010
push 0x160
lea eax, [ebp - 0x178]
push eax
push 0
mov eax, dword [ebp + 0x20]
call sub.rtl60.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
call sub.shell32.dll_SHGetFileInfoA
mov edi, dword [ebp - 0x174]
cmp byte [ebp + 0x1c], 0
je 0x41293e
push 0x4000
push 0x160
lea eax, [ebp - 0x178]
push eax
push 0
push 0x412a5c
call sub.shell32.dll_SHGetFileInfoA
mov esi, eax
jmp 0x41295d
push 0x4001
push 0x160
lea eax, [ebp - 0x178]
push eax
push 0
push 0x412a5c
call sub.shell32.dll_SHGetFileInfoA
mov esi, eax
lea eax, [ebp - 0x18]
push eax
lea eax, [ebp - 0x14]
push eax
push esi
call sub.comctl32.dll_ImageList_GetIconSize
mov ecx, dword [ebp + 8]
mov edx, dword [ebp - 0x18]
mov eax, dword [ebp - 0x14]
call sub.rtl60.bpl__Classes_Point_qqrii
test bl, bl
je 0x41299d
cmp byte [ebp + 0x14], 0
jne 0x41299d
push 1
mov eax, dword [ebp - 0xc]
push eax
mov eax, dword [ebp - 8]
push eax
mov eax, dword [ebp - 4]
call sub.vcl60.bpl__Graphics_TCanvas_GetHandle_qqrv
push eax
push edi
push esi
call sub.comctl32.dll_ImageList_Draw
test byte [ebp + 0x14], bl
je 0x412a33
mov dl, 1
mov eax, dword [sym.imp.vcl60.bpl__Graphics_TBitmap_]
call sub.vcl60.bpl__Graphics_TBitmap__bctr_qqrv
mov ebx, eax
mov edx, dword [ebp - 0x14]
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x40]
mov edx, dword [ebp - 0x18]
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x34]
push 0
push 0
push 0
mov eax, ebx
call sub.vcl60.bpl__Graphics_TBitmap_GetCanvas_qqrv
call sub.vcl60.bpl__Graphics_TCanvas_GetHandle_qqrv
push eax
push edi
push esi
call sub.comctl32.dll_ImageList_Draw
mov eax, dword [ebp - 8]
mov dword [ebp - 0x188], eax
mov eax, dword [ebp - 0xc]
mov dword [ebp - 0x184], eax
fild dword [ebp - 0x14]
fmul qword [ebp + 0xc]
call sub.rtl60.bpl__System__ROUND_qqrv
add eax, dword [ebp - 8]
mov dword [ebp - 0x180], eax
fild dword [ebp - 0x18]
fmul qword [ebp + 0xc]
call sub.rtl60.bpl__System__ROUND_qqrv
add eax, dword [ebp - 0xc]
mov dword [ebp - 0x17c], eax
mov ecx, ebx
lea edx, [ebp - 0x188]
mov eax, dword [ebp - 4]
call fcn.0041275c
mov eax, ebx
call sub.rtl60.bpl__System_TObject_Free_qqrv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x412a50
lea eax, [ebp + 0x20]
call sub.rtl60.bpl__System__LStrClr_qqrpv
ret