home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 23 / IOPROG_23.ISO / SOFT / DELPHIX.ZIP / Source / DXFFBEdit.dfm / DXFFBEdit.txt
Encoding:
Text File  |  1998-10-06  |  11.5 KB  |  522 lines

  1. object DelphiXFFEditForm: TDelphiXFFEditForm
  2.   Left = 198
  3.   Top = 110
  4.   BorderStyle = bsDialog
  5.   Caption = 'Effect Editor'
  6.   ClientHeight = 413
  7.   ClientWidth = 527
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -12
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   PopupMenu = PopupMenu
  14.   Position = poScreenCenter
  15.   Scaled = False
  16.   OnCreate = FormCreate
  17.   OnShow = FormShow
  18.   PixelsPerInch = 96
  19.   TextHeight = 12
  20.   object ListGroupBox: TGroupBox
  21.     Left = 8
  22.     Top = 8
  23.     Width = 193
  24.     Height = 369
  25.     Caption = 'Effect list'
  26.     TabOrder = 2
  27.     object AddButton: TButton
  28.       Left = 8
  29.       Top = 306
  30.       Width = 86
  31.       Height = 25
  32.       Caption = '&Add'
  33.       TabOrder = 1
  34.       OnClick = AddButtonClick
  35.     end
  36.     object DelButton: TButton
  37.       Left = 99
  38.       Top = 306
  39.       Width = 86
  40.       Height = 25
  41.       Caption = '&Delete'
  42.       TabOrder = 2
  43.       OnClick = DelButtonClick
  44.     end
  45.     object AddFromFileButton: TButton
  46.       Left = 8
  47.       Top = 335
  48.       Width = 177
  49.       Height = 25
  50.       Caption = '&Load from File'
  51.       TabOrder = 3
  52.       OnClick = AddFromFileButtonClick
  53.     end
  54.     object EffectView: TTreeView
  55.       Left = 8
  56.       Top = 16
  57.       Width = 177
  58.       Height = 284
  59.       DragMode = dmAutomatic
  60.       HideSelection = False
  61.       Indent = 19
  62.       OnEdited = EffectViewEdited
  63.       OnChange = EffectViewChange
  64.       TabOrder = 0
  65.       OnDragDrop = EffectViewDragDrop
  66.       OnDragOver = EffectViewDragOver
  67.     end
  68.   end
  69.   object EditGroupBox: TGroupBox
  70.     Left = 208
  71.     Top = 16
  72.     Width = 313
  73.     Height = 361
  74.     Caption = 'Editor'
  75.     TabOrder = 3
  76.     object EffectTypeLabel: TLabel
  77.       Left = 16
  78.       Top = 67
  79.       Width = 41
  80.       Height = 12
  81.       Caption = '&Time'
  82.       FocusControl = EffectTypeBox
  83.     end
  84.     object ConstantLabel: TLabel
  85.       Left = 16
  86.       Top = 249
  87.       Width = 64
  88.       Height = 12
  89.       Caption = '&Constant:'
  90.       FocusControl = ConstantXEdit
  91.     end
  92.     object ConstantXLabel: TLabel
  93.       Left = 96
  94.       Top = 249
  95.       Width = 7
  96.       Height = 12
  97.       Caption = 'X'
  98.     end
  99.     object ConstantYLabel: TLabel
  100.       Left = 192
  101.       Top = 249
  102.       Width = 7
  103.       Height = 12
  104.       Caption = 'Y'
  105.     end
  106.     object FadeTimeLabel: TLabel
  107.       Left = 80
  108.       Top = 199
  109.       Width = 27
  110.       Height = 12
  111.       Caption = 'Time:'
  112.     end
  113.     object PeriodLabel: TLabel
  114.       Left = 16
  115.       Top = 275
  116.       Width = 49
  117.       Height = 12
  118.       Caption = '&Period:'
  119.       FocusControl = PeriodEdit
  120.     end
  121.     object PeriodLabel2: TLabel
  122.       Left = 190
  123.       Top = 275
  124.       Width = 29
  125.       Height = 12
  126.       Caption = 'ms'
  127.     end
  128.     object PowerLabel: TLabel
  129.       Left = 16
  130.       Top = 123
  131.       Width = 38
  132.       Height = 12
  133.       Caption = '&Power:'
  134.     end
  135.     object TimeLabel: TLabel
  136.       Left = 16
  137.       Top = 99
  138.       Width = 41
  139.       Height = 12
  140.       Caption = '&Time:'
  141.     end
  142.     object TimeLabel2: TLabel
  143.       Left = 190
  144.       Top = 99
  145.       Width = 29
  146.       Height = 12
  147.       Caption = 'ms'
  148.     end
  149.     object AttackTimeEditLabel: TLabel
  150.       Left = 80
  151.       Top = 149
  152.       Width = 27
  153.       Height = 12
  154.       Caption = 'Time:'
  155.       FocusControl = AttackTimeEdit
  156.     end
  157.     object NameEditLabel: TLabel
  158.       Left = 16
  159.       Top = 20
  160.       Width = 42
  161.       Height = 12
  162.       Caption = '&Name'
  163.       FocusControl = NameEdit
  164.     end
  165.     object Bevel1: TBevel
  166.       Left = 16
  167.       Top = 44
  168.       Width = 281
  169.       Height = 2
  170.     end
  171.     object Bevel2: TBevel
  172.       Left = 16
  173.       Top = 320
  174.       Width = 281
  175.       Height = 2
  176.     end
  177.     object ConditionLabel: TLabel
  178.       Left = 16
  179.       Top = 299
  180.       Width = 66
  181.       Height = 12
  182.       Caption = 'Con&dition:'
  183.       FocusControl = ConditionXEdit
  184.     end
  185.     object ConditionXLabel: TLabel
  186.       Left = 96
  187.       Top = 299
  188.       Width = 7
  189.       Height = 12
  190.       Caption = 'X'
  191.     end
  192.     object ConditionYLabel: TLabel
  193.       Left = 192
  194.       Top = 297
  195.       Width = 7
  196.       Height = 12
  197.       Caption = 'Y'
  198.     end
  199.     object Label1: TLabel
  200.       Left = 80
  201.       Top = 173
  202.       Width = 29
  203.       Height = 12
  204.       Caption = 'Level:'
  205.       FocusControl = AttackLevelEdit
  206.     end
  207.     object Label2: TLabel
  208.       Left = 80
  209.       Top = 223
  210.       Width = 29
  211.       Height = 12
  212.       Caption = 'Level:'
  213.       FocusControl = FadeLevelEdit
  214.     end
  215.     object Label3: TLabel
  216.       Left = 16
  217.       Top = 149
  218.       Width = 52
  219.       Height = 12
  220.       Caption = '&Attack:'
  221.       FocusControl = AttackTimeEdit
  222.     end
  223.     object Label4: TLabel
  224.       Left = 16
  225.       Top = 199
  226.       Width = 42
  227.       Height = 12
  228.       Caption = '&Fade:'
  229.       FocusControl = FadeTimeEdit
  230.     end
  231.     object Label5: TLabel
  232.       Left = 190
  233.       Top = 150
  234.       Width = 29
  235.       Height = 12
  236.       Caption = 'ms'
  237.     end
  238.     object Label6: TLabel
  239.       Left = 190
  240.       Top = 198
  241.       Width = 29
  242.       Height = 12
  243.       Caption = 'ms'
  244.     end
  245.     object EffectTypeBox: TComboBox
  246.       Left = 72
  247.       Top = 64
  248.       Width = 225
  249.       Height = 20
  250.       Style = csDropDownList
  251.       ItemHeight = 12
  252.       TabOrder = 1
  253.       OnChange = ChangeEvent
  254.     end
  255.     object ConstantYEdit: TSpinEdit
  256.       Left = 208
  257.       Top = 245
  258.       Width = 73
  259.       Height = 21
  260.       MaxValue = 10000
  261.       MinValue = -10000
  262.       TabOrder = 9
  263.       Value = 0
  264.       OnChange = ChangeEvent
  265.     end
  266.     object ConstantXEdit: TSpinEdit
  267.       Left = 112
  268.       Top = 245
  269.       Width = 73
  270.       Height = 21
  271.       MaxValue = 10000
  272.       MinValue = -10000
  273.       TabOrder = 8
  274.       Value = 0
  275.       OnChange = ChangeEvent
  276.     end
  277.     object FadeTimeEdit: TSpinEdit
  278.       Left = 112
  279.       Top = 194
  280.       Width = 73
  281.       Height = 21
  282.       MaxValue = 1000000
  283.       MinValue = 0
  284.       TabOrder = 6
  285.       Value = 0
  286.       OnChange = ChangeEvent
  287.     end
  288.     object PeriodEdit: TSpinEdit
  289.       Left = 112
  290.       Top = 270
  291.       Width = 73
  292.       Height = 21
  293.       MaxValue = 1000000
  294.       MinValue = 0
  295.       TabOrder = 10
  296.       Value = 0
  297.       OnChange = ChangeEvent
  298.     end
  299.     object TimeEdit: TSpinEdit
  300.       Left = 112
  301.       Top = 94
  302.       Width = 73
  303.       Height = 21
  304.       MaxValue = 1000000
  305.       MinValue = -1
  306.       TabOrder = 3
  307.       Value = 0
  308.       OnChange = ChangeEvent
  309.     end
  310.     object AttackTimeEdit: TSpinEdit
  311.       Left = 112
  312.       Top = 145
  313.       Width = 73
  314.       Height = 21
  315.       MaxValue = 1000000
  316.       MinValue = 0
  317.       TabOrder = 4
  318.       Value = 0
  319.       OnChange = ChangeEvent
  320.     end
  321.     object RunButton: TButton
  322.       Left = 16
  323.       Top = 328
  324.       Width = 81
  325.       Height = 25
  326.       Caption = '&Run'
  327.       TabOrder = 13
  328.       OnClick = RunButtonClick
  329.     end
  330.     object RunGroupButton: TButton
  331.       Left = 104
  332.       Top = 328
  333.       Width = 105
  334.       Height = 25
  335.       Caption = 'Run &group'
  336.       TabOrder = 14
  337.       OnClick = RunGroupButtonClick
  338.     end
  339.     object NameEdit: TEdit
  340.       Left = 72
  341.       Top = 17
  342.       Width = 225
  343.       Height = 20
  344.       TabOrder = 0
  345.       OnChange = NameEditChange
  346.     end
  347.     object StopButton: TButton
  348.       Left = 216
  349.       Top = 328
  350.       Width = 81
  351.       Height = 25
  352.       Caption = '&Stop'
  353.       TabOrder = 15
  354.       OnClick = StopButtonClick
  355.     end
  356.     object PowerEdit: TSpinEdit
  357.       Left = 112
  358.       Top = 118
  359.       Width = 73
  360.       Height = 21
  361.       MaxValue = 10000
  362.       MinValue = 0
  363.       TabOrder = 2
  364.       Value = 0
  365.       OnChange = ChangeEvent
  366.     end
  367.     object ConditionXEdit: TSpinEdit
  368.       Left = 112
  369.       Top = 295
  370.       Width = 73
  371.       Height = 21
  372.       MaxValue = 10000
  373.       MinValue = -10000
  374.       TabOrder = 11
  375.       Value = 0
  376.       OnChange = ChangeEvent
  377.     end
  378.     object ConditionYEdit: TSpinEdit
  379.       Left = 208
  380.       Top = 295
  381.       Width = 73
  382.       Height = 21
  383.       MaxValue = 10000
  384.       MinValue = -10000
  385.       TabOrder = 12
  386.       Value = 0
  387.       OnChange = ChangeEvent
  388.     end
  389.     object AttackLevelEdit: TSpinEdit
  390.       Left = 112
  391.       Top = 169
  392.       Width = 73
  393.       Height = 21
  394.       MaxValue = 10000
  395.       MinValue = 0
  396.       TabOrder = 5
  397.       Value = 0
  398.       OnChange = ChangeEvent
  399.     end
  400.     object FadeLevelEdit: TSpinEdit
  401.       Left = 112
  402.       Top = 218
  403.       Width = 73
  404.       Height = 21
  405.       MaxValue = 10000
  406.       MinValue = 0
  407.       TabOrder = 7
  408.       Value = 0
  409.       OnChange = ChangeEvent
  410.     end
  411.   end
  412.   object OKButton: TButton
  413.     Left = 352
  414.     Top = 384
  415.     Width = 81
  416.     Height = 25
  417.     Caption = 'OK'
  418.     TabOrder = 0
  419.     OnClick = OKButtonClick
  420.   end
  421.   object CancelButton: TButton
  422.     Left = 440
  423.     Top = 384
  424.     Width = 81
  425.     Height = 25
  426.     Cancel = True
  427.     Caption = 'Cancel'
  428.     TabOrder = 1
  429.     OnClick = CancelButtonClick
  430.   end
  431.   object DXInput: TDXInput
  432.     ActiveOnly = True
  433.     Joystick.Effects.Effects = {
  434.       FF0A0044454C50484958464F524345464545444241434B454646454354003010
  435.       6C000000545046301D54466F726365466565646261636B456666656374436F6D
  436.       706F6E656E740007456666656374730E01044E616D650607456666656374730A
  437.       45666665637454797065070665744E6F6E6506506572696F64023205506F7765
  438.       720310270454696D6503E80300000000}
  439.     Joystick.Enabled = False
  440.     Joystick.ForceFeedback = True
  441.     Joystick.AutoCenter = True
  442.     Joystick.DeadZoneX = 50
  443.     Joystick.DeadZoneY = 50
  444.     Joystick.DeadZoneZ = 50
  445.     Joystick.ID = 0
  446.     Joystick.RangeX = 1000
  447.     Joystick.RangeY = 1000
  448.     Joystick.RangeZ = 1000
  449.     Keyboard.Effects.Effects = {
  450.       FF0A0044454C50484958464F524345464545444241434B454646454354003010
  451.       6C000000545046301D54466F726365466565646261636B456666656374436F6D
  452.       706F6E656E740007456666656374730E01044E616D650607456666656374730A
  453.       45666665637454797065070665744E6F6E6506506572696F64023205506F7765
  454.       720310270454696D6503E80300000000}
  455.     Keyboard.Enabled = False
  456.     Keyboard.ForceFeedback = False
  457.     Keyboard.Assigns = {
  458.       4B00000026000000680000004A00000028000000620000004800000025000000
  459.       640000004C00000027000000660000005A000000200000000000000058000000
  460.       0D00000000000000000000000000000000000000000000000000000000000000
  461.       0000000000000000000000000000000000000000000000000000000000000000
  462.       0000000000000000000000000000000071000000000000000000000000000000
  463.       0000000000000000000000000000000000000000000000000000000000000000
  464.       0000000000000000000000000000000000000000000000000000000000000000
  465.       0000000000000000000000000000000000000000000000000000000000000000
  466.       0000000000000000000000000000000000000000000000000000000000000000
  467.       0000000000000000000000000000000000000000000000000000000000000000
  468.       0000000000000000000000000000000000000000000000000000000000000000
  469.       0000000000000000000000000000000000000000000000000000000000000000
  470.       0000000000000000000000000000000000000000000000000000000000000000
  471.       00000000000000000000000000000000}
  472.     UseDirectInput = False
  473.     Left = 24
  474.     Top = 32
  475.   end
  476.   object PopupMenu: TPopupMenu
  477.     Left = 88
  478.     Top = 88
  479.     object A1: TMenuItem
  480.       Caption = '&Add'
  481.       ShortCut = 16449
  482.       OnClick = AddButtonClick
  483.     end
  484.     object DeleteEffectItem: TMenuItem
  485.       Caption = '&Delete'
  486.       ShortCut = 46
  487.       OnClick = DelButtonClick
  488.     end
  489.     object N1: TMenuItem
  490.       Caption = '-'
  491.     end
  492.     object N2: TMenuItem
  493.       Caption = '&Load from File'
  494.       OnClick = AddFromFileButtonClick
  495.     end
  496.     object SaveToFileItem: TMenuItem
  497.       Caption = '&Save from File'
  498.       OnClick = SaveToFileItemClick
  499.     end
  500.   end
  501.   object Timer: TTimer
  502.     Interval = 50
  503.     OnTimer = TimerTimer
  504.     Left = 72
  505.     Top = 32
  506.   end
  507.   object OpenDialog: TOpenDialog
  508.     DefaultExt = 'ffe'
  509.     Filter = 'Effect file(*.ffe)|*.ffe'
  510.     Options = [ofAllowMultiSelect, ofPathMustExist, ofFileMustExist]
  511.     Left = 32
  512.     Top = 88
  513.   end
  514.   object SaveDialog: TSaveDialog
  515.     DefaultExt = 'ffe'
  516.     Filter = 'Effect file(*.ffe)|*.ffe'
  517.     Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist]
  518.     Left = 32
  519.     Top = 120
  520.   end
  521. end
  522.