MidiMountain 0.4.0


Units
Classes, Interfaces and Objects
Types
Variables
Constants
Functions and Procedures
Identifiers

Class TfrmMMMainView

Unit

MMFormMainView

Declaration

type TfrmMMMainView = class(TfrmMMBase)

Description

MidiMountain Main View
Main view of all the tracks in pretty color.

Hierarchy

TfrmMMBase

Fields

 NameDescription
Public barMainViewTimeZoom  
Public boxMainView  
Public btnMainViewLock  
Public lblMainViewTimeZoom  
Public lblTrack  
Public mpbMainView  
Public Panel1  
Public pnlMainView  
Public pnlMainViewBar  
Public pnlSeqPositionBar  
Public pnlSequence  
Public pnlTime  
Public pnlTrack  
Public pnlTrackColor  
Public scrMainView  
Public scrollMainView  

Methods

Overview

Public procedure barMainViewTimeZoomChange(Sender: TObject);
Public procedure boxMainViewMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
Public procedure boxMainViewMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
Public procedure boxMainViewMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
Public procedure boxMainViewPaint(Sender: TObject);
Public procedure btnMainViewLockMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
Public procedure FormCreate(Sender: TObject);
Public procedure FormDestroy(Sender: TObject);
Public procedure mpbMainViewAddKeySignature(const aOffset: Integer);
Public procedure mpbMainViewAddMarker(const aOffset: Integer);
Public procedure mpbMainViewAddTimeSignature(const aOffset: Integer);
Public procedure mpbMainViewKeySignatureClick( const aKeySignature: TMCKeySignature);
Public procedure mpbMainViewMarkerClick(const aMarker: TMCMarker);
Public procedure mpbMainViewPagePositionChanged(const aPagePosition: Integer);
Public procedure mpbMainViewTimeSignatureClick( const aTimeSignature: TMCTimeSignature);
Public procedure pnlMainViewBarResize(Sender: TObject);
Public procedure pnlSequenceResize(Sender: TObject);
Public procedure scrMainViewMouseWheel(Sender: TObject; Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);
Public procedure scrollMainViewChange(Sender: TObject);
Public procedure scrollMainViewEnter(Sender: TObject);
Public procedure scrollMainViewExit(Sender: TObject);
Public procedure scrollMainViewKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
Public procedure scrollMainViewKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
Protected procedure SetActivated(const Value: boolean); override;
Public procedure Translate; override;

Description

Public procedure barMainViewTimeZoomChange(Sender: TObject);

 

Public procedure boxMainViewMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);

 

Public procedure boxMainViewMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);

 

Public procedure boxMainViewMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);

 

Public procedure boxMainViewPaint(Sender: TObject);

 

Public procedure btnMainViewLockMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);

 

Public procedure FormCreate(Sender: TObject);

 

Public procedure FormDestroy(Sender: TObject);

 

Public procedure mpbMainViewAddKeySignature(const aOffset: Integer);

 

Public procedure mpbMainViewAddMarker(const aOffset: Integer);

 

Public procedure mpbMainViewAddTimeSignature(const aOffset: Integer);

 

Public procedure mpbMainViewKeySignatureClick( const aKeySignature: TMCKeySignature);

 

Public procedure mpbMainViewMarkerClick(const aMarker: TMCMarker);

 

Public procedure mpbMainViewPagePositionChanged(const aPagePosition: Integer);

 

Public procedure mpbMainViewTimeSignatureClick( const aTimeSignature: TMCTimeSignature);

 

Public procedure pnlMainViewBarResize(Sender: TObject);

 

Public procedure pnlSequenceResize(Sender: TObject);

 

Public procedure scrMainViewMouseWheel(Sender: TObject; Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);

 

Public procedure scrollMainViewChange(Sender: TObject);

 

Public procedure scrollMainViewEnter(Sender: TObject);

 

Public procedure scrollMainViewExit(Sender: TObject);

 

Public procedure scrollMainViewKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);

 

Public procedure scrollMainViewKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);

 

Protected procedure SetActivated(const Value: boolean); override;

activate the form

Public procedure Translate; override;

see TfrmMMBase


MidiMountain 0.4.0 1999-2002 Adrian Meyer, developed with Delphi and Kylix


Generated by DIPasDoc 0.8.0 on Wed 29 Oct 2003 21:59:09