Class TGuiMidiKeys
Description | Hierarchy | Fields | Methods | Properties |
Unit
Declaration
type TGuiMidiKeys = class(TGuiBaseControl)
Description
no description available, TGuiBaseControl description follows
Hierarchy
- TGraphicControl
- TGuiBaseControl
- TGuiMidiKeys
Overview
Methods
![]() |
constructor Create(AOwner: TComponent); override; |
![]() |
destructor Destroy; override; |
![]() |
procedure SetKeyColor(FromKey, ToKey: Byte; BaseColor: TColor = clNone; Over: TColor = clNone; Pressed: TColor = clNone); |
![]() |
procedure SetKeyVelocity(FromKey, ToKey: Byte; Amount: single); |
![]() |
procedure SetKeyPressed(KeyNr: Byte; KeyDown: Boolean = true); |
![]() |
procedure ReleaseKey(KeyNr: Byte; ReleaseMouseTriggered: boolean = false); |
![]() |
procedure ReleaseAllKeys(ReleaseMouseTriggered: boolean = false); |
![]() |
procedure RemoveKeyColor(FromKey, ToKey: Byte); |
![]() |
procedure AllNotesOff(MouseTriggeredOnly: Boolean = true; ExceptKey: Integer = -1); |
![]() |
procedure RedrawBuffer(doBufferFlip: Boolean); override; |
![]() |
function MousePosToKey(X, Y: Integer; CheckYPos: Boolean = true): Integer; dynamic; |
![]() |
function GetZoneMouseOverType(X: Integer; KeyNr: Integer = -1; Zone: TGuiKeyZoneItem = nil): TGuiZoneMousePosType; |
![]() |
function ScreenCoordOnKey(X, Y: Integer; KeyNr: Integer; CheckYPos: Boolean = true): Boolean; dynamic; |
Properties
![]() |
property Keys: TGuiKeyArray read fKeys; |
![]() |
property ReleaseMouseBtnOnLeave; |
![]() |
property KeyDownMode: TGuiKeyDownMode read fKeyDownMode write SetKeyDownMode; |
![]() |
property BorderColor: TColor read fBorderColor write SetBorderColor default clBlack; |
![]() |
property KeySeparatorColor: TColor read fKeySeparatorColor write SetKeySeparatorColor default clBlack; |
![]() |
property ZoneSeparatorColor: TColor read fZoneSeparatorColor write SetZoneSeparatorColor default clBlack; |
![]() |
property ZoneBarColor: TColor read fZoneBarColor write SetZoneBarColor default clWhite; |
![]() |
property ZoneBarHoverColor: TColor read fZoneBarHoverColor write SetZoneBarHoverColor default $00CCEEFF; |
![]() |
property BlackKeyColor: TColor read fBlackKeyColor write SetBlackKeyColor default $00333333; |
![]() |
property BlackKeyHoverColor: TColor read fBlackKeyHoverColor write SetBlackKeyHoverColor default $00666666; |
![]() |
property BlackKeyPressedColor: TColor read fBlackKeyPressedColor write SetBlackKeyPressedColor default clSilver; |
![]() |
property WhiteKeyColor: TColor read fWhiteKeyColor write SetWhiteKeyColor default $00F8F8F8; |
![]() |
property WhiteKeyHoverColor: TColor read fWhiteKeyHoverColor write SetWhiteKeyHoverColor default $00DDDDDD; |
![]() |
property WhiteKeyPressedColor: TColor read fWhiteKeyPressedColor write SetWhiteKeyPressedColor default clSilver; |
![]() |
property CursorKeys: TCursor read fCursorKeys write fCursorKeys default crHandPoint; |
![]() |
property CursorZoneBar: TCursor read fCursorZoneBar write fCursorZoneBar default crDefault; |
![]() |
property CursorZone: TCursor read fCursorZone write fCursorZone default crSize; |
![]() |
property CursorZoneBorder: TCursor read fCursorZoneBorder write fCursorZoneBorder default crSizeWE; |
![]() |
property Height3d: Single read fHeight3d write SetHeight3d; |
![]() |
property BlackKeyHeight: Single read fBlackKeyHeight write SetBlackKeyHeight; |
![]() |
property BaseOctave: Byte read fBaseOctave write SetBaseOctave default 3; |
![]() |
property NumOctaves: Byte read fNumOctaves write SetNumOctaves default 3; |
![]() |
property IncludeLastOctave: Boolean read fIncludeLastOctave write SetIncludeLastOctave default false; |
![]() |
property KeyZones: TGuiKeyZoneCollection read fKeyZones write SetKeyZones; |
![]() |
property ShowKeyZones: Boolean read fShowKeyZones write SetShowKeyZones default True; |
![]() |
property KeyZoneHeight: Integer read fKeyZoneHeight write SetKeyZoneHeight default 10; |
![]() |
property AllowKeyDragging: Boolean read fAllowKeyDragging write fAllowKeyDragging default true; |
![]() |
property OnMouseUpOnMidiKey: TGuiOnMouseUpOnMidiKey read fOnMouseUpOnMidiKey write fOnMouseUpOnMidiKey; |
![]() |
property OnMouseUpOnKeyZoneBar: TGuiOnMouseUpOnKeyZoneBar read fOnMouseUpOnKeyZoneBar write fOnMouseUpOnKeyZoneBar; |
![]() |
property OnMouseDownOnMidiKey: TGuiOnMouseDownOnMidiKey read fOnMouseDownOnMidiKey write fOnMouseDownOnMidiKey; |
![]() |
property OnMouseDownKeyZoneBar: TGuiOnMouseDownOnKeyZoneBar read fOnMouseDownOnKeyZoneBar write fOnMouseDownOnKeyZoneBar; |
![]() |
property OnZoneBarMouseEnter: TGuiOnZoneBarMouseEnter read fOnZoneBarMouseEnter write fOnZoneBarMouseEnter; |
![]() |
property OnZoneBarMouseLeave: TGuiOnZoneBarMouseLeave read fOnZoneBarMouseLeave write fOnZoneBarMouseLeave; |
![]() |
property OnZoneMouseEnter: TGuiOnZoneMouseEnter read fOnZoneMouseEnter write fOnZoneMouseEnter; |
![]() |
property OnZoneMouseLeave: TGuiOnZoneMouseLeave read fOnZoneMouseLeave write fOnZoneMouseLeave; |
![]() |
property OnZoneMouseOverChanged: TGuiOnZoneMouseOverChanged read fOnZoneMouseOverChanged write fOnZoneMouseOverChanged; |
![]() |
property OnZoneSelectionChanged: TGuiOnZoneSelectionChanged read fOnZoneSelectionChanged write fOnZoneSelectionChanged; |
![]() |
property OnKeyMouseEnter: TGuiOnKeyMouseEnter read fOnKeyMouseEnter write fOnKeyMouseEnter; |
![]() |
property OnKeyMouseLeave: TGuiOnKeyMouseLeave read fOnKeyMouseLeave write fOnKeyMouseLeave; |
![]() |
property OnStartZoneBarDragging: TGuiOnStartZoneBarDragging read fOnStartZoneBarDragging write fOnStartZoneBarDragging; |
![]() |
property OnMoveZoneBarDragging: TGuiOnMoveZoneBarDragging read fOnMoveZoneBarDragging write fOnMoveZoneBarDragging; |
![]() |
property OnEndZoneBarDragging: TGuiOnEndZoneBarDragging read fOnEndZoneBarDragging write fOnEndZoneBarDragging; |
![]() |
property OnStartKeyDragging: TGuiOnStartKeyDragging read fOnStartKeyDragging write fOnStartKeyDragging; |
![]() |
property OnMoveKeyDragging: TGuiOnMoveKeyDragging read fOnMoveKeyDragging write fOnMoveKeyDragging; |
![]() |
property OnEndKeyDragging: TGuiOnEndKeyDragging read fOnEndKeyDragging write fOnEndKeyDragging; |
![]() |
property OnNoteOn: TGuiOnNoteOn read fOnNoteOn write fOnNoteOn; |
![]() |
property OnNoteOff: TGuiOnNoteOff read fOnNoteOff write fOnNoteOff; |
Description
Methods
![]() |
constructor Create(AOwner: TComponent); override; |
![]() |
destructor Destroy; override; |
![]() |
procedure SetKeyColor(FromKey, ToKey: Byte; BaseColor: TColor = clNone; Over: TColor = clNone; Pressed: TColor = clNone); |
![]() |
procedure SetKeyVelocity(FromKey, ToKey: Byte; Amount: single); |
![]() |
procedure SetKeyPressed(KeyNr: Byte; KeyDown: Boolean = true); |
![]() |
procedure ReleaseKey(KeyNr: Byte; ReleaseMouseTriggered: boolean = false); |
![]() |
procedure ReleaseAllKeys(ReleaseMouseTriggered: boolean = false); |
![]() |
procedure RemoveKeyColor(FromKey, ToKey: Byte); |
![]() |
procedure AllNotesOff(MouseTriggeredOnly: Boolean = true; ExceptKey: Integer = -1); |
![]() |
procedure RedrawBuffer(doBufferFlip: Boolean); override; |
![]() |
function MousePosToKey(X, Y: Integer; CheckYPos: Boolean = true): Integer; dynamic; |
![]() |
function GetZoneMouseOverType(X: Integer; KeyNr: Integer = -1; Zone: TGuiKeyZoneItem = nil): TGuiZoneMousePosType; |
![]() |
function ScreenCoordOnKey(X, Y: Integer; KeyNr: Integer; CheckYPos: Boolean = true): Boolean; dynamic; |
Properties
![]() |
property Keys: TGuiKeyArray read fKeys; |
![]() |
property ReleaseMouseBtnOnLeave; |
![]() |
property KeyDownMode: TGuiKeyDownMode read fKeyDownMode write SetKeyDownMode; |
![]() |
property BorderColor: TColor read fBorderColor write SetBorderColor default clBlack; |
![]() |
property KeySeparatorColor: TColor read fKeySeparatorColor write SetKeySeparatorColor default clBlack; |
![]() |
property ZoneSeparatorColor: TColor read fZoneSeparatorColor write SetZoneSeparatorColor default clBlack; |
![]() |
property ZoneBarColor: TColor read fZoneBarColor write SetZoneBarColor default clWhite; |
![]() |
property ZoneBarHoverColor: TColor read fZoneBarHoverColor write SetZoneBarHoverColor default $00CCEEFF; |
![]() |
property BlackKeyColor: TColor read fBlackKeyColor write SetBlackKeyColor default $00333333; |
![]() |
property BlackKeyHoverColor: TColor read fBlackKeyHoverColor write SetBlackKeyHoverColor default $00666666; |
![]() |
property BlackKeyPressedColor: TColor read fBlackKeyPressedColor write SetBlackKeyPressedColor default clSilver; |
![]() |
property WhiteKeyColor: TColor read fWhiteKeyColor write SetWhiteKeyColor default $00F8F8F8; |
![]() |
property WhiteKeyHoverColor: TColor read fWhiteKeyHoverColor write SetWhiteKeyHoverColor default $00DDDDDD; |
![]() |
property WhiteKeyPressedColor: TColor read fWhiteKeyPressedColor write SetWhiteKeyPressedColor default clSilver; |
![]() |
property CursorKeys: TCursor read fCursorKeys write fCursorKeys default crHandPoint; |
![]() |
property CursorZoneBar: TCursor read fCursorZoneBar write fCursorZoneBar default crDefault; |
![]() |
property CursorZone: TCursor read fCursorZone write fCursorZone default crSize; |
![]() |
property CursorZoneBorder: TCursor read fCursorZoneBorder write fCursorZoneBorder default crSizeWE; |
![]() |
property Height3d: Single read fHeight3d write SetHeight3d; |
![]() |
property BlackKeyHeight: Single read fBlackKeyHeight write SetBlackKeyHeight; |
![]() |
property BaseOctave: Byte read fBaseOctave write SetBaseOctave default 3; |
![]() |
property NumOctaves: Byte read fNumOctaves write SetNumOctaves default 3; |
![]() |
property IncludeLastOctave: Boolean read fIncludeLastOctave write SetIncludeLastOctave default false; |
![]() |
property KeyZones: TGuiKeyZoneCollection read fKeyZones write SetKeyZones; |
![]() |
property ShowKeyZones: Boolean read fShowKeyZones write SetShowKeyZones default True; |
![]() |
property KeyZoneHeight: Integer read fKeyZoneHeight write SetKeyZoneHeight default 10; |
![]() |
property AllowKeyDragging: Boolean read fAllowKeyDragging write fAllowKeyDragging default true; |
![]() |
property OnMouseUpOnMidiKey: TGuiOnMouseUpOnMidiKey read fOnMouseUpOnMidiKey write fOnMouseUpOnMidiKey; |
![]() |
property OnMouseUpOnKeyZoneBar: TGuiOnMouseUpOnKeyZoneBar read fOnMouseUpOnKeyZoneBar write fOnMouseUpOnKeyZoneBar; |
![]() |
property OnMouseDownOnMidiKey: TGuiOnMouseDownOnMidiKey read fOnMouseDownOnMidiKey write fOnMouseDownOnMidiKey; |
![]() |
property OnMouseDownKeyZoneBar: TGuiOnMouseDownOnKeyZoneBar read fOnMouseDownOnKeyZoneBar write fOnMouseDownOnKeyZoneBar; |
![]() |
property OnZoneBarMouseEnter: TGuiOnZoneBarMouseEnter read fOnZoneBarMouseEnter write fOnZoneBarMouseEnter; |
![]() |
property OnZoneBarMouseLeave: TGuiOnZoneBarMouseLeave read fOnZoneBarMouseLeave write fOnZoneBarMouseLeave; |
![]() |
property OnZoneMouseEnter: TGuiOnZoneMouseEnter read fOnZoneMouseEnter write fOnZoneMouseEnter; |
![]() |
property OnZoneMouseLeave: TGuiOnZoneMouseLeave read fOnZoneMouseLeave write fOnZoneMouseLeave; |
![]() |
property OnZoneMouseOverChanged: TGuiOnZoneMouseOverChanged read fOnZoneMouseOverChanged write fOnZoneMouseOverChanged; |
![]() |
property OnZoneSelectionChanged: TGuiOnZoneSelectionChanged read fOnZoneSelectionChanged write fOnZoneSelectionChanged; |
![]() |
property OnKeyMouseEnter: TGuiOnKeyMouseEnter read fOnKeyMouseEnter write fOnKeyMouseEnter; |
![]() |
property OnKeyMouseLeave: TGuiOnKeyMouseLeave read fOnKeyMouseLeave write fOnKeyMouseLeave; |
![]() |
property OnStartZoneBarDragging: TGuiOnStartZoneBarDragging read fOnStartZoneBarDragging write fOnStartZoneBarDragging; |
![]() |
property OnMoveZoneBarDragging: TGuiOnMoveZoneBarDragging read fOnMoveZoneBarDragging write fOnMoveZoneBarDragging; |
![]() |
property OnEndZoneBarDragging: TGuiOnEndZoneBarDragging read fOnEndZoneBarDragging write fOnEndZoneBarDragging; |
![]() |
property OnStartKeyDragging: TGuiOnStartKeyDragging read fOnStartKeyDragging write fOnStartKeyDragging; |
![]() |
property OnMoveKeyDragging: TGuiOnMoveKeyDragging read fOnMoveKeyDragging write fOnMoveKeyDragging; |
![]() |
property OnEndKeyDragging: TGuiOnEndKeyDragging read fOnEndKeyDragging write fOnEndKeyDragging; |
![]() |
property OnNoteOn: TGuiOnNoteOn read fOnNoteOn write fOnNoteOn; |
![]() |
property OnNoteOff: TGuiOnNoteOff read fOnNoteOff write fOnNoteOff; |
Generated by PasDoc 0.10.0 on 2007-11-13 13:04:18