home *** CD-ROM | disk | FTP | other *** search
/ PC World 1999 July / PCWorld_1999-07_cd.bin / software / TemaCD / Massiva / MASSIVA.EXE / 0 / RCDATA / TFMTRANSPORTER / TFMTRANSPORTER.txt < prev   
Text File  |  1999-04-03  |  8KB  |  352 lines
  1. object fmTransporter: TfmTransporter
  2.   Left = 369
  3.   Top = 555
  4.   BorderStyle = bsDialog
  5.   Caption = 'Transporter'
  6.   ClientHeight = 49
  7.   ClientWidth = 301
  8.   Color = clBlack
  9.   Font.Charset = DEFAULT_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   FormStyle = fsStayOnTop
  15.   PopupMenu = PopupMenu1
  16.   OnCreate = FormCreate
  17.   OnDblClick = FormDblClick
  18.   OnKeyDown = FormKeyDown
  19.   OnKeyUp = FormKeyUp
  20.   OnShow = FormShow
  21.   PixelsPerInch = 96
  22.   TextHeight = 13
  23.   object Label3: TLabel
  24.     Left = 6
  25.     Top = 31
  26.     Width = 18
  27.     Height = 14
  28.     Caption = 'Left'
  29.     Font.Charset = DEFAULT_CHARSET
  30.     Font.Color = clSilver
  31.     Font.Height = -11
  32.     Font.Name = 'Arial'
  33.     Font.Style = [fsItalic]
  34.     ParentFont = False
  35.     Transparent = True
  36.   end
  37.   object labelRight: TLabel
  38.     Left = 100
  39.     Top = 31
  40.     Width = 26
  41.     Height = 14
  42.     Caption = 'Right'
  43.     Font.Charset = DEFAULT_CHARSET
  44.     Font.Color = clSilver
  45.     Font.Height = -11
  46.     Font.Name = 'Arial'
  47.     Font.Style = [fsItalic]
  48.     ParentFont = False
  49.     Transparent = True
  50.   end
  51.   object LabelPos: TLabel
  52.     Left = 199
  53.     Top = 31
  54.     Width = 27
  55.     Height = 14
  56.     Alignment = taRightJustify
  57.     AutoSize = False
  58.     Caption = 'Pos'
  59.     Color = clSilver
  60.     Font.Charset = DEFAULT_CHARSET
  61.     Font.Color = clSilver
  62.     Font.Height = -11
  63.     Font.Name = 'Arial'
  64.     Font.Style = [fsItalic]
  65.     ParentColor = False
  66.     ParentFont = False
  67.     Transparent = True
  68.   end
  69.   object labelMassiva: TRotateLabel
  70.     Left = 210
  71.     Top = 4
  72.     Width = 83
  73.     Height = 24
  74.     Escapement = 0
  75.     TextStyle = tsRaised
  76.     Caption = 'Massiva'
  77.     Color = clBlack
  78.     Font.Charset = DEFAULT_CHARSET
  79.     Font.Color = clBlack
  80.     Font.Height = -21
  81.     Font.Name = 'Arial'
  82.     Font.Style = [fsBold]
  83.     ParentColor = False
  84.     ParentFont = False
  85.     ParentShowHint = False
  86.     ShowHint = False
  87.     Transparent = True
  88.   end
  89.   object led: TPanel
  90.     Left = 169
  91.     Top = 94
  92.     Width = 25
  93.     Height = 20
  94.     BevelOuter = bvLowered
  95.     TabOrder = 0
  96.   end
  97.   object editRight: TEditNew
  98.     Left = 133
  99.     Top = 31
  100.     Width = 60
  101.     Height = 14
  102.     TabStop = False
  103.     BorderStyle = bsNone
  104.     Color = clBlack
  105.     Font.Charset = DEFAULT_CHARSET
  106.     Font.Color = clWhite
  107.     Font.Height = -11
  108.     Font.Name = 'Arial'
  109.     Font.Style = [fsBold]
  110.     ParentFont = False
  111.     TabOrder = 1
  112.     Text = '0001:01:001'
  113.     OnKeyDown = editRightKeyDown
  114.     OnKeyPress = editRightKeyPress
  115.     FocusColor = clBlack
  116.     FocusFontColor = clWhite
  117.     NoFocusColor = clBlack
  118.     NoFocusFontColor = clWhite
  119.   end
  120.   object editLeft: TEditNew
  121.     Left = 30
  122.     Top = 31
  123.     Width = 64
  124.     Height = 13
  125.     TabStop = False
  126.     BorderStyle = bsNone
  127.     Color = clBlack
  128.     Font.Charset = DEFAULT_CHARSET
  129.     Font.Color = clWhite
  130.     Font.Height = -11
  131.     Font.Name = 'Arial'
  132.     Font.Style = [fsBold]
  133.     ParentFont = False
  134.     TabOrder = 2
  135.     Text = '0001:01:001'
  136.     OnKeyDown = editLeftKeyDown
  137.     OnKeyPress = editLeftKeyPress
  138.     FocusColor = clBlack
  139.     FocusFontColor = clWhite
  140.     NoFocusColor = clBlack
  141.     NoFocusFontColor = clWhite
  142.   end
  143.   object PanelRec: TPanel
  144.     Left = 65
  145.     Top = 6
  146.     Width = 25
  147.     Height = 20
  148.     Caption = 'PanelRec'
  149.     Color = clBlack
  150.     TabOrder = 3
  151.     object iconRec: TImage
  152.       Left = 1
  153.       Top = 1
  154.       Width = 23
  155.       Height = 18
  156.       Hint = '[*] Record'
  157.       Align = alClient
  158.       Center = True
  159.       ParentShowHint = False
  160.       Picture.Data = {<image000.bmp>}
  161.       ShowHint = True
  162.       OnClick = iconRecClick
  163.       OnMouseDown = iconRecMouseDown
  164.       OnMouseUp = iconRecMouseUp
  165.     end
  166.   end
  167.   object panelStop: TPanel
  168.     Left = 37
  169.     Top = 6
  170.     Width = 25
  171.     Height = 20
  172.     BevelOuter = bvNone
  173.     Caption = 'panelStop'
  174.     Color = clBlack
  175.     TabOrder = 4
  176.     object iconStop: TImage
  177.       Left = 0
  178.       Top = 0
  179.       Width = 25
  180.       Height = 20
  181.       Hint = '[0 or space] Stop'
  182.       Align = alClient
  183.       Center = True
  184.       ParentShowHint = False
  185.       Picture.Data = {<image001.bmp>}
  186.       ShowHint = True
  187.       OnClick = iconStopClick
  188.     end
  189.   end
  190.   object panelPlay: TPanel
  191.     Left = 7
  192.     Top = 6
  193.     Width = 25
  194.     Height = 20
  195.     Caption = 'panelPlay'
  196.     Color = clBlack
  197.     TabOrder = 5
  198.     object iconPlay: TImage
  199.       Left = 1
  200.       Top = 1
  201.       Width = 23
  202.       Height = 18
  203.       Hint = '[Return] Play'
  204.       Align = alClient
  205.       Center = True
  206.       ParentShowHint = False
  207.       Picture.Data = {<image002.bmp>}
  208.       ShowHint = True
  209.       OnClick = iconPlayClick
  210.       OnMouseDown = iconPlayMouseDown
  211.       OnMouseUp = iconPlayMouseUp
  212.     end
  213.   end
  214.   object panelRewerse: TPanel
  215.     Left = 121
  216.     Top = 6
  217.     Width = 25
  218.     Height = 20
  219.     Caption = 'panelRewerse'
  220.     Color = clBlack
  221.     TabOrder = 6
  222.     object Image1: TImage
  223.       Left = 1
  224.       Top = 1
  225.       Width = 23
  226.       Height = 18
  227.       Hint = '[PgDown] Rewerse'
  228.       Align = alClient
  229.       Center = True
  230.       ParentShowHint = False
  231.       Picture.Data = {<image003.bmp>}
  232.       ShowHint = True
  233.       OnMouseDown = Image1MouseDown
  234.       OnMouseUp = Image1MouseUp
  235.     end
  236.   end
  237.   object panelForward: TPanel
  238.     Left = 149
  239.     Top = 6
  240.     Width = 25
  241.     Height = 20
  242.     Caption = 'panelForward'
  243.     Color = clBlack
  244.     TabOrder = 7
  245.     object Image2: TImage
  246.       Left = 1
  247.       Top = 1
  248.       Width = 23
  249.       Height = 18
  250.       Hint = '[PgUp] Forward'
  251.       Align = alClient
  252.       Center = True
  253.       ParentShowHint = False
  254.       Picture.Data = {<image004.bmp>}
  255.       ShowHint = True
  256.       OnMouseDown = Image2MouseDown
  257.       OnMouseUp = Image2MouseUp
  258.     end
  259.   end
  260.   object labelPosition: TEditNew
  261.     Left = 231
  262.     Top = 31
  263.     Width = 60
  264.     Height = 14
  265.     Hint = 'Double click to toggle time on/off'
  266.     TabStop = False
  267.     BorderStyle = bsNone
  268.     Color = clBlack
  269.     Font.Charset = DEFAULT_CHARSET
  270.     Font.Color = clWhite
  271.     Font.Height = -11
  272.     Font.Name = 'Arial'
  273.     Font.Style = [fsBold]
  274.     ParentFont = False
  275.     ParentShowHint = False
  276.     ReadOnly = True
  277.     ShowHint = True
  278.     TabOrder = 8
  279.     Text = '0001:01:001'
  280.     OnDblClick = labelPositionDblClick
  281.     OnKeyDown = labelPositionKeyDown
  282.     FocusColor = clBlack
  283.     FocusFontColor = clWhite
  284.     NoFocusColor = clBlack
  285.     NoFocusFontColor = clWhite
  286.   end
  287.   object panelHome: TPanel
  288.     Left = 93
  289.     Top = 6
  290.     Width = 25
  291.     Height = 20
  292.     Caption = 'panelForward'
  293.     Color = clBlack
  294.     TabOrder = 9
  295.     object iconHome: TImage
  296.       Left = 1
  297.       Top = 1
  298.       Width = 23
  299.       Height = 18
  300.       Hint = '[Home] Start of song'
  301.       Align = alClient
  302.       Center = True
  303.       ParentShowHint = False
  304.       Picture.Data = {<image005.bmp>}
  305.       ShowHint = True
  306.       OnClick = iconHomeClick
  307.       OnMouseDown = iconHomeMouseDown
  308.       OnMouseUp = iconHomeMouseUp
  309.     end
  310.   end
  311.   object panelEnd: TPanel
  312.     Left = 177
  313.     Top = 6
  314.     Width = 25
  315.     Height = 20
  316.     Caption = 'panelForward'
  317.     Color = clBlack
  318.     TabOrder = 10
  319.     object IconEnd: TImage
  320.       Left = 1
  321.       Top = 1
  322.       Width = 23
  323.       Height = 18
  324.       Hint = '[End] End of song'
  325.       Align = alClient
  326.       Center = True
  327.       ParentShowHint = False
  328.       Picture.Data = {<image006.bmp>}
  329.       ShowHint = True
  330.       OnClick = IconEndClick
  331.       OnMouseDown = IconEndMouseDown
  332.       OnMouseUp = IconEndMouseUp
  333.     end
  334.   end
  335.   object PopupMenu1: TPopupMenu
  336.     OnPopup = PopupMenu1Popup
  337.     Left = 328
  338.     Top = 200
  339.     object Showtime1: TMenuItem
  340.       Caption = 'Show time'
  341.       OnClick = Showtime1Click
  342.     end
  343.     object N1: TMenuItem
  344.       Caption = '-'
  345.     end
  346.     object Hide1: TMenuItem
  347.       Caption = 'Hide'
  348.       OnClick = Hide1Click
  349.     end
  350.   end
  351. end
  352.