joyce8/EMBER2024-capa huggingface dataset:
Function at 0x501f8c18
Capabilities:
Enumerate gui resources
Hide graphical window

Disassembly:
push ebx
push esi
push edi
mov ebx, edx
mov esi, eax
mov eax, dword [sym.vcl120.bpl__Forms_Application]
cmp dword [eax + 0x170], 0
je 0x501f8d7d
test bl, bl
jne 0x501f8ccb
cmp dword [esi + 0x98], 0
jne 0x501f8cc0
mov eax, esi
call sym.vcl120.bpl__Forms_TApplication_GetMainFormHandle_qqrv
push eax
push 0x501f8b24
call sub.user32.dll_EnumWindows
cmp dword [esi + 0x40], 0
je 0x501f8c91
mov eax, dword [sym.vcl120.bpl__Forms_Application]
cmp byte [eax + 0xcf], 0
je 0x501f8c91
mov eax, dword [esi + 0xd4]
call sub.rtl120.bpl__System__DynArrayHigh_qqrv
mov edi, eax
cmp edi, 0
jl 0x501f8c91
push 0
mov eax, dword [esi + 0xd4]
mov eax, dword [eax + edi*4]
push eax
call sub.user32.dll_ShowWindow
dec edi
cmp edi, 0xffffffff
jne 0x501f8c7a
mov eax, dword [esi + 0x94]
mov edi, dword [eax + 8]
dec edi
cmp edi, 0
jl 0x501f8cc0
cmp bl, 1
cmc
sbb eax, eax
push eax
mov edx, edi
mov eax, dword [esi + 0x94]
call sub.rtl120.bpl__Classes_TList_Get_qqri
push eax
call sub.user32.dll_ShowOwnedPopups
dec edi
cmp edi, 0xffffffff
jne 0x501f8ca0
inc dword [esi + 0x98]
jmp 0x501f8d7d
cmp dword [esi + 0x98], 0
jle 0x501f8d7d
dec dword [esi + 0x98]
cmp dword [esi + 0x98], 0
jne 0x501f8d7d
cmp dword [esi + 0x40], 0
je 0x501f8d28
mov eax, dword [sym.vcl120.bpl__Forms_Application]
cmp byte [eax + 0xcf], 0
je 0x501f8d28
mov eax, dword [esi + 0xd4]
call sub.rtl120.bpl__System__DynArrayHigh_qqrv
mov edi, eax
cmp edi, 0
jl 0x501f8d28
push 5
mov eax, dword [esi + 0xd4]
mov eax, dword [eax + edi*4]
push eax
call sub.user32.dll_ShowWindow
dec edi
cmp edi, 0xffffffff
jne 0x501f8d11
mov eax, dword [esi + 0x94]
mov edi, dword [eax + 8]
dec edi
cmp edi, 0
jl 0x501f8d57
cmp bl, 1
cmc
sbb eax, eax
push eax
mov edx, edi
mov eax, dword [esi + 0x94]
call sub.rtl120.bpl__Classes_TList_Get_qqri
push eax
call sub.user32.dll_ShowOwnedPopups
dec edi
cmp edi, 0xffffffff
jne 0x501f8d37
mov eax, dword [esi + 0x94]
mov edx, dword [eax]
call dword [edx + 8]
push 0
lea eax, [esi + 0xd4]
mov ecx, 1
mov edx, dword [sym.vcl120.bpl___xp_22Forms__TApplication__1]
call sub.rtl120.bpl__System__DynArraySetLength_qqrv
add esp, 4
pop edi
pop esi
pop ebx
ret

Function at 0x501f996c
Capabilities:
Get graphical window text

