Código Delphi [-]if GetKeyState(VK_SHIFT) and 128 <> 128 then
if GetKeyState(VK_SHIFT) and 128 <> 128 then