Function at 0x62c620
Capabilities:
Resolve function by parsing pe exports

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffcc
push ebx
push esi
push edi
xor edx, edx
mov dword [ebp - 0x34], edx
mov dword [ebp - 0x30], edx
mov dword [ebp - 0x2c], edx
mov dword [ebp - 0x28], edx
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x62cbac
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
call sub.vcl140.bpl__Controls_TWinControl_GetControlCount_qqrv
dec eax
cmp eax, 0
jl 0x62c68c
mov dword [ebp - 8], eax
mov edx, dword [ebp - 8]
mov eax, dword [ebp - 4]
call sub.vcl140.bpl__Controls_TWinControl_GetControl_qqri
mov edx, dword [0x4f36f8]
call sub.rtl140.bpl__System__IsClass_qqrp14System_TObjectp17System_TMetaClass
test al, al
je 0x62c683
mov edx, dword [ebp - 8]
mov eax, dword [ebp - 4]
call sub.vcl140.bpl__Controls_TWinControl_GetControl_qqri
call sub.rtl140.bpl__System_TObject_Free_qqrv
dec dword [ebp - 8]
cmp dword [ebp - 8], 0xffffffff
jne 0x62c659
mov eax, dword [ebp - 4]
call fcn.0062cf60
mov dl, 1
mov eax, dword [sym.imp.rtl140.bpl__Classes_TStringList_]
call sub.rtl140.bpl__Classes_TStringList__bctr_qqrv
mov dword [ebp - 0x14], 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 edx, edx
push ebp
push 0x62cb8a
push dword fs:[edx]
mov dword fs:[edx], esp
xor eax, eax
mov dword [ebp - 0x18], eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x2e8]
mov eax, dword [eax + 8]
dec eax
cmp eax, 0
jl 0x62c7d0
mov dword [ebp - 8], eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x2e8]
mov edx, dword [ebp - 8]
call sub.rtl140.bpl__Contnrs_TObjectList_GetItem_qqri
mov edi, eax
mov ecx, dword [ebp - 4]
mov dl, 1
mov eax, dword [0x4f36f8]
call fcn.004f4844
mov esi, eax
mov edx, dword [ebp - 4]
mov eax, esi
mov ecx, dword [eax]
call dword [ecx + 0x78]
mov dl, 1
mov eax, esi
call sub.vcl140.bpl__Controls_TControl_SetAlign_qqr15Controls_TAlign
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x2e8]
mov eax, dword [eax + 8]
dec eax
cmp eax, dword [ebp - 8]
je 0x62c732
mov edx, dword [ebp - 0x10]
dec edx
mov eax, esi
call sub.vcl140.bpl__Controls_TControl_SetTop_qqri
mov eax, dword [esi + 0x44]
mov dword [ebp - 0x10], eax
mov edx, dword [edi + 0xc]
mov eax, esi
call sub.vcl140.bpl__Controls_TControl_SetText_qqrx20System_UnicodeString
mov edx, dword [edi + 0x2c]
mov eax, esi
call fcn.004f5c08
movzx edx, byte [edi + 0x30]
mov eax, esi
call fcn.004f5c84
mov eax, dword [edi + 0x3c]
mov dword [esi + 0x2c4], eax
mov eax, dword [edi + 0x38]
mov dword [esi + 0x2c8], eax
mov eax, dword [edi + 0x34]
mov dword [esi + 0x2c0], eax
mov eax, dword [edi + 0x40]
mov dword [esi + 0x2ec], eax
xor edx, edx
mov eax, esi
call fcn.0054decc
mov edx, dword [edi + 8]
mov eax, esi
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, esi
call fcn.004f4bfc
mov eax, dword [ebp - 4]
movzx edx, byte [eax + 0x280]
mov eax, esi
call fcn.0054df08
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x284]
mov eax, esi
call fcn.0054dea0
mov edx, dword [edi + 8]
mov ecx, esi
mov eax, dword [ebp - 0x14]
mov ebx, dword [eax]
call dword [ebx + 0x3c]
dec dword [ebp - 8]
cmp dword [ebp - 8], 0xffffffff
jne 0x62c6de
xor eax, eax
mov dword [ebp - 0xc], eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x2ec]
mov eax, dword [eax + 8]
dec eax
test eax, eax
jl 0x62cb17
inc eax
mov dword [ebp - 0x24], eax
mov dword [ebp - 8], 0
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x2ec]
mov edx, dword [ebp - 8]
call sub.rtl140.bpl__Contnrs_TObjectList_GetItem_qqri
mov edi, eax
xor esi, esi
mov edx, dword [edi + 4]
mov eax, dword [ebp - 0x14]
mov ecx, dword [eax]
call dword [ecx + 0x54]
mov ebx, eax
test ebx, ebx
jl 0x62c827
mov edx, ebx
mov eax, dword [ebp - 0x14]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov esi, eax
test esi, esi
je 0x62cb0b
cmp byte [edi + 0x10], 0
je 0x62cb0b
mov byte [ebp - 0x1d], 0
movzx eax, byte [edi + 0x24]
mov edx, eax
sub dl, 8
jb 0x62c858
dec dl
je 0x62cae9
dec dl
jne 0x62cb0b
mov edx, eax
mov eax, esi
call fcn.0062c548
mov ebx, eax
mov edx, dword [edi + 8]
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov edx, esi
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x78]
mov eax, ebx
mov edx, dword [0x4cd3c4]
call sub.rtl140.bpl__System__IsClass_qqrp14System_TObjectp17System_TMetaClass
test al, al
je 0x62c9df
xor edx, edx
mov eax, ebx
call sub.vcl140.bpl__Mask_TCustomMaskEdit_SetText_qqrx20System_UnicodeString
movzx edx, byte [edi + 0x45]
mov eax, ebx
call fcn.004d3400
mov edx, dword [edi + 0xc]
mov eax, ebx
call fcn.004d30dc
lea eax, [ebx + 0x2dc]
mov edx, dword [edi + 0x28]
call sub.rtl140.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
movzx edx, byte [edi + 0x4c]
mov eax, ebx
call fcn.004d3318
mov eax, dword [ebp - 4]
movzx edx, byte [eax + 0x280]
mov eax, ebx
call fcn.004d3450
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x284]
mov eax, ebx
call fcn.004d2c70
movzx edx, byte [edi + 0x45]
mov eax, ebx
call fcn.004d3400
xor edx, edx
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x74]
cmp dword [edi + 0x28], 0
je 0x62c96f
mov edx, dword [edi + 0x48]
mov eax, ebx
call sub.vcl140.bpl__Controls_TControl_SetWidth_qqri
cmp byte [edi + 0x4c], 0
jne 0x62c93e
inc dword [ebp - 0xc]
mov byte [ebp - 0x1d], 1
lea ecx, [ebp - 0x28]
mov edx, dword [edi + 0x28]
mov eax, dword [ebp - 0x1c]
call sub.rtl140.bpl__Classes_TStrings_GetValue_qqrx20System_UnicodeString
mov edx, dword [ebp - 0x28]
mov ecx, dword [edi + 0x14]
mov eax, dword [0x9f1178]
mov eax, dword [eax]
call fcn.00562150
mov edx, eax
inc edx
mov eax, ebx
call sub.vcl140.bpl__Controls_TWinControl_SetTabOrder_qqrs
lea edx, [ebp - 0x2c]
mov eax, dword [edi + 0x14]
add eax, dword [ebp - 0xc]
call sub.rtl140.bpl__Sysutils_IntToStr_qqri
mov ecx, dword [ebp - 0x2c]
mov edx, dword [edi + 0x28]
mov eax, dword [ebp - 0x1c]
call sub.rtl140.bpl__Classes_TStrings_SetValue_qqrx20System_UnicodeStringt1
mov ecx, dword [edi + 0x18]
mov eax, dword [ebx + 0x2c4]
mov edx, 0x62cbc8
call fcn.0057cca0
jmp 0x62c9b1
mov eax, dword [ebp - 4]
cmp byte [eax + 0x2d9], 0
jne 0x62c987
cmp dword [esi + 0x2c4], 0x11e
jge 0x62c993
mov edx, dword [edi + 0x48]
mov eax, ebx
call sub.vcl140.bpl__Controls_TControl_SetWidth_qqri
jmp 0x62c9b1
mov edx, dword [edi + 0x1c]
imul edx, dword [esi + 0x2c4]
mov eax, dword [esi + 0x2ec]
add eax, eax
sub edx, eax
sub edx, 0x1a
mov eax, ebx
call sub.vcl140.bpl__Controls_TControl_SetWidth_qqri
cmp dword [edi + 0x20], 1
jle 0x62c9df
mov eax, ebx
mov edx, dword [0x4f6198]
call sub.rtl140.bpl__System__IsClass_qqrp14System_TObjectp17System_TMetaClass
test al, al
je 0x62c9df
mov edx, dword [edi + 0x20]
imul edx, dword [esi + 0x2c8]
sub edx, dword [esi + 0x2ec]
mov eax, ebx
call sub.vcl140.bpl__Controls_TControl_SetHeight_qqri
mov eax, ebx
mov edx, dword [0x4d5b1c]
call sub.rtl140.bpl__System__IsClass_qqrp14System_TObjectp17System_TMetaClass
test al, al
je 0x62ca38
mov edx, dword [edi + 0x48]
mov eax, ebx
call sub.vcl140.bpl__Controls_TControl_SetWidth_qqri
mov eax, dword [0x9f04d4]
mov eax, dword [eax]
xor edx, edx
call fcn.004639c4
mov edx, eax
mov eax, ebx
call sub.vcl140.bpl__Controls_TControl_SetHeight_qqri
mov dl, 2
mov esi, ebx
mov eax, esi
call fcn.0054decc
mov dl, 1
mov eax, esi
call fcn.004d6150
mov edx, dword [edi + 0xc]
mov eax, esi
call sub.vcl140.bpl__Controls_TControl_SetText_qqrx20System_UnicodeString
xor edx, edx
mov eax, esi
call sub.vcl140.bpl__Controls_TControl_SetParentColor_qqro
mov eax, ebx
mov edx, dword [0x472f1c]
call sub.rtl140.bpl__System__IsClass_qqrp14System_TObjectp17System_TMetaClass
test al, al
je 0x62ca80
mov edx, dword [edi + 0xc]
mov esi, ebx
mov eax, esi
call sub.vcl140.bpl__Controls_TControl_SetText_qqrx20System_UnicodeString
mov edx, dword [edi + 0x48]
mov eax, esi
call sub.vcl140.bpl__Controls_TControl_SetWidth_qqri
mov eax, dword [ebp - 4]
movzx edx, byte [eax + 0x280]
mov eax, esi
call fcn.0054df08
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x284]
mov eax, esi
call fcn.0054dea0
mov eax, ebx
mov edx, dword [0x543144]
call sub.rtl140.bpl__System__IsClass_qqrp14System_TObjectp17System_TMetaClass
test al, al
je 0x62cabf
movzx edx, byte [edi + 0x44]
mov esi, ebx
mov eax, esi
call fcn.005495c4
lea eax, [ebp - 0x30]
push eax
mov ecx, dword [esi + 0x414]
mov eax, dword [edi + 0x50]
mov edx, 0x62cbe0
call fcn.0057c2e0
mov edx, dword [ebp - 0x30]
mov eax, esi
call fcn.0054903c
mov edx, dword [edi + 0x14]
mov eax, ebx
call fcn.0062a774
cmp byte [ebp - 0x1d], 0
jne 0x62cade
movzx edx, word [edi + 0x14]
add dx, word [ebp - 0xc]
mov eax, ebx
call sub.vcl140.bpl__Controls_TWinControl_SetTabOrder_qqrs
cmp byte [edi + 0x44], 0
je 0x62cb0b
inc dword [ebp - 0xc]
jmp 0x62cb0b
mov ecx, esi
mov dl, 1
mov eax, dword [0x628df8]
call fcn.0062945c
mov ebx, eax
mov edx, esi
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x78]
xor edx, edx
mov eax, ebx
call sub.vcl140.bpl__Controls_TControl_SetVisible_qqro
inc dword [ebp - 8]
dec dword [ebp - 0x24]
jne 0x62c7f5
mov eax, dword [ebp - 0x14]
mov edx, dword [eax]
call dword [edx + 0x14]
dec eax
cmp eax, 0
jl 0x62cb6c
mov dword [ebp - 8], eax
mov edx, dword [ebp - 8]
mov eax, dword [ebp - 0x14]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov esi, eax
mov eax, esi
call fcn.004f589c
cmp byte [esi + 0x59], 0
je 0x62cb63
inc dword [ebp - 0x18]
cmp byte [esi + 0x2d4], 0
jne 0x62cb63
lea edx, [ebp - 0x34]
mov eax, dword [ebp - 0x18]
call sub.rtl140.bpl__Sysutils_IntToStr_qqri
mov edx, dword [ebp - 0x34]
mov eax, esi
call fcn.004f5c08
dec dword [ebp - 8]
cmp dword [ebp - 8], 0xffffffff
jne 0x62cb28
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x62cb91
mov eax, dword [ebp - 0x14]
call sub.rtl140.bpl__System_TObject_Free_qqrv
mov eax, dword [ebp - 0x1c]
call sub.rtl140.bpl__System_TObject_Free_qqrv
ret