MidiMountain 0.4.0


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

Class TfrmMMKeySignatureProperties

Unit

MMFormKeySignatureProperties

Declaration

type TfrmMMKeySignatureProperties = class(TfrmMMBaseProperties)

Description

MidiMountain Key Signatures Properties
View of one Key signature

Hierarchy

TfrmMMBaseProperties > TfrmMMBase

Fields

 NameDescription
Public actDown  
Public actKey  
Public actUp  
Public boxKey  
Public btnCancel  
Public btnOK  
Public grpGlobal  
Public grpKeySignature  
Public imgKey  
Public imgKeyFlat  
Public imgKeySharp  
Public lblKey  
Public lblMeasure  
Public pnlKey  
Public rboMajor  
Public rboMinor  
Public SpeedButton1  
Public SpeedButton2  
Public spiMeasure  

Methods

Overview

Public procedure actDownExecute(Sender: TObject);
Public procedure actUpExecute(Sender: TObject);
Public procedure boxKeyPaint(Sender: TObject);
Public procedure btnOKClick(Sender: TObject);
Public procedure FormCreate(Sender: TObject);
Public procedure FormDestroy(Sender: TObject);
Public procedure FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
Protected function GetItem: TMCItem; override;
Public procedure rboMajorClick(Sender: TObject);
Public function Show( const aItem: TMCItem; const aOffset: TMidiOffset ): integer; override;
Public class function ShowKeySignature(const aOffset: Integer; const aKeySignature: TMCKeySignature = nil): integer;
Public procedure SpeedButton1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
Public procedure SpeedButton2MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
Public procedure Translate; override;

Description

Public procedure actDownExecute(Sender: TObject);

 

Public procedure actUpExecute(Sender: TObject);

 

Public procedure boxKeyPaint(Sender: TObject);

 

Public procedure btnOKClick(Sender: TObject);

 

Public procedure FormCreate(Sender: TObject);

 

Public procedure FormDestroy(Sender: TObject);

 

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

 

Protected function GetItem: TMCItem; override;

 

Public procedure rboMajorClick(Sender: TObject);

 

Public function Show( const aItem: TMCItem; const aOffset: TMidiOffset ): integer; override;

show the dialog with the selected Key signature

Public class function ShowKeySignature(const aOffset: Integer; const aKeySignature: TMCKeySignature = nil): integer;

 

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

 

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

 

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