Function at 0x501fe528
Capabilities:
Log keystrokes via polling

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffde0
push ebx
push esi
xor ecx, ecx
mov dword [ebp - 0x220], ecx
mov dword [ebp - 0x21c], ecx
mov dword [ebp - 0x218], ecx
mov dword [ebp - 0x210], ecx
mov dword [ebp - 0x20c], ecx
mov ebx, edx
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x501fe7cf
push dword fs:[eax]
mov dword fs:[eax], esp
cmp ebx, 1
jl 0x501fe58b
lea edx, [ebp - 0x20c]
mov eax, dword [ebp - 4]
call sym.vcl120.bpl__Mask_TCustomMaskEdit_GetEditText_qqrv
mov eax, dword [ebp - 0x20c]
mov edx, ebx
call sub.rtl120.bpl__Sysutils_ByteType_qqrx20System_UnicodeStringi
cmp al, 1
jne 0x501fe58b
dec ebx
mov dword [ebp - 8], ebx
mov eax, dword [ebp - 4]
call sym.vcl120.bpl__Mask_TCustomMaskEdit_GetMasked_qqrv
test al, al
je 0x501fe72e
cmp dword [ebp - 8], 0
jge 0x501fe5a9
xor eax, eax
mov dword [ebp - 8], eax
mov ebx, dword [ebp - 8]
inc ebx
lea edx, [ebp - 0x210]
mov eax, dword [ebp - 4]
call sym.vcl120.bpl__Mask_TCustomMaskEdit_GetEditText_qqrv
mov eax, dword [ebp - 0x210]
mov dword [ebp - 0x214], eax
mov eax, dword [ebp - 0x214]
test eax, eax
je 0x501fe5d6
sub eax, 4
mov eax, dword [eax]
cmp ebx, eax
jge 0x501fe60a
lea edx, [ebp - 0x218]
mov eax, dword [ebp - 4]
call sym.vcl120.bpl__Mask_TCustomMaskEdit_GetEditText_qqrv
mov eax, dword [ebp - 0x218]
movzx eax, word [eax + ebx*2 - 2]
cmp ax, 0xd800
jb 0x501fe5ff
cmp ax, 0xdfff
jbe 0x501fe603
xor eax, eax
jmp 0x501fe605
mov al, 1
test al, al
je 0x501fe60a
inc ebx
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x298]
cmp eax, dword [ebp - 8]
jg 0x501fe61e
mov dword [ebp - 8], eax
mov ebx, dword [ebp - 8]
mov ecx, ebx
mov edx, ebx
mov eax, dword [ebp - 4]
call sym.vcl120.bpl__Mask_TCustomMaskEdit_SetSel_qqrii
cmp ebx, dword [ebp - 8]
je 0x501fe720
lea eax, [ebp - 0x108]
push eax
call sub.user32.dll_GetKeyboardState
mov edx, pe_nt_image_headers32
lea eax, [ebp - 0x208]
mov byte [eax], 0
inc eax
dec edx
jne 0x501fe64a
mov byte [ebp - 0x1f8], 0x81
mov eax, dword [ebp - 4]
mov si, 0xffc7
call sub.rtl120.bpl__System__CallDynaInst_qqrv
and eax, 0x7f
movzx eax, word [eax*2 + 0x502439b0]
mov byte [ebp + eax - 0x208], 0x81
lea eax, [ebp - 0x208]
push eax
call sub.user32.dll_SetKeyboardState
mov eax, dword [ebp - 4]
mov byte [eax + 0x2ac], 1
xor eax, eax
push ebp
push 0x501fe70d
push dword fs:[eax]
mov dword fs:[eax], esp
push 1
mov eax, dword [ebp - 4]
mov si, 0xffc7
call sub.rtl120.bpl__System__CallDynaInst_qqrv
and eax, 0x7f
movzx eax, word [eax*2 + 0x502439b0]
push eax
push pe_nt_image_headers32
mov eax, dword [ebp - 4]
call sym.vcl120.bpl__Controls_TWinControl_GetHandle_qqrv
push eax
call sub.user32.dll_SendMessageW
push 1
mov eax, dword [ebp - 4]
mov si, 0xffc7
call sub.rtl120.bpl__System__CallDynaInst_qqrv
and eax, 0x7f
movzx eax, word [eax*2 + 0x502439b0]
push eax
push 0x101
mov eax, dword [ebp - 4]
call sym.vcl120.bpl__Controls_TWinControl_GetHandle_qqrv
push eax
call sub.user32.dll_SendMessageW
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x501fe714
mov eax, dword [ebp - 4]
mov byte [eax + 0x2ac], 0
ret
mov eax, dword [ebp - 4]
mov edx, dword [ebp - 8]
mov dword [eax + 0x2a0], edx
jmp 0x501fe7a1
cmp dword [ebp - 8], 0
jge 0x501fe739
xor eax, eax
mov dword [ebp - 8], eax
lea edx, [ebp - 0x21c]
mov eax, dword [ebp - 4]
call sym.vcl120.bpl__Mask_TCustomMaskEdit_GetEditText_qqrv
mov eax, dword [ebp - 0x21c]
mov dword [ebp - 0x214], eax
mov eax, dword [ebp - 0x214]
test eax, eax
je 0x501fe762
sub eax, 4
mov eax, dword [eax]
cmp eax, dword [ebp - 8]
jg 0x501fe793
lea edx, [ebp - 0x220]
mov eax, dword [ebp - 4]
call sym.vcl120.bpl__Mask_TCustomMaskEdit_GetEditText_qqrv
mov eax, dword [ebp - 0x220]
mov dword [ebp - 0x214], eax
mov eax, dword [ebp - 0x214]
test eax, eax
je 0x501fe790
sub eax, 4
mov eax, dword [eax]
mov dword [ebp - 8], eax
mov ecx, dword [ebp - 8]
mov edx, dword [ebp - 8]
mov eax, dword [ebp - 4]
call sym.vcl120.bpl__Mask_TCustomMaskEdit_SetSel_qqrii
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x501fe7d6
lea eax, [ebp - 0x220]
mov edx, 3
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0x210]
mov edx, 2
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
ret