MidiMountain 0.4.0

Class TfrmMMDisplay

Unit

Declaration

type TfrmMMDisplay = class(TfrmMMBase)

Description

Hierarchy

Fields

	Name	Description
	btnSnapBeat
	btnSnapMeasure
	btnSnapSelection
	btnSnapTicks
	lblKeySignature
	lblKeySignatureLabel
	lblLoopDash
	lblLoopFrom
	lblLoopLabel
	lblLoopTo
	lblMeasure
	lblMeasureLabel
	lblSelectionDash
	lblSelectionFrom
	lblSelectionLabel
	lblSelectionTo
	lblTempo
	lblTempoLabel
	lblTime
	lblTimeLabel
	lblTimeSignatureDenimonator
	lblTimeSignatureNumerator
	mnuSnapValues
	N111
	N1161
	N121
	N1321
	N141
	N181
	Panel10
	Panel11
	Panel12
	Panel8
	Panel9
	pnlDash
	pnlDisplay
	pnlFrom
	pnlKeySignature
	pnlSelectionLoopLabel
	pnlSnap
	pnlTempo
	pnlTimeMeasure
	pnlTimeMeasureLabel
	pnlTimeSignature
	pnlTo
	Shape1
	spiSnapTicks

Methods

Overview

	procedure btnSnapClick(Sender: TObject);
	procedure btnSnapMeasureMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
	procedure btnSnapSelectionClick(Sender: TObject);
	procedure FormCreate(Sender: TObject);
	procedure FormDestroy(Sender: TObject);
	procedure lblSelectionFromClick(Sender: TObject);
	procedure lblSelectionToClick(Sender: TObject);
	procedure N1321Click(Sender: TObject);
	procedure SetActivated( const Value: boolean ); override;
	procedure spiSnapTicksChanged(Sender: TObject; NewValue: Integer);
	procedure Translate; override;

Description

procedure btnSnapClick(Sender: TObject);

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

procedure btnSnapSelectionClick(Sender: TObject);

procedure FormCreate(Sender: TObject);

procedure FormDestroy(Sender: TObject);

procedure lblSelectionFromClick(Sender: TObject);

procedure lblSelectionToClick(Sender: TObject);

procedure N1321Click(Sender: TObject);

procedure SetActivated( const Value: boolean ); override;

activate the view (initialization)

procedure spiSnapTicksChanged(Sender: TObject; NewValue: Integer);

procedure Translate; override;

see TfrmMMBase