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

Disassembly:
push ebp
mov ebp, esp
push ecx
mov ecx, 0x21
push 0
push 0
dec ecx
jne 0x5983f489
xchg dword [ebp - 4], ecx
push ebx
push esi
push edi
test dl, dl
je 0x5983f4a2
add esp, 0xfffffff0
call sub.rtl120.bpl__System__ClassCreate_qqrp17System_TMetaClasso
mov dword [ebp - 0x28], ecx
mov byte [ebp - 0x21], dl
mov dword [ebp - 4], eax
mov ebx, dword [ebp + 0x10]
lea esi, [ebp - 4]
xor eax, eax
push ebp
push 0x59840847
push dword fs:[eax]
mov dword fs:[eax], esp
xor edx, edx
mov eax, dword [esi]
call sub.rtl120.bpl__System_TObject__bctr_qqrv
mov eax, dword [esi]
add eax, 0x7c
mov edx, dword [ebp - 0x28]
call sub.rtl120.bpl__System__IntfCopy_qqrr45System__DelphiInterface_t17System_IInterface_x45System__DelphiInterface_t17System_IInte
mov eax, dword [esi]
mov byte [eax + 0x64], bl
mov eax, dword [esi]
mov dword [eax + 0xa0], 0xffffffff
push 1
push 1
push 0x21
push 0x10
push 0x10
call sub.comctl32.dll_ImageList_Create
mov edx, dword [esi]
mov dword [edx + 0x94], eax
test bl, bl
jne 0x5983f521
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0xc0]
test al, al
je 0x5983f521
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
xor edx, edx
mov ecx, dword [eax]
call dword [ecx + 0x90]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x58]
call fcn.5981bc20
test al, al
je 0x5983f556
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x80]
test al, al
je 0x5983f556
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov dl, 6
mov ecx, dword [eax]
call dword [ecx + 0xa4]
jmp 0x5983f5c4
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x50]
call fcn.5981bc20
test al, al
je 0x5983f588
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x7c]
test al, al
je 0x5983f588
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov dl, 5
mov ecx, dword [eax]
call dword [ecx + 0xa4]
jmp 0x5983f5c4
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x48]
test al, al
je 0x5983f5c4
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x78]
test al, al
je 0x5983f5c4
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x36c]
test al, al
je 0x5983f5c4
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov dl, 4
mov ecx, dword [eax]
call dword [ecx + 0xa4]
lea edx, [ebp - 0x18]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x380]
lea edx, [ebp - 0xc4]
mov eax, dword [sym.madExcept_.bpl__Madexcept_DontReformatExcMsg]
call sub.madBasic_.bpl__Madstrings_EncodeUtf8_qqrx20System_UnicodeString
mov eax, dword [ebp - 0xc4]
push eax
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x378]
pop edx
call fcn.5981baf8
test al, al
jne 0x5983f65c
lea eax, [ebp - 0x18]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
mov edi, eax
sub edi, 0xa
cmp edi, 0x14
jl 0x5983f65c
lea eax, [ebp - 0x18]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
cmp word [eax + edi*2 - 2], 0x2e
jne 0x5983f656
lea eax, [ebp - 0x18]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
cmp word [eax + edi*2], 0x20
jne 0x5983f656
lea eax, [ebp - 0x18]
call sub.rtl120.bpl__System__UniqueStringU_qqrr20System_UnicodeString
mov word [eax + edi*2], 0xd
lea ecx, [edi + 2]
lea edx, [ebp - 0x18]
mov eax, 0x5984087c
call sub.rtl120.bpl__System__UStrInsert_qqrx20System_UnicodeStringr20System_UnicodeStringi
dec edi
cmp edi, 0x13
jne 0x5983f619
test bl, bl
je 0x5983f763
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x374]
cmp al, 1
jne 0x5983f6bc
lea edx, [ebp - 0x14]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x298]
mov eax, dword [ebp - 0x18]
push eax
push 0
push 0
lea edx, [ebp - 0xc8]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x37c]
mov eax, dword [ebp - 0xc8]
push eax
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0xc]
lea edx, [ebp - 0x14]
pop ecx
call sym.madExcept_.bpl__Madexcept_ExpandVars_qqruir20System_UnicodeStringx20System_UnicodeStringt3t3t3
jmp 0x5983f717
cmp byte [sym.madExcept_.bpl__Madexcept_CustomizeSimpleMsgBox], 0
je 0x5983f70c
lea edx, [ebp - 0x14]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x290]
mov eax, dword [ebp - 0x18]
push eax
push 0
push 0
lea edx, [ebp - 0xcc]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x37c]
mov eax, dword [ebp - 0xcc]
push eax
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0xc]
lea edx, [ebp - 0x14]
pop ecx
call sym.madExcept_.bpl__Madexcept_ExpandVars_qqruir20System_UnicodeStringx20System_UnicodeStringt3t3t3
jmp 0x5983f717
lea eax, [ebp - 0x14]
mov edx, dword [ebp - 0x18]
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
cmp byte [sym.madExcept_.bpl__Madexcept_CustomizeSimpleMsgBox], 0
je 0x5983f735
lea edx, [ebp - 0x18]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x288]
jmp 0x5983f7db
lea edx, [ebp - 0xd4]
xor eax, eax
call fcn.5981950c
mov eax, dword [ebp - 0xd4]
lea edx, [ebp - 0xd0]
call sub.madBasic_.bpl__Madstrings_ExtractFileNameW_qqrx20System_UnicodeString
mov eax, dword [ebp - 0xd0]
lea edx, [ebp - 0x18]
call fcn.598195c0
jmp 0x5983f7db
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x374]
cmp al, 1
jne 0x5983f786
lea edx, [ebp - 0x14]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x298]
jmp 0x5983f796
lea edx, [ebp - 0x14]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x290]
mov eax, dword [ebp - 0x18]
push eax
push 0
push 0
lea edx, [ebp - 0xd8]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x37c]
mov eax, dword [ebp - 0xd8]
push eax
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0xc]
lea edx, [ebp - 0x14]
pop ecx
call sym.madExcept_.bpl__Madexcept_ExpandVars_qqruir20System_UnicodeStringx20System_UnicodeStringt3t3t3
lea edx, [ebp - 0x18]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x288]
lea eax, [ebp - 0x84]
mov edx, 0x28
call fcn.59802018
mov dword [ebp - 0x84], 0xc0
mov eax, dword [0x59857198]
mov dword [ebp - 0x74], eax
mov dword [ebp - 0x68], 0x10
push 0x7f00
push 0
call sub.user32.dll_LoadCursorW
mov dword [ebp - 0x6c], eax
call sub.kernel32.dll_GetVersion
test eax, 0x80000000
jne 0x5983f83d
mov eax, sub.user32.dll_DefWindowProcW
mov dword [ebp - 0x80], eax
mov eax, 0x59840880
mov dword [ebp - 0x60], eax
lea eax, [ebp - 0x84]
push eax
call sub.user32.dll_RegisterClassW
jmp 0x5983f859
mov eax, sub.user32.dll_DefWindowProcA
mov dword [ebp - 0x80], eax
mov eax, 0x598408a4
mov dword [ebp - 0x60], eax
lea eax, [ebp - 0x84]
push eax
call sub.user32.dll_RegisterClassA
test bl, bl
jne 0x5983f875
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0xc0]
test al, al
je 0x5983f875
mov edi, 0x70000
jmp 0x5983f877
xor edi, edi
call sub.kernel32.dll_GetVersion
test eax, 0x80000000
jne 0x5983f8bc
or edi, 0x6c80000
push edi
push 0
push 0
push 0x64
push 0x64
push 0
push 0
mov eax, dword [0x59857198]
push eax
push 0
mov eax, dword [ebp - 0x18]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
mov ecx, eax
mov edx, dword [ebp - 0x60]
mov eax, 9
call fcn.5980208c
mov edx, dword [esi]
mov dword [edx + 0x34], eax
jmp 0x5983f909
or edi, 0x6c80000
push edi
push 0
push 0
push 0x64
push 0x64
push 0
push 0
mov eax, dword [0x59857198]
push eax
push 0
lea eax, [ebp - 0xdc]
mov edx, dword [ebp - 0x18]
mov ecx, 0
call sub.rtl120.bpl__System__LStrFromUStr_qqrr27System__AnsiStringT_us_i0__x20System_UnicodeStringus
mov eax, dword [ebp - 0xdc]
call sub.rtl120.bpl__System__LStrToPChar_qqrx27System__AnsiStringT_us_i0__
mov ecx, eax
mov edx, dword [ebp - 0x60]
mov eax, 9
call fcn.59802034
mov edx, dword [esi]
mov dword [edx + 0x34], eax
mov edx, 0x5983a59c
mov ecx, 0x20
mov eax, dword [esi]
call sub.madBasic_.bpl__Madtools_MethodToProcedure_qqrp14System_TObjectpvi
mov edx, dword [esi]
mov dword [edx + 4], eax
call sub.kernel32.dll_GetVersion
test eax, 0x80000000
jne 0x5983f940
mov eax, dword [esi]
mov eax, dword [eax + 4]
push eax
push 0xfffffffffffffffc
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
call sub.user32.dll_SetWindowLongW
jmp 0x5983f953
mov eax, dword [esi]
mov eax, dword [eax + 4]
push eax
push 0xfffffffffffffffc
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
call sub.user32.dll_SetWindowLongA
test bl, bl
jne 0x5983f968
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0xc0]
test al, al
jne 0x5983f9ab
push 0
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
call sub.user32.dll_GetSystemMenu
mov edi, eax
push 0
push 0xf020
push edi
call sub.user32.dll_RemoveMenu
push 0
push 0xf030
push edi
call sub.user32.dll_RemoveMenu
push 0
push 0xf120
push edi
call sub.user32.dll_RemoveMenu
push 0
push 0xf000
push edi
call sub.user32.dll_RemoveMenu
push 0x598408b8
push 0
push 0
push 0
push 0
push 1
push 0
push 0
push 0
push 0x190
push 0
push 0
push 0
push 0xfffffffffffffff5
call sub.gdi32.dll_CreateFontW
mov edi, eax
mov eax, dword [esi]
mov dword [eax + 0x18], edi
test edi, edi
jne 0x5983fa09
push 0x598408c8
push 0
push 0
push 0
push 0
push 1
push 0
push 0
push 0
push 0x190
push 0
push 0
push 0
push 0xfffffffffffffff4
call sub.gdi32.dll_CreateFontW
mov edx, dword [esi]
mov dword [edx + 0x18], eax
push 0x598408e4
push 0
push 0
push 0
push 0
push 1
push 0
push 0
push 0
push 0x190
push 0
push 0
push 0
push 0xfffffffffffffff5
call sub.gdi32.dll_CreateFontW
mov edx, dword [esi]
mov dword [edx + 0x1c], eax
push 0x598408fc
push 0
push 0
push 0
push 0
push 1
push 0
push 0
push 0
push 0x190
push 0
push 0
push 0
push 0xfffffffffffffff8
call sub.gdi32.dll_CreateFontW
mov edx, dword [esi]
mov dword [edx + 0x20], eax
push 0
call sub.gdi32.dll_CreateCompatibleDC
mov edi, eax
mov eax, dword [esi]
mov dword [eax + 0x10], edi
mov eax, dword [esi]
mov eax, dword [eax + 0x18]
push eax
push edi
call sub.gdi32.dll_SelectObject
mov edx, dword [esi]
mov dword [edx + 0x30], eax
push 1
mov eax, dword [esi]
mov eax, dword [eax + 0x10]
push eax
call sub.gdi32.dll_SetBkMode
xor eax, eax
mov dword [ebp - 0xc], eax
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x68]
test al, al
je 0x5983faa4
test bl, bl
je 0x5983faa8
xor eax, eax
jmp 0x5983faaa
mov al, 1
mov byte [ebp - 0x55], al
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x6c]
test al, al
je 0x5983fabf
test bl, bl
je 0x5983fac3
xor eax, eax
jmp 0x5983fac5
mov al, 1
mov byte [ebp - 0x56], al
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x70]
test al, al
je 0x5983fada
test bl, bl
je 0x5983fade
xor eax, eax
jmp 0x5983fae0
mov al, 1
mov byte [ebp - 0x57], al
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x74]
test al, al
je 0x5983faf5
test bl, bl
je 0x5983fafe
test byte [ebp + 0xc], bl
jne 0x5983fafe
xor eax, eax
jmp 0x5983fb00
mov al, 1
mov byte [ebp - 0x58], al
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x78]
or al, bl
mov byte [ebp - 0x59], al
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x7c]
test al, al
je 0x5983fb24
test bl, bl
je 0x5983fb28
xor eax, eax
jmp 0x5983fb2a
mov al, 1
mov byte [ebp - 0x5a], al
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x80]
test al, al
je 0x5983fb42
test bl, bl
je 0x5983fb46
xor eax, eax
jmp 0x5983fb48
mov al, 1
mov byte [ebp - 0x5b], al
test bl, bl
je 0x5983fb7a
mov eax, dword [esi]
mov dword [eax + 0x68], 0x17
lea edx, [ebp - 0x20]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x2e0]
lea edx, [ebp - 0x1c]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x2e4]
jmp 0x5983fbbf
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0xc8]
test al, al
je 0x5983fb96
mov eax, dword [esi]
mov dword [eax + 0x68], 0x1a
jmp 0x5983fb9f
mov eax, dword [esi]
mov dword [eax + 0x68], 0x16
lea edx, [ebp - 0x20]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x2b8]
lea edx, [ebp - 0x1c]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x2b4]
movzx eax, byte [ebp - 0x55]
push eax
push 0
lea edx, [ebp - 0xe0]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x2a8]
mov ecx, dword [ebp - 0xe0]
mov edx, 0x27
mov eax, dword [esi]
call fcn.598398ec
mov dword [ebp - 0x3c], eax
movzx eax, byte [ebp - 0x56]
push eax
push 0
lea edx, [ebp - 0xe4]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x2ac]
mov ecx, dword [ebp - 0xe4]
mov edx, 0x27
mov eax, dword [esi]
call fcn.598398ec
mov dword [ebp - 0x40], eax
movzx eax, byte [ebp - 0x57]
push eax
push 0
lea edx, [ebp - 0xe8]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x2b0]
mov ecx, dword [ebp - 0xe8]
mov edx, 0x27
mov eax, dword [esi]
call fcn.598398ec
mov dword [ebp - 0x44], eax
movzx eax, byte [ebp - 0x58]
push eax
push 0
mov ecx, dword [ebp - 0x1c]
mov edx, 0x27
mov eax, dword [esi]
call fcn.598398ec
mov dword [ebp - 0x48], eax
movzx eax, byte [ebp - 0x59]
push eax
lea eax, [ebp - 0xc]
push eax
mov ecx, dword [ebp - 0x20]
mov edx, 0x27
mov eax, dword [esi]
call fcn.598398ec
mov dword [ebp - 0x4c], eax
movzx eax, byte [ebp - 0x5a]
push eax
lea eax, [ebp - 0xc]
push eax
lea edx, [ebp - 0xec]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x2bc]
mov ecx, dword [ebp - 0xec]
mov edx, 0x27
mov eax, dword [esi]
call fcn.598398ec
mov dword [ebp - 0x50], eax
movzx eax, byte [ebp - 0x5b]
push eax
lea eax, [ebp - 0xc]
push eax
lea edx, [ebp - 0xf0]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x2c0]
mov ecx, dword [ebp - 0xf0]
mov edx, 0x27
mov eax, dword [esi]
call fcn.598398ec
mov dword [ebp - 0x54], eax
test bl, bl
je 0x5983fd00
cmp dword [ebp - 0x4c], 0x4b
jge 0x5983fcf3
mov dword [ebp - 0x4c], 0x4f
cmp dword [ebp - 0x48], 0x4b
jge 0x5983fd00
mov dword [ebp - 0x48], 0x4f
mov eax, dword [ebp - 0xc]
cmp eax, dword [ebp - 0x3c]
jle 0x5983fd0d
mov edi, dword [ebp - 0xc]
jmp 0x5983fd10
mov edi, dword [ebp - 0x3c]
cmp edi, dword [ebp - 0x48]
jge 0x5983fd18
mov edi, dword [ebp - 0x48]
cmp edi, dword [ebp - 0x40]
jge 0x5983fd20
mov edi, dword [ebp - 0x40]
cmp edi, dword [ebp - 0x44]
jge 0x5983fd28
mov edi, dword [ebp - 0x44]
lea eax, [ebp - 0xc0]
mov edx, 0x2c
call fcn.59802018
mov eax, edi
sub eax, 4
mov edx, dword [esi]
mov dword [edx + 0x24], eax
mov dword [ebp - 0xc0], 0x28
mov dword [ebp - 0xbc], eax
mov eax, dword [esi]
mov eax, dword [eax + 0x68]
mov dword [ebp - 0xb8], eax
mov word [ebp - 0xb4], 1
mov word [ebp - 0xb2], 0x20
push 0
push 0
mov eax, dword [esi]
add eax, 0x28
push eax
push 0
lea eax, [ebp - 0xc0]
push eax
mov eax, dword [esi]
mov eax, dword [eax + 0x10]
push eax
call sub.gdi32.dll_CreateDIBSection
mov edi, eax
mov eax, dword [esi]
mov dword [eax + 0x14], edi
push edi
mov eax, dword [esi]
mov eax, dword [eax + 0x10]
push eax
call sub.gdi32.dll_SelectObject
mov edx, dword [esi]
mov dword [edx + 0x2c], eax
mov byte [ebp - 0xd], 1
movzx eax, byte [ebp - 0x59]
movzx edx, byte [ebp - 0x5a]
add eax, edx
movzx edx, byte [ebp - 0x5b]
add eax, edx
mov dword [ebp - 0x30], eax
cmp dword [ebp - 0x30], 1
jle 0x5983fdd7
movzx eax, byte [ebp - 0x55]
or al, byte [ebp - 0x56]
jne 0x5983fddb
cmp byte [ebp - 0x57], 0
jne 0x5983fddb
cmp byte [ebp - 0x58], 0
jne 0x5983fddb
xor eax, eax
jmp 0x5983fddd
mov al, 1
mov byte [ebp - 5], al
cmp dword [ebp - 0x30], 1
jne 0x5983fded
mov dword [ebp - 0x30], 2
test bl, bl
je 0x5983fe18
mov eax, dword [ebp - 0x4c]
add eax, 0xc
add eax, 0xe
mov dword [ebp - 0x38], eax
cmp byte [ebp + 0xc], 0
je 0x5983fe0f
mov eax, dword [ebp - 0x38]
add eax, 2
add eax, dword [ebp - 0x48]
mov dword [ebp - 0x38], eax
mov dword [ebp - 0x2c], 0x14
jmp 0x5983fe69
cmp byte [ebp - 5], 0
je 0x5983fe44
mov eax, dword [ebp - 0x3c]
add eax, 6
add eax, dword [ebp - 0x40]
add eax, dword [ebp - 0x44]
add eax, dword [ebp - 0x48]
add eax, dword [ebp - 0xc]
add eax, 2
mov dword [ebp - 0x38], eax
mov eax, dword [ebp - 0xc]
add eax, 0x20
add eax, 2
mov dword [ebp - 0x2c], eax
jmp 0x5983fe69
mov eax, dword [ebp - 0x3c]
add eax, 6
add eax, dword [ebp - 0x40]
add eax, dword [ebp - 0x44]
add eax, dword [ebp - 0x48]
add eax, dword [ebp - 0x4c]
add eax, dword [ebp - 0x50]
add eax, dword [ebp - 0x54]
add eax, 2
mov dword [ebp - 0x38], eax
mov dword [ebp - 0x2c], 0x14
push 2
push 0x59840914
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0xc]
push eax
call sub.kernel32.dll_FindResourceA
test eax, eax
je 0x5983febf
add dword [ebp - 0x2c], 0x28
push ebp
push 9
push 0xa
push 0x20
push 0x20
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
mov ecx, 0x800000b
xor edx, edx
mov eax, 0x59840928
call fcn.5983f230
pop ecx
mov edx, dword [esi]
mov dword [edx + 0x78], eax
push 8
push 0xffffffffffffffeb
mov eax, dword [esi]
mov eax, dword [eax + 0x78]
push eax
call sub.user32.dll_SetWindowLongA
jmp 0x5983fec6
mov eax, dword [esi]
xor edx, edx
mov dword [eax + 0x78], edx
mov edi, dword [ebp - 0x38]
cmp edi, 0x298
jge 0x5983fed6
mov edi, 0x298
cmp edi, dword [sym.madExcept_.bpl__Madexcept_ExceptionBoxWidth]
jge 0x5983fee4
mov edi, dword [sym.madExcept_.bpl__Madexcept_ExceptionBoxWidth]
push 0
sub edi, dword [ebp - 0x2c]
push edi
push 0
push 0
lea eax, [ebp - 0x94]
push eax
call sub.user32.dll_SetRect
call sub.kernel32.dll_GetVersion
test eax, 0x80000000
jne 0x5983ff2a
push 0x410
lea eax, [ebp - 0x94]
push eax
push 0xffffffffffffffff
mov eax, dword [ebp - 0x14]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
mov eax, dword [esi]
mov eax, dword [eax + 0x10]
push eax
call sub.user32.dll_DrawTextW
jmp 0x5983ff62
push 0x410
lea eax, [ebp - 0x94]
push eax
push 0xffffffffffffffff
lea eax, [ebp - 0xf4]
mov edx, dword [ebp - 0x14]
mov ecx, 0
call sub.rtl120.bpl__System__LStrFromUStr_qqrr27System__AnsiStringT_us_i0__x20System_UnicodeStringus
mov eax, dword [ebp - 0xf4]
call sub.rtl120.bpl__System__LStrToPChar_qqrx27System__AnsiStringT_us_i0__
push eax
mov eax, dword [esi]
mov eax, dword [eax + 0x10]
push eax
call sub.user32.dll_DrawTextA
mov eax, dword [ebp - 0x8c]
add eax, dword [ebp - 0x2c]
cmp eax, dword [ebp - 0x38]
jle 0x5983ff7b
mov eax, dword [ebp - 0x8c]
add dword [ebp - 0x2c], eax
jmp 0x5983ff81
mov eax, dword [ebp - 0x38]
mov dword [ebp - 0x2c], eax
mov edi, 0x298
cmp edi, dword [sym.madExcept_.bpl__Madexcept_ExceptionBoxWidth]
jge 0x5983ff94
mov edi, dword [sym.madExcept_.bpl__Madexcept_ExceptionBoxWidth]
push 0
call sub.user32.dll_GetSystemMetrics
push eax
push 4
call sub.user32.dll_GetSystemMetrics
lea eax, [eax + eax*4]
pop edx
sub edx, eax
cmp edi, edx
jle 0x5983ffc2
push 0
call sub.user32.dll_GetSystemMetrics
mov edi, eax
push 4
call sub.user32.dll_GetSystemMetrics
lea eax, [eax + eax*4]
sub edi, eax
test bl, bl
jne 0x5983ffdf
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0xc0]
test al, al
je 0x5983ffdf
cmp edi, dword [ebp - 0x2c]
jle 0x5983ffdf
mov dword [ebp - 0x2c], edi
mov eax, dword [esi]
cmp dword [eax + 0x78], 0
je 0x5983fff7
cmp dword [ebp - 0x88], 0x1a
jge 0x5983fff7
mov edi, 0x1f
jmp 0x59840000
mov edi, dword [ebp - 0x88]
add edi, 5
cmp dword [ebp - 0x30], 3
jne 0x59840029
cmp byte [ebp - 5], 0
je 0x59840022
mov eax, dword [esi]
mov eax, dword [eax + 0x68]
add eax, 4
sub edi, eax
cmp edi, 7
jge 0x59840029
mov edi, 7
jmp 0x59840029
mov dword [ebp - 0x30], 2
test bl, bl
je 0x598400c9
cmp byte [ebp + 0xc], 0
je 0x59840055
mov eax, dword [ebp - 0x2c]
sub eax, dword [ebp - 0x4c]
add eax, 4
sub eax, dword [ebp - 0x48]
add eax, 4
sub eax, 6
sar eax, 1
jns 0x59840050
adc eax, 0
mov dword [ebp - 0x34], eax
jmp 0x59840068
mov eax, dword [ebp - 0x2c]
sub eax, dword [ebp - 0x4c]
add eax, 4
sar eax, 1
jns 0x59840065
adc eax, 0
mov dword [ebp - 0x34], eax
push ebp
lea eax, [ebp - 0x34]
push eax
push edi
push 1
mov eax, dword [ebp - 0x4c]
push eax
mov ecx, 4
movzx edx, byte [ebp - 0x59]
mov eax, dword [ebp - 0x20]
call fcn.5983f338
pop ecx
mov edx, dword [esi]
mov dword [edx + 0x58], eax
add dword [ebp - 0x34], 2
push ebp
lea eax, [ebp - 0x34]
push eax
push edi
push 1
mov eax, dword [ebp - 0x48]
push eax
mov ecx, 3
movzx edx, byte [ebp - 0x58]
mov eax, dword [ebp - 0x1c]
call fcn.5983f338
pop ecx
mov edx, dword [esi]
mov dword [edx + 0x4c], eax
mov eax, dword [esi]
mov eax, dword [eax + 0x68]
add eax, 4
add eax, eax
add edi, eax
add edi, 7
mov dword [ebp - 0x30], edi
jmp 0x59840284
mov dword [ebp - 0x34], 6
push ebp
lea eax, [ebp - 0x34]
push eax
push edi
mov eax, dword [ebp - 0x30]
dec eax
push eax
mov eax, dword [ebp - 0x3c]
push eax
lea edx, [ebp - 0xf8]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x2a8]
mov eax, dword [ebp - 0xf8]
xor ecx, ecx
movzx edx, byte [ebp - 0x55]
call fcn.5983f338
pop ecx
mov edx, dword [esi]
mov dword [edx + 0x40], eax
push ebp
lea eax, [ebp - 0x34]
push eax
push edi
mov eax, dword [ebp - 0x30]
dec eax
push eax
mov eax, dword [ebp - 0x40]
push eax
lea edx, [ebp - 0xfc]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x2ac]
mov eax, dword [ebp - 0xfc]
mov ecx, 1
movzx edx, byte [ebp - 0x56]
call fcn.5983f338
pop ecx
mov edx, dword [esi]
mov dword [edx + 0x44], eax
push ebp
lea eax, [ebp - 0x34]
push eax
push edi
mov eax, dword [ebp - 0x30]
dec eax
push eax
mov eax, dword [ebp - 0x44]
push eax
lea edx, [ebp - 0x100]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x2b0]
mov eax, dword [ebp - 0x100]
mov ecx, 2
movzx edx, byte [ebp - 0x57]
call fcn.5983f338
pop ecx
mov edx, dword [esi]
mov dword [edx + 0x48], eax
push ebp
lea eax, [ebp - 0x34]
push eax
push edi
mov eax, dword [ebp - 0x30]
dec eax
push eax
mov eax, dword [ebp - 0x48]
push eax
mov ecx, 3
movzx edx, byte [ebp - 0x58]
mov eax, dword [ebp - 0x1c]
call fcn.5983f338
pop ecx
mov edx, dword [esi]
mov dword [edx + 0x4c], eax
cmp byte [ebp - 5], 0
je 0x598401bb
mov eax, dword [ebp - 0x2c]
sub eax, dword [ebp - 0xc]
sub eax, 2
mov dword [ebp - 0x34], eax
jmp 0x598401cd
mov eax, dword [ebp - 0x2c]
sub eax, dword [ebp - 0x4c]
sub eax, dword [ebp - 0x50]
sub eax, dword [ebp - 0x54]
sub eax, 2
mov dword [ebp - 0x34], eax
push ebp
lea eax, [ebp - 0x34]
push eax
push edi
push 0
mov eax, dword [ebp - 0x4c]
push eax
mov ecx, 4
movzx edx, byte [ebp - 0x59]
mov eax, dword [ebp - 0x20]
call fcn.5983f338
pop ecx
mov edx, dword [esi]
mov dword [edx + 0x58], eax
push ebp
lea eax, [ebp - 0x34]
push eax
push edi
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x78]
and eax, 0x7f
push eax
mov eax, dword [ebp - 0x50]
push eax
lea edx, [ebp - 0x104]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x2bc]
mov eax, dword [ebp - 0x104]
mov ecx, 5
movzx edx, byte [ebp - 0x5a]
call fcn.5983f338
pop ecx
mov edx, dword [esi]
mov dword [edx + 0x54], eax
push ebp
lea eax, [ebp - 0x34]
push eax
push edi
mov eax, dword [ebp - 0x30]
dec eax
push eax
mov eax, dword [ebp - 0x54]
push eax
lea edx, [ebp - 0x108]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x2c0]
mov eax, dword [ebp - 0x108]
mov ecx, 6
movzx edx, byte [ebp - 0x5b]
call fcn.5983f338
pop ecx
mov edx, dword [esi]
mov dword [edx + 0x50], eax
mov eax, dword [esi]
mov eax, dword [eax + 0x68]
add eax, 4
imul dword [ebp - 0x30]
add edi, eax
add edi, 2
mov dword [ebp - 0x30], edi
cmp byte [ebp - 0x59], 0
je 0x598402c0
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x36c]
test al, al
jne 0x598402c0
movzx eax, byte [ebp - 0x5a]
or al, byte [ebp - 0x5b]
je 0x598402c0
push 0
mov eax, dword [esi]
mov eax, dword [eax + 0x58]
push eax
call sub.user32.dll_EnableWindow
push 7
push 0xffffffffffffffeb
mov eax, dword [esi]
mov eax, dword [eax + 0x58]
push eax
call sub.user32.dll_SetWindowLongA
mov dword [ebp - 0x94], 0xb
mov dword [ebp - 0x90], 0xc
mov eax, dword [esi]
cmp dword [eax + 0x78], 0
je 0x5984030a
mov dword [ebp - 0x94], 0x33
cmp dword [ebp - 0x88], 0x1a
jge 0x5984030a
mov eax, 0x1a
sub eax, dword [ebp - 0x88]
sar eax, 1
jns 0x59840301
adc eax, 0
add eax, 0xc
mov dword [ebp - 0x90], eax
push ebp
mov eax, dword [ebp - 0x94]
push eax
mov eax, dword [ebp - 0x90]
push eax
mov eax, dword [ebp - 0x8c]
push eax
mov eax, dword [ebp - 0x88]
push eax
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
xor ecx, ecx
mov edx, dword [ebp - 0x14]
mov eax, 0x59840944
call fcn.5983f230
pop ecx
mov edi, dword [ebp - 0x30]
test bl, bl
jne 0x5984037c
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0xc0]
test al, al
je 0x5984037c
cmp dword [sym.madExcept_.bpl__Madexcept_ExceptionBoxHeight], 0x298
jle 0x59840375
imul eax, dword [sym.madExcept_.bpl__Madexcept_ExceptionBoxHeight], 0x64
mov ecx, 0x87
cdq
idiv ecx
add dword [ebp - 0x30], eax
jmp 0x5984037c
add dword [ebp - 0x30], 0x1eb
push 1
call sub.user32.dll_GetSystemMetrics
push eax
push 4
call sub.user32.dll_GetSystemMetrics
lea eax, [eax + eax*4]
pop edx
sub edx, eax
cmp edx, dword [ebp - 0x30]
jge 0x598403ae
push 1
call sub.user32.dll_GetSystemMetrics
push eax
push 4
call sub.user32.dll_GetSystemMetrics
lea eax, [eax + eax*4]
pop edx
sub edx, eax
mov dword [ebp - 0x30], edx
test bl, bl
jne 0x5984059b
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0xc0]
test al, al
je 0x5984059b
push ebp
push 5
lea eax, [edi + 2]
push eax
mov eax, dword [ebp - 0x2c]
sub eax, 9
push eax
mov eax, dword [ebp - 0x30]
sub eax, edi
sub eax, 6
push eax
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
mov ecx, 0x6000000
xor edx, edx
mov eax, 0x59840960
call fcn.5983f230
pop ecx
mov edx, dword [esi]
mov dword [edx + 0x38], eax
mov edx, 0x5983afe8
mov ecx, 0x20
mov eax, dword [esi]
call sub.madBasic_.bpl__Madtools_MethodToProcedure_qqrp14System_TObjectpvi
mov edx, dword [esi]
mov dword [edx + 0x98], eax
call sub.kernel32.dll_GetVersion
test eax, 0x80000000
jne 0x59840444
mov eax, dword [esi]
mov eax, dword [eax + 0x98]
push eax
push 0xfffffffffffffffc
mov eax, dword [esi]
mov eax, dword [eax + 0x38]
push eax
call sub.user32.dll_SetWindowLongW
mov edx, dword [esi]
mov dword [edx + 0x9c], eax
jmp 0x59840462
mov eax, dword [esi]
mov eax, dword [eax + 0x98]
push eax
push 0xfffffffffffffffc
mov eax, dword [esi]
mov eax, dword [eax + 0x38]
push eax
call sub.user32.dll_SetWindowLongA
mov edx, dword [esi]
mov dword [edx + 0x9c], eax
mov eax, dword [esi]
call fcn.5983ebcc
mov eax, dword [esi]
call fcn.5983e280
lea eax, [ebp - 0x94]
push eax
mov eax, dword [esi]
mov eax, dword [eax + 0x3c]
push eax
call sub.user32.dll_GetClientRect
test eax, eax
je 0x5984059b
push 0xffffffffffffffff
lea edx, [ebp - 0x10c]
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov ecx, dword [eax]
call dword [ecx + 0x3b4]
mov eax, dword [ebp - 0x10c]
mov edx, dword [eax]
call dword [edx + 0x14]
push eax
push 0x1040
mov eax, dword [esi]
mov eax, dword [eax + 0x3c]
push eax
call sub.user32.dll_SendMessageW
mov edi, eax
mov eax, dword [ebp - 0x88]
sub eax, dword [ebp - 0x90]
mov edx, edi
shr edx, 0x10
cmp eax, edx
jae 0x5984059b
mov eax, edi
shr eax, 0x10
mov edx, dword [ebp - 0x88]
sub edx, dword [ebp - 0x90]
add edx, edx
cmp eax, edx
jae 0x5984059b
shr edi, 0x10
sub edi, dword [ebp - 0x88]
add dword [ebp - 0x30], edi
lea eax, [ebp - 0x94]
push eax
mov eax, dword [esi]
mov eax, dword [eax + 0x38]
push eax
call sub.user32.dll_GetWindowRect
test eax, eax
je 0x5984054c
push 0x16
mov eax, dword [ebp - 0x88]
sub eax, dword [ebp - 0x90]
add eax, edi
push eax
mov eax, dword [ebp - 0x8c]
sub eax, dword [ebp - 0x94]
push eax
mov eax, dword [ebp - 0x90]
push eax
mov eax, dword [ebp - 0x94]
push eax
push 0
mov eax, dword [esi]
mov eax, dword [eax + 0x38]
push eax
call sub.user32.dll_SetWindowPos
lea eax, [ebp - 0x94]
push eax
mov eax, dword [esi]
mov eax, dword [eax + 0x3c]
push eax
call sub.user32.dll_GetWindowRect
test eax, eax
je 0x5984059b
push 0x16
mov eax, dword [ebp - 0x88]
sub eax, dword [ebp - 0x90]
add edi, eax
push edi
mov eax, dword [ebp - 0x8c]
sub eax, dword [ebp - 0x94]
push eax
mov eax, dword [ebp - 0x90]
push eax
mov eax, dword [ebp - 0x94]
push eax
push 0
mov eax, dword [esi]
mov eax, dword [eax + 0x3c]
push eax
call sub.user32.dll_SetWindowPos
push 4
mov eax, dword [ebp - 0x30]
push eax
mov eax, dword [ebp - 0x2c]
push eax
push 1
call sub.user32.dll_GetSystemMetrics
sub eax, dword [ebp - 0x30]
sar eax, 1
jns 0x598405b6
adc eax, 0
push eax
push 0
call sub.user32.dll_GetSystemMetrics
sub eax, dword [ebp - 0x2c]
sar eax, 1
jns 0x598405c8
adc eax, 0
push eax
push 0
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
call sub.user32.dll_SetWindowPos
lea eax, [ebp - 0x94]
push eax
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
call sub.user32.dll_GetClientRect
mov eax, dword [ebp - 0x2c]
add eax, dword [ebp - 0x2c]
mov edx, dword [ebp - 0x8c]
sub edx, dword [ebp - 0x94]
sub eax, edx
mov dword [ebp - 0x2c], eax
mov eax, dword [ebp - 0x30]
add eax, dword [ebp - 0x30]
mov edx, dword [ebp - 0x88]
sub edx, dword [ebp - 0x90]
sub eax, edx
mov dword [ebp - 0x30], eax
push 4
mov eax, dword [ebp - 0x30]
push eax
mov eax, dword [ebp - 0x2c]
push eax
push 1
call sub.user32.dll_GetSystemMetrics
sub eax, dword [ebp - 0x30]
sar eax, 1
jns 0x59840631
adc eax, 0
push eax
push 0
call sub.user32.dll_GetSystemMetrics
sub eax, dword [ebp - 0x2c]
sar eax, 1
jns 0x59840643
adc eax, 0
push eax
push 0
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
call sub.user32.dll_SetWindowPos
lea eax, [ebp - 0x94]
push eax
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
call sub.user32.dll_GetWindowRect
mov eax, dword [ebp - 0x8c]
sub eax, dword [ebp - 0x94]
mov edx, dword [esi]
mov dword [edx + 0x80], eax
mov eax, dword [ebp - 0x88]
sub eax, dword [ebp - 0x90]
mov edx, dword [esi]
mov dword [edx + 0x84], eax
mov eax, dword [esi]
mov byte [eax + 0x88], 1
test bl, bl
jne 0x59840702
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x58]
call fcn.5981bc20
and al, byte [ebp - 0x5b]
je 0x598406b8
mov eax, dword [esi]
mov eax, dword [eax + 0x50]
mov edx, dword [esi]
mov dword [edx + 0x5c], eax
jmp 0x59840702
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x50]
call fcn.5981bc20
and al, byte [ebp - 0x5a]
je 0x598406d8
mov eax, dword [esi]
mov eax, dword [eax + 0x54]
mov edx, dword [esi]
mov dword [edx + 0x5c], eax
jmp 0x59840702
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x48]
and al, byte [ebp - 0x59]
je 0x59840702
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x36c]
test al, al
je 0x59840702
mov eax, dword [esi]
mov eax, dword [eax + 0x58]
mov edx, dword [esi]
mov dword [edx + 0x5c], eax
mov eax, dword [esi]
cmp dword [eax + 0x5c], 0
je 0x5984072d
call sub.kernel32.dll_GetTickCount
mov edx, dword [esi]
mov dword [edx + 0x6c], eax
push 0
push 0xa
push 0x309
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
call sub.user32.dll_SetTimer
mov edx, dword [esi]
mov dword [edx + 0x70], eax
cmp dword [sym.madExcept_.bpl__Madexcept_OnExceptBoxCreate], 0
je 0x59840743
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
mov edx, ebx
call dword [sym.madExcept_.bpl__Madexcept_OnExceptBoxCreate]
cmp byte [ebp + 8], 0
je 0x59840750
push 0x10
call sub.user32.dll_MessageBeep
push 1
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
call sub.user32.dll_ShowWindow
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
call sub.user32.dll_IsIconic
test eax, eax
je 0x59840779
push 9
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
call sub.user32.dll_ShowWindow
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
call sub.user32.dll_BringWindowToTop
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
call sub.user32.dll_SetForegroundWindow
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
mov edx, dword [eax]
call dword [edx + 0x374]
cmp al, 1
jne 0x598407b9
push 0
mov eax, dword [esi]
mov eax, dword [eax + 0x34]
push eax
mov eax, dword [0x59857a08]
push eax
mov eax, dword [0x59857a04]
push eax
call sub.user32.dll_PostMessageA
mov eax, dword [esi]
push eax
push 0x5983afc8
mov eax, dword [esi]
mov eax, dword [eax + 0x7c]
xor edx, edx
mov ecx, dword [eax]
call dword [ecx + 0x3dc]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x5984084e
lea eax, [ebp - 0x10c]
call sub.rtl120.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x108]
mov edx, 5
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0xf4]
call sub.rtl120.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0xf0]
mov edx, 5
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0xdc]
call sub.rtl120.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0xd8]
mov edx, 5
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0xc4]
call sub.rtl120.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x20]
mov edx, 4
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
ret