Source position: DAV_GuiMidiKeys.pas line 75
type TGuiOnStartZoneBarDragging = procedure( |
Sender: TObject; |
KeyNr: Integer; |
var DragInfo: TGuiZbMouseDragInfo; |
Shift: TShiftState; |
X: Integer; |
Y: Integer |
) of object; |
CT Web help |
CodeTyphon Studio |