Disassembly:
push ebx
push esi
add esp, 0xfffffdfc
mov esi, edx
mov ebx, eax
cmp byte [ebx + 0xa8], 0
je 0x501f99d7
cmp byte [ebx + 0xcf], 0
jne 0x501f99d7
push pe_nt_image_headers32
lea eax, [esp + 4]
push eax
mov eax, dword [ebx + 0x170]
push eax
call sub.user32.dll_GetWindowTextW
mov ecx, eax
mov edx, esp
mov eax, esi
call sub.rtl120.bpl__System__UStrFromPWCharLen_qqrr20System_UnicodeStringpbi
mov eax, dword [esi]
mov dword [esp + 0x200], eax
mov eax, dword [esp + 0x200]
test eax, eax
je 0x501f99c4
sub eax, 4
mov eax, dword [eax]
test eax, eax
jne 0x501f99e4
mov eax, esi
mov edx, dword [ebx + 0x88]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
jmp 0x501f99e4
mov eax, esi
mov edx, dword [ebx + 0x88]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
add esp, 0x204
pop esi
pop ebx
ret
Function at 0x501fb1b8
Capabilities:
Hide graphical window

Disassembly:
push ebx
push esi
mov ebx, eax
mov esi, dword [ebx + 0x80]
test esi, esi
je 0x501fb226
mov eax, esi
call sym.vcl120.bpl__Controls_TWinControl_HandleAllocated_qqrv
test al, al
je 0x501fb226
mov eax, dword [ebx + 0x80]
call sym.vcl120.bpl__Controls_TWinControl_GetHandle_qqrv
push eax
call sub.user32.dll_IsWindowVisible
test eax, eax
je 0x501fb226
mov eax, dword [ebx + 0x80]
mov edx, dword [eax]
call dword [edx + 0xec]
test al, al
je 0x501fb21a
push 0
mov eax, dword [ebx + 0x80]
call sym.vcl120.bpl__Controls_TWinControl_GetHandle_qqrv
push eax
call sub.user32.dll_ShowWindow
xor edx, edx
mov eax, dword [ebx + 0x80]
call sym.vcl120.bpl__Controls_TControl_SetVisible_qqro
jmp 0x501fb226
mov cl, 1
mov edx, dword [ebx + 0x70]
mov eax, ebx
call sym.vcl120.bpl__Forms_TApplication_StartHintTimer_qqri16Forms_TTimerMode
pop esi
pop ebx
ret

