Vcl.Controls.TCMMouseWheel

• Aller au parent : Vcl.Controls
• Champs

Delphi

  TCMMouseWheel = record
    Msg: Cardinal;
    MsgFiller: TDWordFiller;
    ShiftState: TShiftState;
    WheelDelta: SmallInt;
    ShiftStateWheel: TDWordFiller;
    case Integer of
      0: (
        XPos: Smallint;
        YPos: Smallint;
        XYPos: TDWordFiller);
      1: (
        Pos: TSmallPoint;
        PosFiller: TDWordFiller;
        Result: LRESULT);
  end;

C++

struct DECLSPEC_DRECORD TCMMouseWheel
{
public:
    unsigned Msg;
#ifndef _WIN64
#else /* _WIN64 */
    Winapi::Messages::TDWordFiller MsgFiller;
#endif /* _WIN64 */
    System::Classes::TShiftState ShiftState;
    short WheelDelta;
#ifndef _WIN64
#else /* _WIN64 */
    Winapi::Messages::TDWordFiller ShiftStateWheel;
#endif /* _WIN64 */
public:
    union
    {
        struct
        {
            System::Types::TSmallPoint Pos;
#ifdef _WIN64
            Winapi::Messages::TDWordFiller PosFiller;
#endif /* _WIN64 */
            NativeInt Result;
        };
        struct
        {
            short XPos;
            short YPos;
#ifndef _WIN64
#else /* _WIN64 */
            Winapi::Messages::TDWordFiller XYPos;
#endif /* _WIN64 */
        };
    };
};

Propriétés

Type	Visibilité	Source	Unité	Parent
record struct	public	Vcl.Controls.pas Vcl.Controls.hpp	Vcl.Controls	Vcl.Controls

Description

TCMMouseWheel est utilisé avec un message CM_MOUSEWHEEL.

Un objet de type TCMMouseWheel est utilisé avec un message CM_MOUSEWHEEL.

Le type TCMMouseWheel est utilisé en interne.