[Angel.Matilla]

Vale. Había probado un montón de formas... salvo la correcta: TShiftState variable;