Function at 0x501fc368
Capabilities:
Open clipboard

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff4
push ebx
xor edx, edx
mov dword [ebp - 0xc], edx
mov ebx, eax
xor eax, eax
push ebp
push 0x501fc40e
push dword fs:[eax]
mov dword fs:[eax], esp
cmp dword [ebx + 4], 0
jne 0x501fc3f5
mov eax, dword [sym.vcl120.bpl__Forms_Application]
mov eax, dword [eax]
mov eax, dword [eax + 0x170]
mov dword [ebx + 8], eax
test eax, eax
jne 0x501fc3b0
push ebx
push sym.vcl120.bpl__Clipbrd_TClipboard_MainWndProc_qqrr17Messages_TMessage
call sub.rtl120.bpl__Classes_AllocateHWnd_qqrynpqqrr17Messages_TMessage_v
mov dword [ebx + 8], eax
mov byte [ebx + 0xc], 1
mov eax, dword [ebx + 8]
push eax
call sub.user32.dll_OpenClipboard
test eax, eax
jne 0x501fc3f1
call sub.kernel32.dll_GetLastError
lea edx, [ebp - 0xc]
call sub.rtl120.bpl__Sysutils_SysErrorMessage_qqrui
mov eax, dword [ebp - 0xc]
mov dword [ebp - 8], eax
mov byte [ebp - 4], 0x11
lea eax, [ebp - 8]
push eax
push 0
mov ecx, dword [sym.vcl120.bpl__Consts__SCannotOpenClipboard]
mov dl, 1
mov eax, dword [sym.vcl120.bpl__Clipbrd_EClipboardException_]
call sub.rtl120.bpl__Sysutils_Exception__bctr_qqrp20System_TResStringRecpx14System_TVarRecxi
call sub.rtl120.bpl__System__RaiseExcept_qqrv
mov byte [ebx + 0xd], 0
inc dword [ebx + 4]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x501fc415
lea eax, [ebp - 0xc]
call sub.rtl120.bpl__System__UStrClr_qqrpv
ret
Function at 0x501fc43c
Capabilities:
Read clipboard data

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffec
push ebx
push esi
push edi
mov esi, ecx
mov ebx, edx
mov dword [ebp - 4], eax
xor eax, eax
mov dword [ebp - 8], eax
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x18]
xor eax, eax
push ebp
push 0x501fc5cf
push dword fs:[eax]
mov dword fs:[eax], esp
movzx eax, word [sym.vcl120.bpl__Clipbrd_CF_COMPONENT]
push eax
call sub.user32.dll_GetClipboardData
mov dword [ebp - 0xc], eax
cmp dword [ebp - 0xc], 0
jne 0x501fc487
call sub.rtl120.bpl__System__TryFinallyExit_qqrv
jmp 0x501fc5d6
mov eax, dword [ebp - 0xc]
push eax
call sub.kernel32.dll_GlobalLock
mov edi, eax
test edi, edi
jne 0x501fc4a0
call sub.rtl120.bpl__System__TryFinallyExit_qqrv
jmp 0x501fc5d6
xor eax, eax
push ebp
push 0x501fc5b2
push dword fs:[eax]
mov dword fs:[eax], esp
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TMemoryStream_]
call sub.rtl120.bpl__System_TObject__bctr_qqrv
mov dword [ebp - 0x10], eax
xor eax, eax
push ebp
push 0x501fc594
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 0xc]
push eax
call sub.kernel32.dll_GlobalSize
mov ecx, eax
mov edx, edi
mov eax, dword [ebp - 0x10]
call sub.rtl120.bpl__Classes_TStream_WriteBuffer_qqrpxvi
push 0
push 0
mov eax, dword [ebp - 0x10]
call sub.rtl120.bpl__Classes_TStream_SetPosition_qqrxj
push pe_nt_image_headers32
mov ecx, dword [ebp - 0x10]
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TReader_]
call sub.rtl120.bpl__Classes_TFiler__bctr_qqrp15Classes_TStreami
mov dword [ebp - 0x14], eax
xor eax, eax
push ebp
push 0x501fc577
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 0x14]
mov dword [eax + 0x2c], esi
xor edx, edx
mov eax, dword [ebp - 0x14]
call sub.rtl120.bpl__Classes_TReader_ReadRootComponent_qqrp18Classes_TComponent
mov dword [ebp - 8], eax
xor eax, eax
push ebp
push 0x501fc54a
push dword fs:[eax]
mov dword fs:[eax], esp
test ebx, ebx
je 0x501fc540
mov edx, dword [ebp - 8]
mov eax, ebx
call sub.rtl120.bpl__Classes_TComponent_InsertComponent_qqrp18Classes_TComponent
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x501fc561
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x501fc57e
mov eax, dword [ebp - 0x14]
call sub.rtl120.bpl__System_TObject_Free_qqrv
ret
mov eax, dword [ebp - 8]
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret
Function at 0x501fc5e0
Capabilities:
Write clipboard data

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff8
push ebx
push esi
push edi
mov edi, ecx
mov esi, edx
mov dword [ebp - 4], eax
mov ebx, dword [ebp + 8]
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x18]
xor edx, edx
push ebp
push 0x501fc6b2
push dword fs:[edx]
mov dword fs:[edx], esp
push ebx
push 0x2002
call sub.kernel32.dll_GlobalAlloc
mov dword [ebp - 8], eax
xor edx, edx
push ebp
push 0x501fc684
push dword fs:[edx]
mov dword fs:[edx], esp
mov eax, dword [ebp - 8]
push eax
call sub.kernel32.dll_GlobalLock
xor edx, edx
push ebp
push 0x501fc673
push dword fs:[edx]
mov dword fs:[edx], esp
mov edx, eax
mov eax, edi
mov ecx, ebx
call sub.rtl120.bpl__System_Move_qqrpxvpvi
mov eax, dword [ebp - 4]
call sym.vcl120.bpl__Clipbrd_TClipboard_Adding_qqrv
mov eax, dword [ebp - 8]
push eax
movzx eax, si
push eax
call sub.user32.dll_SetClipboardData
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x501fc67a
mov eax, dword [ebp - 8]
push eax
call sub.kernel32.dll_GlobalUnlock
ret

