home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 1999 July
/
PCWorld_1999-07_cd.bin
/
software
/
TemaCD
/
Massiva
/
MASSIVA.EXE
/
0
/
RCDATA
/
TFMMIDIFADER
/
TFMMIDIFADER.txt
Wrap
Text File
|
1999-04-03
|
9KB
|
406 lines
object fmMidiFader: TfmMidiFader
Left = 265
Top = 258
BorderStyle = bsNone
Caption = 'Midi faders'
ClientHeight = 77
ClientWidth = 136
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsStayOnTop
KeyPreview = True
OnCreate = FormCreate
OnKeyDown = FormKeyDown
OnKeyUp = FormKeyUp
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 0
Top = 0
Width = 136
Height = 77
Align = alClient
Style = bsRaised
end
object Fader1: TFader
Left = 5
Top = 5
Width = 25
Height = 49
Cursor = crHandPoint
Color = 16711808
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -9
Font.Name = 'Small Fonts'
Font.Style = []
ParentColor = False
ParentFont = False
Mirror = True
ShowText = True
Min = 0
Max = 127
Pos = 63
ThumbSize = 0
OnChange = Fader1Change
BkColor = clBlack
end
object Fader2: TFader
Left = 32
Top = 5
Width = 25
Height = 49
Cursor = crHandPoint
Color = 16711808
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -9
Font.Name = 'Small Fonts'
Font.Style = []
ParentColor = False
ParentFont = False
Mirror = True
ShowText = True
Min = 0
Max = 127
Pos = 63
ThumbSize = 0
OnChange = Fader2Change
BkColor = clBlack
end
object Fader3: TFader
Left = 59
Top = 5
Width = 25
Height = 49
Cursor = crHandPoint
Color = 16711808
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -9
Font.Name = 'Small Fonts'
Font.Style = []
ParentColor = False
ParentFont = False
Mirror = True
ShowText = True
Min = 0
Max = 127
Pos = 63
ThumbSize = 0
OnChange = Fader3Change
BkColor = clBlack
end
object Fader4: TFader
Left = 86
Top = 5
Width = 25
Height = 49
Cursor = crHandPoint
Color = 16711808
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -9
Font.Name = 'Small Fonts'
Font.Style = []
ParentColor = False
ParentFont = False
Mirror = True
ShowText = True
Min = 0
Max = 127
Pos = 63
ThumbSize = 0
OnChange = Fader4Change
BkColor = clBlack
end
object move: TRotateLabel
Left = 115
Top = 24
Width = 18
Height = 50
Hint = 'Click and drag to move'
Escapement = 90
TextStyle = tsNone
AutoSize = False
Caption = 'MIDI'
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = 8454143
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object SpeedButton1: TSpeedButton
Left = 115
Top = 5
Width = 17
Height = 17
Cursor = crHandPoint
Hint = 'Close'
Flat = True
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
Glyph.Data = {
BE000000424DBE00000000000000760000002800000009000000090000000100
0400000000004800000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777000
000077777777700000007777F77770000000777777777000000077FFFFF77000
00007777777770000000FFFFFFFFF00000007777777770000000777777777000
0000}
ParentFont = False
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton1Click
end
object panelCC1: TPanel
Left = 5
Top = 57
Width = 25
Height = 16
Cursor = crHandPoint
Hint = 'Velocity'
BevelOuter = bvNone
Caption = 'Vel'
Color = clGray
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnClick = panelCC1Click
end
object panelCC2: TPanel
Left = 32
Top = 57
Width = 25
Height = 16
Cursor = crHandPoint
Hint = 'Velocity'
BevelOuter = bvNone
Caption = 'Vel'
Color = clGray
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 2
OnClick = panelCC2Click
end
object panelCC3: TPanel
Left = 59
Top = 57
Width = 25
Height = 16
Cursor = crHandPoint
Hint = 'Velocity'
BevelOuter = bvNone
Caption = 'Vel'
Color = clGray
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 3
OnClick = panelCC3Click
end
object panelCC4: TPanel
Left = 86
Top = 57
Width = 25
Height = 16
Cursor = crHandPoint
Hint = 'Velocity'
BevelOuter = bvNone
Caption = 'Vel'
Color = clGray
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 4
OnClick = panelCC4Click
end
object List: TListBox
Left = 344
Top = 112
Width = 153
Height = 137
Hint = 'Select controller'
TabStop = False
BorderStyle = bsNone
Color = clBlack
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ItemHeight = 14
Items.Strings = (
'Bank Select (0)'
'Modulation (1)'
'Breath control (2)'
'Controller (3)'
'Foot controller (4)'
'Portamento time (5)'
'Data entry (6)'
'Main volum (7)'
'Balance (8)'
'Controller (9)'
'Pan (10)'
'Expression Controller (11)'
'Effect controll 1 (12)'
'Effect controll 2 (13)'
'Controller (14)'
'Controller (15)'
'Controller (16)'
'Controller (17)'
'Controller (18)'
'Controller (19)'
'Controller (20)'
'Controller (21)'
'Controller (22)'
'Controller (23)'
'Controller (24)'
'Controller (25)'
'Controller (26)'
'Controller (27)'
'Controller (28)'
'Controller (29)'
'Controller (30)'
'Controller (31)'
'Controller (32)'
'Controller (33)'
'Controller (34)'
'Controller (35)'
'Controller (36)'
'Controller (37)'
'Controller (38)'
'Controller (39)'
'Controller (40)'
'Controller (41)'
'Controller (42)'
'Controller (43)'
'Controller (44)'
'Controller (45)'
'Controller (46)'
'Controller (47)'
'Controller (48)'
'Controller (49)'
'Controller (50)'
'Controller (51)'
'Controller (52)'
'Controller (53)'
'Controller (54)'
'Controller (55)'
'Controller (56)'
'Controller (57)'
'Controller (58)'
'Controller (59)'
'Controller (60)'
'Controller (61)'
'Controller (62)'
'Controller (63)'
'Controller (64)'
'Controller (65)'
'Controller (66)'
'Controller (67)'
'Controller (68)'
'Controller (69)'
'Controller (70)'
'Controller (71)'
'Controller (72)'
'Controller (73)'
'Controller (74)'
'Controller (75)'
'Controller (76)'
'Controller (77)'
'Controller (78)'
'Controller (79)'
'Controller (80)'
'Controller (81)'
'Controller (82)'
'Controller (83)'
'Controller (84)'
'Controller (85)'
'Controller (86)'
'Controller (87)'
'Controller (88)'
'Controller (89)'
'Controller (80)'
'Controller (91)'
'Controller (92)'
'Controller (93)'
'Controller (94)'
'Controller (95)'
'Controller (96)'
'Controller (97)'
'Controller (98)'
'Controller (99)'
'Controller (100)'
'Controller (101)'
'Controller (102)'
'Controller (103)'
'Controller (104)'
'Controller (105)'
'Controller (106)'
'Controller (107)'
'Controller (108)'
'Controller (109)'
'Controller (110)'
'Controller (111)'
'Controller (112)'
'Controller (113)'
'Controller (114)'
'Controller (115)'
'Controller (116)'
'Controller (117)'
'Controller (118)'
'Controller (119)'
'Controller (120)'
'Controller (121)'
'Controller (122)'
'Controller (123)'
'Controller (124)'
'Controller (125)'
'Controller (126)'
'Controller (127)')
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 0
Visible = False
OnKeyDown = ListKeyDown
OnMouseUp = ListMouseUp
end
end
