Function at 0x495d84
Capabilities:
Access peb ldr_data

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffff98
push ebx
push esi
push edi
xor ebx, ebx
mov dword [ebp - 0x68], ebx
mov dword [ebp - 0x64], ebx
mov dword [ebp - 0x50], ebx
mov dword [ebp - 0x4c], ebx
mov dword [ebp - 4], ebx
mov dword [ebp - 0xc], ecx
mov dword [ebp - 8], edx
mov esi, eax
mov ebx, dword [ebp + 0x1c]
xor eax, eax
push ebp
push 0x4963a3
push dword fs:[eax]
mov dword fs:[eax], esp
mov dword [ebp - 0x10], 0xffffffff
mov eax, dword [ebp - 0xc]
call sub.rtl120.bpl__Types_RectWidth_qqrrx11Types_TRect
dec eax
jl 0x496373
cmp dword [esi + 0x278], 0
je 0x496373
mov dword [ebp - 0x14], 0xffffffff
mov eax, dword [ebp + 0x18]
mov edi, dword [eax + 0x58]
test edi, edi
jne 0x495df1
mov edi, dword [esi + 0x4f4]
xor eax, eax
mov dword [ebp - 0x18], eax
test edi, edi
je 0x495e4d
test ebx, ebx
jg 0x495e09
mov eax, dword [ebp + 0x20]
mov eax, dword [eax + 0xc]
mov dword [ebp - 0x14], eax
jmp 0x495e26
mov eax, dword [ebp + 0x20]
mov eax, dword [eax + 8]
mov edx, dword [eax]
call dword [edx + 0x14]
cmp ebx, eax
jg 0x495e26
mov edx, ebx
dec edx
mov eax, dword [ebp + 0x20]
call sub.vcl120.bpl__Comctrls_TListItem_GetSubItemImage_qqri
mov dword [ebp - 0x14], eax
cmp dword [ebp - 0x14], 0
jl 0x495e46
mov eax, edi
call sub.vcl120.bpl__Imglist_TCustomImageList_GetCount_qqrv
cmp eax, dword [ebp - 0x14]
jle 0x495e46
mov eax, dword [edi + 0x34]
mov dword [ebp - 0x14], eax
mov eax, dword [edi + 0x30]
mov dword [ebp - 0x18], eax
jmp 0x495e4d
mov dword [ebp - 0x14], 0xffffffff
test ebx, ebx
sete al
mov edx, dword [esi + 0x5b0]
xor ecx, ecx
call sub.rtl120.bpl__Math_IfThen_qqroxixi
mov edx, dword [ebp - 0xc]
mov edx, dword [edx]
add edx, dword [esi + 0x41c]
mov ecx, dword [ebp + 0x18]
add edx, dword [ecx + 0x68]
add eax, edx
mov edx, dword [ebp - 0xc]
mov dword [edx], eax
cmp dword [ebp - 0x14], 0
jle 0x495ecf
mov eax, dword [ebp - 0xc]
push esi
mov esi, eax
lea edi, [ebp - 0x48]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
pop esi
mov eax, dword [ebp - 0x14]
add eax, 5
mov edx, dword [ebp - 0xc]
add dword [edx], eax
lea eax, [ebp - 0x48]
call sub.rtl120.bpl__Types_RectHeight_qqrrx11Types_TRect
sub eax, dword [ebp - 0x18]
sar eax, 1
jns 0x495ea8
adc eax, 0
add dword [ebp - 0x44], eax
mov eax, dword [ebp - 0x48]
add eax, dword [ebp - 0x14]
mov dword [ebp - 0x40], eax
mov edx, dword [ebp - 8]
lea eax, [ebp - 0x48]
call sub.rtl120.bpl__Types_PtInRect_qqrrx11Types_TRectrx12Types_TPoint
test al, al
je 0x495ecf
mov dword [ebp - 0x10], 0xfffffffe
jmp 0x496373
cmp byte [ebp + 8], 0
jne 0x496373
mov eax, dword [ebp - 0xc]
call sub.rtl120.bpl__Types_RectWidth_qqrrx11Types_TRect
test eax, eax
jle 0x496373
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TStringList_]
call sub.rtl120.bpl__Classes_TStringList__bctr_qqrv
mov dword [ebp - 0x20], eax
xor edx, edx
push ebp
push 0x49636c
push dword fs:[edx]
mov dword fs:[edx], esp
mov edx, 0x4963c4
mov eax, dword [ebp - 0x20]
call sub.rtl120.bpl__Classes_TStrings_SetLineBreak_qqrx20System_UnicodeString
mov edx, dword [ebp + 0x24]
mov edx, dword [edx]
mov eax, dword [ebp - 0x20]
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov eax, dword [esi + 0x560]
call sub.vcl120.bpl__Graphics_TBitmap_GetCanvas_qqrv
mov eax, dword [eax + 0xc]
mov edx, dword [ebp + 0x18]
mov edx, dword [edx + 0x30]
mov ecx, dword [eax]
call dword [ecx + 8]
mov eax, dword [esi + 0x6e8]
mov eax, dword [eax + 0x38]
mov dword [ebp - 0x18], eax
xor eax, eax
mov dword [ebp - 0x14], eax
mov eax, dword [ebp - 0xc]
push esi
mov esi, eax
lea edi, [ebp - 0x38]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
pop esi
mov eax, dword [ebp - 0x34]
mov dword [ebp - 0x2c], eax
xor eax, eax
mov dword [ebp - 0x1c], eax
cmp byte [ebp + 0xc], 0
je 0x495f73
mov eax, dword [ebp + 0x24]
xor edx, edx
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 0x20]
mov edx, dword [eax]
call dword [edx + 0x14]
dec eax
test eax, eax
jl 0x49612e
inc eax
mov dword [ebp - 0x28], eax
xor ebx, ebx
lea ecx, [ebp - 4]
mov edx, ebx
mov eax, dword [ebp - 0x20]
mov edi, dword [eax]
call dword [edi + 0xc]
mov byte [ebp - 0x21], 0
lea eax, [ebp - 0x4c]
push eax
mov ecx, 2
mov edx, 1
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrCopy_qqrx20System_UnicodeStringii
mov eax, dword [ebp - 0x4c]
mov edx, 0x4963d8
call sub.rtl120.bpl__System__UStrEqual_qqrv
jne 0x495fd4
lea eax, [ebp - 4]
mov ecx, 2
mov edx, 1
call sub.rtl120.bpl__System__UStrDelete_qqrr20System_UnicodeStringii
jmp 0x49603a
lea eax, [ebp - 0x50]
push eax
mov ecx, 2
mov edx, 1
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrCopy_qqrx20System_UnicodeStringii
mov eax, dword [ebp - 0x50]
mov edx, 0x4963ec
call sub.rtl120.bpl__System__UStrEqual_qqrv
jne 0x496011
lea eax, [ebp - 4]
mov ecx, 2
mov edx, 1
call sub.rtl120.bpl__System__UStrDelete_qqrr20System_UnicodeStringii
mov byte [ebp - 0x21], 1
jmp 0x49603a
test ebx, ebx
jne 0x49603a
mov eax, dword [ebp - 0x20]
mov edx, dword [eax]
call dword [edx + 0x14]
dec eax
jg 0x496035
cmp byte [ebp + 0x14], 0
jne 0x496031
mov eax, dword [ebp - 0x20]
mov edx, dword [eax]
call dword [edx + 0x14]
dec eax
je 0x496035
xor eax, eax
jmp 0x496037
mov al, 1
mov byte [ebp - 0x21], al
cmp byte [ebp + 0xc], 0
je 0x49606b
test ebx, ebx
jne 0x496051
mov eax, dword [ebp + 0x24]
mov edx, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
jmp 0x49606b
mov eax, dword [ebp + 0x24]
push dword [eax]
push 0x496400
push dword [ebp - 4]
mov eax, dword [ebp + 0x24]
mov edx, 3
call sub.rtl120.bpl__System__UStrCatN_qqrv
cmp byte [ebp - 0x21], 0
jne 0x49608c
mov eax, dword [esi + 0x560]
call sub.vcl120.bpl__Graphics_TBitmap_GetCanvas_qqrv
mov eax, dword [eax + 0xc]
mov edx, dword [ebp + 0x18]
mov edx, dword [edx + 0x30]
mov ecx, dword [eax]
call dword [ecx + 8]
jmp 0x4960ba
cmp byte [ebp - 0x21], 0
je 0x4960ba
mov eax, dword [esi + 0x6e8]
cmp byte [eax + 0x34], 0
jne 0x4960ba
mov eax, dword [esi + 0x560]
call sub.vcl120.bpl__Graphics_TBitmap_GetCanvas_qqrv
mov eax, dword [eax + 0xc]
mov edx, dword [esi + 0x6e8]
mov edx, dword [edx + 0x30]
mov ecx, dword [eax]
call dword [ecx + 8]
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 8]
mov dword [ebp - 0x30], eax
lea eax, [ebp - 0x38]
push eax
push 0
push 0
push 0
push 1
mov eax, dword [esi + 0x6e8]
movzx eax, byte [eax + 0x25]
push eax
movzx eax, byte [ebp + 0x10]
push eax
mov eax, dword [esi + 0x560]
call sub.vcl120.bpl__Graphics_TBitmap_GetCanvas_qqrv
or ecx, 0xffffffff
mov edx, dword [ebp - 4]
call fcn.00483ef4
mov ecx, eax
mov edx, ebx
mov eax, dword [ebp - 0x20]
mov edi, dword [eax]
call dword [edi + 0x24]
mov edx, ebx
mov eax, dword [ebp - 0x20]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov edx, dword [ebp - 0x18]
add edx, dword [ebp - 0x14]
add eax, edx
mov dword [ebp - 0x14], eax
mov edx, dword [ebp - 0x1c]
mov eax, dword [ebp - 0x30]
call sub.rtl120.bpl__Math_Max_qqrxixi
mov dword [ebp - 0x1c], eax
inc ebx
dec dword [ebp - 0x28]
jne 0x495f8a
mov eax, dword [ebp - 0x14]
push eax
lea eax, [ebp - 0x60]
push eax
mov eax, dword [ebp - 0xc]
call sub.rtl120.bpl__Types_RectWidth_qqrrx11Types_TRect
mov ecx, eax
xor edx, edx
xor eax, eax
call sub.rtl120.bpl__Types_Rect_qqriiii
lea edx, [ebp - 0x60]
lea ecx, [ebp - 0x38]
mov eax, dword [ebp - 0xc]
call fcn.00483e9c
mov eax, dword [ebp - 0x18]
sar eax, 1
jns 0x496161
adc eax, 0
add dword [ebp - 0x34], eax
mov edx, dword [ebp - 0xc]
mov eax, dword [ebp - 0x34]
mov dword [edx + 4], eax
mov edx, dword [ebp - 0xc]
add eax, dword [ebp - 0x14]
mov edx, dword [ebp - 0xc]
mov dword [edx + 0xc], eax
mov eax, dword [ebp - 0x20]
mov edx, dword [eax]
call dword [edx + 0x14]
test eax, eax
jle 0x49618e
mov eax, dword [ebp - 0xc]
mov edx, dword [ebp - 0x18]
sub dword [eax + 0xc], edx
mov eax, dword [ebp - 0x20]
mov edx, dword [eax]
call dword [edx + 0x14]
dec eax
test eax, eax
jl 0x49634d
inc eax
mov dword [ebp - 0x28], eax
xor ebx, ebx
lea ecx, [ebp - 4]
mov edx, ebx
mov eax, dword [ebp - 0x20]
mov edi, dword [eax]
call dword [edi + 0xc]
mov edx, ebx
mov eax, dword [ebp - 0x20]
mov ecx, dword [eax]
call dword [ecx + 0x18]
add eax, dword [ebp - 0x34]
mov dword [ebp - 0x2c], eax
mov byte [ebp - 0x21], 0
lea eax, [ebp - 0x64]
push eax
mov ecx, 2
mov edx, 1
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrCopy_qqrx20System_UnicodeStringii
mov eax, dword [ebp - 0x64]
mov edx, 0x4963d8
call sub.rtl120.bpl__System__UStrEqual_qqrv
jne 0x4961ff
lea eax, [ebp - 4]
mov ecx, 2
mov edx, 1
call sub.rtl120.bpl__System__UStrDelete_qqrr20System_UnicodeStringii
jmp 0x496265
lea eax, [ebp - 0x68]
push eax
mov ecx, 2
mov edx, 1
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrCopy_qqrx20System_UnicodeStringii
mov eax, dword [ebp - 0x68]
mov edx, 0x4963ec
call sub.rtl120.bpl__System__UStrEqual_qqrv
jne 0x49623c
mov byte [ebp - 0x21], 1
lea eax, [ebp - 4]
mov ecx, 2
mov edx, 1
call sub.rtl120.bpl__System__UStrDelete_qqrr20System_UnicodeStringii
jmp 0x496265
test ebx, ebx
jne 0x496265
mov eax, dword [ebp - 0x20]
mov edx, dword [eax]
call dword [edx + 0x14]
dec eax
jg 0x496260
cmp byte [ebp + 0x14], 0
jne 0x49625c
mov eax, dword [ebp - 0x20]
mov edx, dword [eax]
call dword [edx + 0x14]
dec eax
je 0x496260
xor eax, eax
jmp 0x496262
mov al, 1
mov byte [ebp - 0x21], al
cmp byte [ebp - 0x21], 0
jne 0x496286
mov eax, dword [esi + 0x560]
call sub.vcl120.bpl__Graphics_TBitmap_GetCanvas_qqrv
mov eax, dword [eax + 0xc]
mov edx, dword [ebp + 0x18]
mov edx, dword [edx + 0x30]
mov ecx, dword [eax]
call dword [ecx + 8]
jmp 0x4962b4
cmp byte [ebp - 0x21], 0
je 0x4962b4
mov eax, dword [esi + 0x6e8]
cmp byte [eax + 0x34], 0
jne 0x4962b4
mov eax, dword [esi + 0x560]
call sub.vcl120.bpl__Graphics_TBitmap_GetCanvas_qqrv
mov eax, dword [eax + 0xc]
mov edx, dword [esi + 0x6e8]
mov edx, dword [edx + 0x30]
mov ecx, dword [eax]
call dword [ecx + 8]
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 8]
mov dword [ebp - 0x30], eax
cmp byte [ebp - 0x21], 0
je 0x49633a
push esi
lea esi, [ebp - 0x38]
lea edi, [ebp - 0x48]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
pop esi
lea eax, [ebp - 0x48]
push eax
push 0
push 0
push 0
push 1
mov eax, dword [esi + 0x6e8]
movzx eax, byte [eax + 0x25]
push eax
movzx eax, byte [ebp + 0x10]
push eax
mov eax, dword [esi + 0x560]
call sub.vcl120.bpl__Graphics_TBitmap_GetCanvas_qqrv
or ecx, 0xffffffff
mov edx, dword [ebp - 4]
call fcn.00483ef4
lea eax, [ebp - 0x38]
call sub.rtl120.bpl__Types_RectHeight_qqrrx11Types_TRect
push eax
lea eax, [ebp - 0x48]
call sub.rtl120.bpl__Types_RectHeight_qqrrx11Types_TRect
pop ecx
sub ecx, eax
sar ecx, 1
jns 0x49631c
adc ecx, 0
lea eax, [ebp - 0x48]
xor edx, edx
call sub.rtl120.bpl__Types_OffsetRect_qqrr11Types_TRectii
mov edx, dword [ebp - 8]
lea eax, [ebp - 0x48]
call sub.rtl120.bpl__Types_PtInRect_qqrrx11Types_TRectrx12Types_TPoint
test al, al
je 0x49633a
mov dword [ebp - 0x10], ebx
jmp 0x49634d
mov eax, dword [ebp - 0x2c]
add eax, dword [ebp - 0x18]
mov dword [ebp - 0x34], eax
inc ebx
dec dword [ebp - 0x28]
jne 0x4961a5
mov eax, dword [ebp - 0xc]
mov edx, dword [ebp - 0x1c]
mov dword [eax + 8], edx
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x496373
mov eax, dword [ebp - 0x20]
call sub.rtl120.bpl__System_TObject_Free_qqrv
ret
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4963aa
lea eax, [ebp - 0x68]
mov edx, 2
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0x50]
mov edx, 2
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrClr_qqrpv
ret