Function at 0x501fc734
Capabilities:
Read clipboard data

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff8
push ebx
push esi
push edi
mov edi, ecx
mov esi, edx
mov dword [ebp - 4], eax
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x18]
xor eax, eax
push ebp
push 0x501fc7a4
push dword fs:[eax]
mov dword fs:[eax], esp
push 0xd
call sub.user32.dll_GetClipboardData
mov ebx, eax
test ebx, ebx
jne 0x501fc76e
xor eax, eax
mov dword [ebp - 8], eax
jmp 0x501fc78e
push ebx
call sub.kernel32.dll_GlobalLock
mov edx, eax
mov ecx, edi
dec ecx
mov eax, esi
call sub.rtl120.bpl__Sysutils_StrLCopy_qqrpbpxbui
call sub.rtl120.bpl__Sysutils_StrLen_qqrpxb
mov dword [ebp - 8], eax
push ebx
call sub.kernel32.dll_GlobalUnlock
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x501fc7ab
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x14]
ret

Function at 0x501fc7dc
Capabilities:
Read clipboard data

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff8
push ebx
mov ebx, edx
mov dword [ebp - 4], eax
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x18]
push 0xd
call sub.user32.dll_GetClipboardData
mov dword [ebp - 8], eax
xor eax, eax
push ebp
push 0x501fc850
push dword fs:[eax]
mov dword fs:[eax], esp
cmp dword [ebp - 8], 0
je 0x501fc822
mov eax, dword [ebp - 8]
push eax
call sub.kernel32.dll_GlobalLock
mov edx, eax
mov eax, ebx
call sub.rtl120.bpl__System__UStrFromPWChar_qqrr20System_UnicodeStringpb
jmp 0x501fc82b
mov eax, ebx
xor edx, edx
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x501fc857
cmp dword [ebp - 8], 0
je 0x501fc847
mov eax, dword [ebp - 8]
push eax
call sub.kernel32.dll_GlobalUnlock
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x14]
ret
Function at 0x501fc900
Capabilities:
Read clipboard data

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff8
push ebx
push esi
push edi
mov dword [ebp - 8], edx
mov dword [ebp - 4], eax
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x18]
xor eax, eax
push ebp
push 0x501fc9a8
push dword fs:[eax]
mov dword fs:[eax], esp
push 0
call sub.user32.dll_EnumClipboardFormats
mov ebx, eax
test bx, bx
je 0x501fc97b
mov edx, ebx
mov eax, dword [0x50124f78]
call sym.vcl120.bpl__Graphics_TPicture_SupportsClipboardFormat_qqrus
test al, al
je 0x501fc96b
movzx eax, bx
push eax
call sub.user32.dll_GetClipboardData
mov esi, eax
push 9
call sub.user32.dll_GetClipboardData
mov edi, eax
push edi
mov ecx, esi
mov edx, ebx
mov eax, dword [ebp - 8]
call sym.vcl120.bpl__Graphics_TPicture_LoadFromClipboardFormat_qqrusuip10HPALETTE__
call sub.rtl120.bpl__System__TryFinallyExit_qqrv
jmp 0x501fc9af
movzx eax, bx
push eax
call sub.user32.dll_EnumClipboardFormats
mov ebx, eax
test bx, bx
jne 0x501fc933
mov ecx, dword [sym.vcl120.bpl__Consts__SInvalidClipFmt]
mov dl, 1
mov eax, dword [sym.vcl120.bpl__Clipbrd_EClipboardException_]
call sub.rtl120.bpl__Sysutils_Exception__bctr_qqrp20System_TResStringRec
call sub.rtl120.bpl__System__RaiseExcept_qqrv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x501fc9af
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x14]
ret
pop edi
pop esi
pop ebx
pop ecx
pop ecx
pop ebp
ret

