Function at 0x598070a8
Capabilities:
Enumerate pe sections

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff0
push ebx
push esi
push edi
test dl, dl
je 0x598070bd
add esp, 0xfffffff0
call sub.rtl120.bpl__System__ClassCreate_qqrp17System_TMetaClasso
mov ebx, ecx
mov byte [ebp - 5], dl
mov dword [ebp - 4], eax
xor edx, edx
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System_TObject__bctr_qqrv
mov edx, dword [ebp - 4]
mov eax, ebx
mov byte [edx + 0x3c], al
test al, al
je 0x598073a4
cmp dword [ebp + 0x18], 0
je 0x598070fa
push ebp
mov eax, dword [ebp + 0x18]
call fcn.59803ff8
pop ecx
mov edx, dword [ebp - 4]
mov byte [edx + 0x3c], al
jmp 0x5980738e
mov eax, dword [ebp - 4]
movzx edx, byte [ebp + 0xc]
mov byte [eax + 4], dl
mov eax, dword [ebp - 4]
add eax, 0x4c
mov edx, dword [ebp + 0x14]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov edx, dword [ebp - 4]
mov eax, dword [ebp + 0x10]
mov dword [edx + 0x38], eax
test eax, eax
je 0x5980733b
call sub.madBasic_.bpl__Madtools_GetImageNtHeaders_qqrui
mov ebx, eax
test ebx, ebx
je 0x598072e6
mov dword [ebp - 0xc], 2
xor esi, esi
movzx edx, word [ebx + 0x18]
cmp dx, 0x20b
jne 0x59807152
mov ecx, ebx
add ecx, 0x108
mov eax, ecx
jmp 0x5980715c
mov ecx, ebx
add ecx, 0xf8
mov eax, ecx
test byte [eax + 0x24], 0x20
je 0x598071af
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0x38]
add edx, dword [eax + 0xc]
mov ecx, dword [ebp - 4]
mov dword [ecx + 0x40], edx
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0x40]
add edx, dword [eax + 8]
mov ecx, dword [ebp - 4]
mov dword [ecx + 0x44], edx
add eax, 0x28
test byte [eax + 0x24], 0x20
je 0x598071f4
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0x38]
add edx, dword [eax + 0xc]
add edx, dword [eax + 8]
mov ecx, dword [ebp - 4]
mov dword [ecx + 0x44], edx
mov dword [ebp - 0xc], 3
mov esi, dword [eax + 0xc]
sub eax, 0x28
mov eax, dword [eax + 0xc]
sub esi, eax
jmp 0x598071f4
cmp dx, 0x20b
jne 0x598071dc
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x38]
lea edx, [ebx + 0x18]
add eax, dword [edx + 0x14]
mov edx, dword [ebp - 4]
mov dword [edx + 0x40], eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x40]
lea edx, [ebx + 0x18]
add eax, dword [edx + 4]
mov edx, dword [ebp - 4]
mov dword [edx + 0x44], eax
jmp 0x598071f4
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x38]
add eax, dword [ebx + 0x2c]
mov edx, dword [ebp - 4]
mov dword [edx + 0x40], eax
add eax, dword [ebx + 0x1c]
mov edx, dword [ebp - 4]
mov dword [edx + 0x44], eax
cmp word [ebx + 0x18], 0x20b
jne 0x59807260
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x44]
mov edx, dword [ebp - 4]
mov dword [edx + 0x30], eax
mov edx, ebx
add edx, 0x108
mov eax, edx
movzx edx, word [ebx + 6]
dec edx
test edx, edx
jl 0x59807246
inc edx
mov edi, dword [eax + 0x24]
test edi, 0x40
jne 0x5980722f
test edi, 0x80
je 0x59807240
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0x38]
add edx, dword [eax + 0xc]
mov eax, dword [ebp - 4]
mov dword [eax + 0x30], edx
jmp 0x59807246
add eax, 0x28
dec edx
jne 0x5980721c
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x30]
lea edx, [ebx + 0x18]
add eax, dword [edx + 8]
lea edx, [ebx + 0x18]
add eax, dword [edx + 0xc]
mov edx, dword [ebp - 4]
mov dword [edx + 0x34], eax
jmp 0x5980727b
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x38]
add eax, dword [ebx + 0x30]
mov edx, dword [ebp - 4]
mov dword [edx + 0x30], eax
add eax, dword [ebx + 0x20]
add eax, dword [ebx + 0x24]
mov edx, dword [ebp - 4]
mov dword [edx + 0x34], eax
mov eax, dword [ebp - 4]
add eax, 0x48
mov edx, dword [ebp + 0x14]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
push ebp
call fcn.59804420
pop ecx
test al, al
jne 0x598072d9
cmp byte [ebp + 8], 0
jne 0x598072ad
push ebp
push ebx
mov ecx, esi
mov edx, dword [ebp - 0xc]
mov al, 1
call fcn.598068f0
pop ecx
test al, al
jne 0x598072d9
push ebp
movzx eax, byte [ebp + 8]
call fcn.59806ccc
pop ecx
test al, al
jne 0x598072d9
cmp byte [ebp + 8], 0
jne 0x598072d5
push ebp
push ebx
mov ecx, esi
mov edx, dword [ebp - 0xc]
xor eax, eax
call fcn.598068f0
pop ecx
test al, al
jne 0x598072d9
xor eax, eax
jmp 0x598072db
mov al, 1
mov edx, dword [ebp - 4]
mov byte [edx + 0x3c], al
jmp 0x5980738e
cmp byte [ebp + 8], 0
jne 0x59807302
push ebp
push 0
xor ecx, ecx
mov edx, 2
mov al, 1
call fcn.598068f0
pop ecx
test al, al
jne 0x59807331
push ebp
movzx eax, byte [ebp + 8]
call fcn.59806ccc
pop ecx
test al, al
jne 0x59807331
cmp byte [ebp + 8], 0
jne 0x5980732d
push ebp
push 0
xor ecx, ecx
mov edx, 2
xor eax, eax
call fcn.598068f0
pop ecx
test al, al
jne 0x59807331
xor eax, eax
jmp 0x59807333
mov al, 1
mov edx, dword [ebp - 4]
mov byte [edx + 0x3c], al
jmp 0x5980738e
cmp byte [ebp + 8], 0
jne 0x59807357
push ebp
push 0
xor ecx, ecx
mov edx, 2
mov al, 1
call fcn.598068f0
pop ecx
test al, al
jne 0x59807386
push ebp
movzx eax, byte [ebp + 8]
call fcn.59806ccc
pop ecx
test al, al
jne 0x59807386
cmp byte [ebp + 8], 0
jne 0x59807382
push ebp
push 0
xor ecx, ecx
mov edx, 2
xor eax, eax
call fcn.598068f0
pop ecx
test al, al
jne 0x59807386
xor eax, eax
jmp 0x59807388
mov al, 1
mov edx, dword [ebp - 4]
mov byte [edx + 0x3c], al
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x24]
test eax, eax
jle 0x598073a4
push ebp
mov edx, eax
dec edx
xor eax, eax
call fcn.598044b4
pop ecx
mov eax, dword [ebp - 4]
cmp byte [ebp - 5], 0
je 0x598073bc
call sub.rtl120.bpl__System__AfterConstruction_qqrp14System_TObject
pop dword fs:[0]
add esp, 0xc
mov eax, dword [ebp - 4]
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret 0x14