Function at 0x483ed8
Capabilities:
Log keystrokes via polling

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffff98
push esi
push edi
xor ecx, ecx
mov dword [ebp - 0x28], ecx
mov dword [ebp - 0xc], edx
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x4844f8
push dword fs:[eax]
mov dword fs:[eax], esp
mov edx, dword [ebp - 0xc]
mov eax, dword [ebp - 4]
call sub.vcl60.bpl__Controls_TControl_CMHintShow_qqrr17Messages_TMessage
mov eax, dword [ebp - 0xc]
cmp dword [eax + 0xc], 0
jne 0x4844e2
lea eax, [ebp - 0x14]
push eax
mov eax, dword [ebp - 4]
mov ecx, dword [eax + 0x278]
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x274]
mov eax, dword [ebp - 4]
call sub.vcl60.bpl__Grids_TCustomGrid_MouseCoord_qqrii
mov eax, dword [ebp - 4]
movzx eax, byte [eax + 0x31f]
cmp eax, dword [ebp - 0x14]
jg 0x4844e2
cmp dword [ebp - 0x10], 0
jl 0x4844e2
mov edx, dword [ebp - 0x14]
mov eax, dword [ebp - 4]
call sym.servercontrol.exe__Csdbgrids_TCSCustomDBGrid_RawToDataColumn_qqri
mov edx, eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x354]
call sym.servercontrol.exe__Csdbgrids_TCSDBGridColumns_GetColumn_qqri
mov dword [ebp - 0x18], eax
mov eax, dword [ebp - 4]
movzx eax, byte [eax + 0x31e]
dec eax
cmp eax, dword [ebp - 0x10]
jne 0x483fdc
mov eax, dword [ebp - 0x18]
mov eax, dword [eax + 0x54]
cmp dword [eax + 0x1c], 0
je 0x483fdc
mov edx, dword [ebp - 0x14]
mov eax, dword [ebp - 4]
call sym.servercontrol.exe__Csdbgrids_TCSCustomDBGrid_RawToDataColumn_qqri
mov edx, eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x354]
call sym.servercontrol.exe__Csdbgrids_TCSDBGridColumns_GetColumn_qqri
mov eax, dword [eax + 0x54]
mov edx, dword [eax + 0x1c]
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 8]
add eax, 0x38
call sub.rtl60.bpl__System__LStrAsg_qqrpvpxv
lea eax, [ebp - 0x58]
push eax
mov ecx, dword [ebp - 0x10]
mov edx, dword [ebp - 0x14]
mov eax, dword [ebp - 4]
call sym.servercontrol.exe__Csdbgrids_TCSCustomDBGrid_CellRect_qqrii
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 8]
lea esi, [ebp - 0x58]
lea edi, [eax + 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]
jmp 0x4844e2
mov eax, dword [ebp - 4]
movzx eax, byte [eax + 0x31e]
dec eax
cmp eax, dword [ebp - 0x10]
jne 0x483ff8
mov eax, dword [ebp - 0x18]
mov eax, dword [eax + 0x54]
cmp byte [eax + 0x24], 0
jne 0x48404b
mov eax, dword [ebp - 4]
movzx eax, byte [eax + 0x31e]
cmp eax, dword [ebp - 0x10]
jg 0x4844e2
mov eax, dword [ebp - 4]
call sym.servercontrol.exe__Csdbgrids_TCSCustomDBGrid_DataRowCount_qqrv
mov edx, dword [ebp - 4]
movzx edx, byte [edx + 0x31e]
add eax, edx
cmp eax, dword [ebp - 0x10]
jle 0x4844e2
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x32c]
cmp byte [eax + 0x15], 0
je 0x4844e2
mov eax, dword [ebp - 0x18]
cmp byte [eax + 0x9a], 0
je 0x4844e2
mov eax, dword [sym.imp.vcl60.bpl__Controls_Mouse]
mov eax, dword [eax]
call sub.vcl60.bpl__Controls_TMouse_GetCapture_qqrv
test eax, eax
jne 0x4844e2
push 0x11
call sub.user32.dll_GetKeyState
test ax, ax
jl 0x4844e2
lea eax, [ebp - 0x48]
push eax
mov ecx, dword [ebp - 0x10]
mov edx, dword [ebp - 0x14]
mov eax, dword [ebp - 4]
call sym.servercontrol.exe__Csdbgrids_TCSCustomDBGrid_CellRect_qqrii
mov eax, dword [ebp - 0x18]
call sym.servercontrol.exe__Csdbgrids_TCSColumn_GetWidth_qqrv
add eax, dword [ebp - 0x48]
mov dword [ebp - 0x24], eax
mov eax, dword [ebp - 4]
movzx eax, byte [eax + 0x31e]
dec eax
cmp eax, dword [ebp - 0x10]
jne 0x4841e0
mov eax, dword [ebp - 0x18]
mov eax, dword [eax + 0x54]
call sym.servercontrol.exe__Csdbgrids_TCSColumnTitle_GetSortMarkingWidth_qqrv
cmp eax, 2
jle 0x4840d5
mov eax, dword [ebp - 0x18]
mov eax, dword [eax + 0x54]
call sym.servercontrol.exe__Csdbgrids_TCSColumnTitle_GetSortMarkingWidth_qqrv
sub eax, 2
sub dword [ebp - 0x40], eax
mov eax, dword [ebp - 0x18]
mov eax, dword [eax + 0x54]
call sym.servercontrol.exe__Csdbgrids_TCSColumnTitle_GetSortMarkingWidth_qqrv
sub eax, 2
sub dword [ebp - 0x24], eax
mov eax, dword [ebp - 4]
cmp byte [eax + 0x414], 0
je 0x48413c
mov edx, dword [ebp - 0x14]
mov eax, dword [ebp - 4]
call sym.servercontrol.exe__Csdbgrids_TCSCustomDBGrid_RawToDataColumn_qqri
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0x434]
mov eax, dword [edx + eax*8]
mov edx, dword [eax + 0x10]
lea eax, [ebp - 0x28]
call sub.rtl60.bpl__System__LStrLAsg_qqrpvpxv
mov eax, dword [ebp - 4]
movzx eax, byte [eax + 0x31f]
mov edx, dword [ebp - 0x14]
sub edx, eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x434]
mov eax, dword [eax + edx*8]
mov edx, dword [ebp - 0x3c]
sub edx, dword [eax + 0x14]
inc edx
mov dword [ebp - 0x44], edx
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x278]
cmp eax, dword [ebp - 0x44]
jl 0x4844e2
jmp 0x48414a
lea edx, [ebp - 0x28]
mov eax, dword [ebp - 0x18]
mov eax, dword [eax + 0x54]
call sym.servercontrol.exe__Csdbgrids_TCSColumnTitle_GetCaption_qqrv
mov eax, dword [ebp - 4]
cmp byte [eax + 0x414], 0
jne 0x484172
mov eax, dword [ebp - 4]
cmp dword [eax + 0x3fc], 0
jne 0x484172
mov eax, dword [ebp - 4]
cmp dword [eax + 0x400], 0
jne 0x484172
xor eax, eax
jmp 0x484174
mov al, 1
mov byte [ebp - 0x29], al
mov eax, dword [ebp - 0x18]
mov eax, dword [eax + 0x54]
call sym.servercontrol.exe__Csdbgrids_TCSColumnTitle_GetAlignment_qqrv
mov byte [ebp - 0x2b], al
mov eax, dword [ebp - 4]
cmp dword [eax + 0x3f4], 0
jne 0x4841a6
mov dl, 1
mov eax, dword [sym.imp.vcl60.bpl__Graphics_TFont_]
call sub.vcl60.bpl__Graphics_TFont__bctr_qqrv
mov edx, dword [ebp - 4]
mov dword [edx + 0x3f4], eax
mov eax, dword [ebp - 0x18]
mov eax, dword [eax + 0x54]
call sym.servercontrol.exe__Csdbgrids_TCSColumnTitle_GetFont_qqrv
mov edx, eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x3f4]
mov ecx, dword [eax]
call dword [ecx + 8]
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x3f4]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x208]
mov eax, dword [eax + 0xc]
mov ecx, dword [eax]
call dword [ecx + 8]
jmp 0x48436d
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x32c]
mov edx, dword [eax]
call dword [edx + 0x28]
mov dword [ebp - 0x1c], eax
xor eax, eax
push ebp
push 0x484366
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
movzx eax, byte [eax + 0x31e]
mov edx, dword [ebp - 0x10]
sub edx, eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x32c]
mov ecx, dword [eax]
call dword [ecx + 0x48]
lea eax, [ebp - 0x28]
call sub.rtl60.bpl__System__LStrClr_qqrpv
mov eax, dword [ebp - 0x18]
cmp byte [eax + 0xb0], 0
je 0x484263
mov eax, dword [ebp - 0x18]
call fcn.0046bdbc
test al, al
je 0x484263
mov eax, dword [ebp - 0x18]
call sym.servercontrol.exe__Csdbgrids_TCSColumn_GetWidth_qqrv
add eax, dword [ebp - 0x48]
mov edx, dword [ebp - 4]
sub eax, dword [edx + 0x468]
mov dword [ebp - 0x24], eax
mov eax, dword [ebp - 0x24]
cmp eax, dword [ebp - 0x40]
jge 0x484271
mov eax, dword [ebp - 0x24]
mov dword [ebp - 0x40], eax
jmp 0x484271
mov eax, dword [ebp - 0x18]
call sym.servercontrol.exe__Csdbgrids_TCSColumn_GetWidth_qqrv
add eax, dword [ebp - 0x48]
mov dword [ebp - 0x24], eax
mov eax, dword [ebp - 0x18]
call sym.servercontrol.exe__Csdbgrids_TCSColumn_GetField_qqrv
test eax, eax
je 0x484288
lea edx, [ebp - 0x28]
mov eax, dword [ebp - 0x18]
call sym.servercontrol.exe__Csdbgrids_TCSColumn_DisplayText_qqrv
mov eax, dword [ebp - 0x18]
call sym.servercontrol.exe__Csdbgrids_TCSColumn_GetAlignment_qqrv
mov byte [ebp - 0x2b], al
mov eax, dword [ebp - 0x18]
call sym.servercontrol.exe__Csdbgrids_TCSColumn_GetWordWrap_qqrv
test al, al
je 0x4842ab
mov eax, dword [ebp - 4]
cmp byte [eax + 0x441], 0
jne 0x4842af
xor eax, eax
jmp 0x4842b1
mov al, 1
mov byte [ebp - 0x29], al
mov eax, dword [ebp - 4]
cmp dword [eax + 0x3f4], 0
jne 0x4842d5
mov dl, 1
mov eax, dword [sym.imp.vcl60.bpl__Graphics_TFont_]
call sub.vcl60.bpl__Graphics_TFont__bctr_qqrv
mov edx, dword [ebp - 4]
mov dword [edx + 0x3f4], eax
mov eax, dword [ebp - 0x18]
call sym.servercontrol.exe__Csdbgrids_TCSColumn_GetFont_qqrv
mov edx, eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x3f4]
mov ecx, dword [eax]
call dword [ecx + 8]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x208]
mov eax, dword [eax + 0x14]
call sub.vcl60.bpl__Graphics_TBrush_GetColor_qqrv
mov dword [ebp - 0x30], eax
mov al, byte [0x484508]
mov byte [ebp - 0x31], al
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x32]
push eax
mov al, byte [ebp - 0x31]
push eax
mov eax, dword [ebp - 4]
mov ecx, dword [eax + 0x3f4]
mov edx, dword [ebp - 0x18]
mov eax, dword [ebp - 4]
mov si, 0xff9b
call sub.rtl60.bpl__System__CallDynaInst_qqrv
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x3f4]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x208]
mov eax, dword [eax + 0xc]
mov ecx, dword [eax]
call dword [ecx + 8]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x48436d
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x32c]
mov edx, dword [ebp - 0x1c]
mov ecx, dword [eax]
call dword [ecx + 0x48]
ret
cmp byte [ebp - 0x29], 0
je 0x48437c
mov dword [ebp - 8], 2
jmp 0x484381
xor eax, eax
mov dword [ebp - 8], eax
push ebp
lea eax, [ebp - 0x20]
push eax
mov cl, byte [ebp - 0x29]
lea edx, [ebp - 0x48]
mov eax, dword [ebp - 0x28]
call fcn.00483dd8
pop ecx
mov byte [ebp - 0x2a], al
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 8]
mov dword [ebp - 0x38], eax
cmp byte [ebp - 0x2a], 0
jne 0x4843c0
cmp byte [ebp - 0x2b], 1
jne 0x4844d7
mov eax, dword [ebp - 0x24]
sub eax, 2
cmp eax, dword [ebp - 0x40]
jle 0x4844d7
mov eax, dword [ebp - 0x38]
add eax, 0x38
mov edx, dword [ebp - 0x28]
call sub.rtl60.bpl__System__LStrAsg_qqrpvpxv
mov eax, dword [ebp - 0x38]
lea edi, [eax + 0x18]
lea esi, [ebp - 0x48]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
mov al, byte [ebp - 0x2b]
sub al, 1
jb 0x4843ed
je 0x48441f
dec al
je 0x484454
jmp 0x4844a5
lea ecx, [ebp - 0x68]
mov edx, dword [ebp - 0x44]
dec edx
mov eax, dword [ebp - 0x48]
dec eax
call sub.rtl60.bpl__Classes_Point_qqrii
lea edx, [ebp - 0x68]
lea ecx, [ebp - 0x60]
mov eax, dword [ebp - 4]
call sub.vcl60.bpl__Controls_TControl_ClientToScreen_qqrrx12Types_TPoint
mov eax, dword [ebp - 0x38]
mov edx, dword [ebp - 0x60]
mov dword [eax + 8], edx
mov edx, dword [ebp - 0x5c]
mov dword [eax + 0xc], edx
jmp 0x4844a5
lea ecx, [ebp - 0x68]
mov edx, dword [ebp - 0x44]
dec edx
mov eax, dword [ebp - 0x24]
inc eax
sub eax, dword [ebp - 0x20]
sub eax, 7
call sub.rtl60.bpl__Classes_Point_qqrii
lea edx, [ebp - 0x68]
lea ecx, [ebp - 0x60]
mov eax, dword [ebp - 4]
call sub.vcl60.bpl__Controls_TControl_ClientToScreen_qqrrx12Types_TPoint
mov eax, dword [ebp - 0x38]
mov edx, dword [ebp - 0x60]
mov dword [eax + 8], edx
mov edx, dword [ebp - 0x5c]
mov dword [eax + 0xc], edx
jmp 0x4844a5
mov eax, dword [ebp - 0x24]
inc eax
sub eax, dword [ebp - 0x20]
sub eax, 6
mov edx, dword [ebp - 0x20]
sar edx, 1
jns 0x484468
adc edx, 0
add eax, edx
mov edx, dword [ebp - 0x24]
sub edx, dword [ebp - 0x48]
sub edx, 4
sar edx, 1
jns 0x48447a
adc edx, 0
sub eax, edx
lea ecx, [ebp - 0x68]
mov edx, dword [ebp - 0x44]
dec edx
call sub.rtl60.bpl__Classes_Point_qqrii
lea edx, [ebp - 0x68]
lea ecx, [ebp - 0x60]
mov eax, dword [ebp - 4]
call sub.vcl60.bpl__Controls_TControl_ClientToScreen_qqrrx12Types_TPoint
mov eax, dword [ebp - 0x38]
mov edx, dword [ebp - 0x60]
mov dword [eax + 8], edx
mov edx, dword [ebp - 0x5c]
mov dword [eax + 0xc], edx
mov eax, dword [ebp - 0x38]
mov edx, dword [sym.servercontrol.exe__Csdbgrids_TCSToolTipsWindow_]
mov dword [eax + 4], edx
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x3f4]
mov edx, dword [ebp - 0x38]
mov dword [edx + 0x3c], eax
cmp byte [ebp - 0x29], 0
je 0x4844e2
mov eax, dword [ebp - 0x40]
sub eax, dword [ebp - 0x48]
sub eax, 4
mov edx, dword [ebp - 0x38]
mov dword [edx + 0x10], eax
jmp 0x4844e2
mov eax, dword [ebp - 0x38]
add eax, 0x38
call sub.rtl60.bpl__System__LStrClr_qqrpv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4844ff
lea eax, [ebp - 0x28]
call sub.rtl60.bpl__System__LStrClr_qqrpv
ret