Function at 0x501fc9b8
Capabilities:
Read clipboard data

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff8
push ebx
push esi
push edi
mov dword [ebp - 8], edx
mov dword [ebp - 4], eax
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x18]
xor eax, eax
push ebp
push 0x501fca14
push dword fs:[eax]
mov dword fs:[eax], esp
push 2
call sub.user32.dll_GetClipboardData
mov esi, eax
push 9
call sub.user32.dll_GetClipboardData
mov edi, eax
push edi
mov ecx, esi
mov dx, 2
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0x64]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x501fca1b
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x14]
ret

Function at 0x501fca24
Capabilities:
Read clipboard data

Disassembly:
push ebp
mov ebp, esp
push ecx
push ebx
push esi
mov esi, edx
mov dword [ebp - 4], eax
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x18]
xor edx, edx
push ebp
push 0x501fca79
push dword fs:[edx]
mov dword fs:[edx], esp
push 3
call sub.user32.dll_GetClipboardData
mov ebx, eax
push 9
call sub.user32.dll_GetClipboardData
push eax
mov ecx, ebx
mov dx, 3
mov eax, esi
mov ebx, dword [eax]
call dword [ebx + 0x64]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x501fca80
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x14]
ret
Function at 0x501fcaf0
Capabilities:
Write clipboard data

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff0
push ebx
mov ebx, edx
mov dword [ebp - 4], eax
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x18]
xor eax, eax
push ebp
push 0x501fcb65
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
call sym.vcl120.bpl__Clipbrd_TClipboard_Adding_qqrv
xor eax, eax
mov dword [ebp - 0x10], eax
lea eax, [ebp - 0x10]
push eax
lea ecx, [ebp - 8]
lea edx, [ebp - 0xa]
mov eax, ebx
call sym.vcl120.bpl__Graphics_TPicture_SaveToClipboardFormat_qqrrusruirp10HPALETTE__
mov eax, dword [ebp - 8]
push eax
movzx eax, word [ebp - 0xa]
push eax
call sub.user32.dll_SetClipboardData
cmp dword [ebp - 0x10], 0
je 0x501fcb4f
mov eax, dword [ebp - 0x10]
push eax
push 9
call sub.user32.dll_SetClipboardData
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x501fcb6c
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x14]
ret

Function at 0x501fcb74
Capabilities:
Write clipboard data

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff0
push ebx
mov ebx, edx
mov dword [ebp - 4], eax
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x18]
xor eax, eax
push ebp
push 0x501fcbe9
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
call sym.vcl120.bpl__Clipbrd_TClipboard_Adding_qqrv
xor eax, eax
mov dword [ebp - 0x10], eax
lea eax, [ebp - 0x10]
push eax
lea ecx, [ebp - 8]
lea edx, [ebp - 0xa]
mov eax, ebx
mov ebx, dword [eax]
call dword [ebx + 0x68]
mov eax, dword [ebp - 8]
push eax
movzx eax, word [ebp - 0xa]
push eax
call sub.user32.dll_SetClipboardData
cmp dword [ebp - 0x10], 0
je 0x501fcbd3
mov eax, dword [ebp - 0x10]
push eax
push 9
call sub.user32.dll_SetClipboardData
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x501fcbf0
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x14]
ret

Function at 0x501fcc44
Capabilities:
Read clipboard data

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff8
push ebx
mov ebx, edx
mov dword [ebp - 4], eax
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x18]
xor eax, eax
push ebp
push 0x501fcc88
push dword fs:[eax]
mov dword fs:[eax], esp
movzx eax, bx
push eax
call sub.user32.dll_GetClipboardData
mov dword [ebp - 8], eax
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x501fcc8f
mov eax, dword [ebp - 4]
mov edx, dword [eax]
call dword [edx + 0x14]
ret
Function at 0x50212d30
Capabilities:
Access peb ldr_data

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffff40
push ebx
push esi
mov ebx, eax
lea eax, [ebp - 0x74]
mov edx, dword [0x5020e714]
call sub.rtl120.bpl__System__InitializeRecord_qqrpvt1
lea eax, [ebp - 0x20]
mov edx, dword [sym.vcl120.bpl___xp_20Olectnrs_TCreateInfo]
call sub.rtl120.bpl__System__InitializeRecord_qqrpvt1
lea esi, [ebp - 0xc0]
xor eax, eax
push ebp
push 0x50212eda
push dword fs:[eax]
mov dword fs:[eax], esp
mov byte [ebp - 0x75], 0
mov eax, ebx
call sym.vcl120.bpl__Olectnrs_TOleContainer_GetCanPaste_qqrv
test al, al
je 0x50212eb0
lea eax, [ebp - 0x74]
xor ecx, ecx
mov edx, 0x54
call sub.rtl120.bpl__System__FillChar_qqrpvib
mov eax, esi
xor ecx, ecx
mov edx, 0x48
call sub.rtl120.bpl__System__FillChar_qqrpvib
mov dword [ebp - 0x74], 0x54
mov eax, dword [sym.vcl120.bpl__Forms_Application]
mov eax, dword [eax]
mov eax, dword [eax + 0x170]
mov dword [ebp - 0x6c], eax
mov dword [ebp - 0x64], 0x5020f970
mov dword [ebp - 0x4c], esi
mov dword [ebp - 0x48], 2
mov dword [ebp - 0x44], 0x50245298
mov dword [ebp - 0x40], 1
movzx eax, word [0x50245294]
mov word [esi], ax
mov dword [esi + 8], 1
mov dword [esi + 0xc], 0xffffffff
mov dword [esi + 0x10], 8
mov eax, 0x50212eec
mov dword [esi + 0x14], eax
mov eax, 0x50212eec
mov dword [esi + 0x18], eax
mov dword [esi + 0x1c], 0xa00
movzx eax, word [0x50245298]
mov word [esi + 0x24], ax
mov dword [esi + 0x2c], 1
mov dword [esi + 0x30], 0xffffffff
mov dword [esi + 0x34], 4
mov eax, 0x50212eec
mov dword [esi + 0x38], eax
mov eax, 0x50212eec
mov dword [esi + 0x3c], eax
mov dword [esi + 0x40], 0x801
xor eax, eax
push ebp
push 0x50212ea9
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x74]
push eax
call sub.oledlg.dll_OleUIPasteSpecialW
dec eax
jne 0x50212e93
cmp dword [ebp - 0x30], 0
je 0x50212e66
mov byte [ebp - 0x20], 4
jmp 0x50212e6a
mov byte [ebp - 0x20], 3
test byte [ebp - 0x70], 8
setne al
mov byte [ebp - 0x1f], al
mov eax, dword [ebp - 0x2c]
mov dword [ebp - 0x1c], eax
lea eax, [ebp - 4]
mov edx, dword [ebp - 0x50]
call sub.rtl120.bpl__System__IntfCopy_qqrr45System__DelphiInterface_t17System_IInterface_x45System__DelphiInterface_t17System_IInte
lea edx, [ebp - 0x20]
mov eax, ebx
call sym.vcl120.bpl__Olectnrs_TOleContainer_CreateObjectFromInfo_qqrrx20Olectnrs_TCreateInfo
mov byte [ebp - 0x75], 1
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x50212eb0
mov eax, dword [ebp - 0x2c]
call sym.vcl120.bpl__Olectnrs_DestroyMetaPict_qqrui
ret
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x50212ee1
lea eax, [ebp - 0x74]
mov edx, dword [0x5020e714]
call sub.rtl120.bpl__System__FinalizeRecord_qqrpvt1
lea eax, [ebp - 0x20]
mov edx, dword [sym.vcl120.bpl___xp_20Olectnrs_TCreateInfo]
call sub.rtl120.bpl__System__FinalizeRecord_qqrpvt1
ret

Function at 0x50216870
Capabilities:
Encode data using xor

Disassembly:
pop es
or al, 0x54
inc esi
outsd dx, dword [esi]
outsb dx, byte [esi]
je 0x502168b9
popal
jo 0x502168f0
jb 0x502168d3
push 0x65e45021
and dword [eax], edx
add byte [edi], al
add byte [eax], al
add eax, 0xffffffe0
inc dword [ebx - 0x1ffbdbbc]
jmp 0x50121418
Function at 0x502178c4
Capabilities:
Log keystrokes via polling

Disassembly:
push ebx
xor ebx, ebx
push 0x10
call sub.user32.dll_GetKeyState
test ax, ax
jge 0x502178d8
mov ebx, 1
push 0x11
call sub.user32.dll_GetKeyState
test ax, ax
jge 0x502178e7
or ebx, 2
push 0x12
call sub.user32.dll_GetKeyState
test ax, ax
jge 0x502178f6
or ebx, 4
mov eax, ebx
pop ebx
ret

Function at 0x5021adac
Capabilities:
Hide graphical window

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffe8
push ebx
push esi
push edi
xor edx, edx
push ebp
push 0x5021aecd
push dword fs:[edx]
mov dword fs:[edx], esp
cmp dword [ebp + 0xc], 1
je 0x5021add3
mov eax, 0x8004006b
call sub.rtl120.bpl__Comobj_OleError_qqrl
mov eax, dword [ebp + 8]
mov eax, dword [eax + 0x6c]
movzx edx, byte [eax + 0x57]
mov byte [ebp - 5], dl
xor edx, edx
push ebp
push 0x5021aeba
push dword fs:[edx]
mov dword fs:[edx], esp
mov dl, 1
call sym.vcl120.bpl__Controls_TControl_SetVisible_qqro
push 1
mov eax, dword [ebp + 8]
mov eax, dword [eax + 0x78]
call sym.vcl120.bpl__Controls_TWinControl_GetHandle_qqrv
push eax
call sub.user32.dll_ShowWindow
mov eax, dword [ebp + 0x24]
mov esi, eax
lea edi, [ebp - 0x18]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
push 2
lea eax, [ebp - 0x18]
push eax
mov eax, dword [ebp + 0x20]
push eax
call sub.gdi32.dll_LPtoDP
mov eax, dword [ebp + 0x20]
push eax
call sub.gdi32.dll_SaveDC
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x5021ae96
push dword fs:[eax]
mov dword fs:[eax], esp
push 0
push 0
push 0
mov eax, dword [ebp + 0x20]
push eax
call sub.gdi32.dll_SetViewportOrgEx
push 0
push 0
push 0
mov eax, dword [ebp + 0x20]
push eax
call sub.gdi32.dll_SetWindowOrgEx
push 1
mov eax, dword [ebp + 0x20]
push eax
call sub.gdi32.dll_SetMapMode
mov eax, dword [ebp - 0x14]
push eax
mov eax, dword [ebp + 8]
mov eax, dword [eax + 0x6c]
mov ecx, dword [ebp - 0x18]
mov edx, dword [ebp + 0x20]
call sym.vcl120.bpl__Controls_TWinControl_PaintTo_qqrp5HDC__ii
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x5021ae9d
mov eax, dword [ebp - 4]
push eax
mov eax, dword [ebp + 0x20]
push eax
call sub.gdi32.dll_RestoreDC
ret