home *** CD-ROM | disk | FTP | other *** search
/ Más de 2,500 Juegos / CD1.iso / ZIPDAT / 0696 / 0696.ZIP / AquaScap.exe / 0 / RCDATA / TMENUFORM / TMENUFORM.txt
Text File  |  1999-04-01  |  15KB  |  550 lines

  1. object MenuForm: TMenuForm
  2.   Left = 267
  3.   Top = 283
  4.   BorderStyle = bsNone
  5.   Caption = 'Menu'
  6.   ClientHeight = 0
  7.   ClientWidth = 707
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'Arial'
  12.   Font.Style = []
  13.   FormStyle = fsStayOnTop
  14.   Menu = MainMenu1
  15.   OnCreate = FormCreate
  16.   OnKeyDown = FormKeyDown
  17.   PixelsPerInch = 96
  18.   TextHeight = 14
  19.   object MainMenu1: TMainMenu
  20.     Left = 544
  21.     Top = 3
  22.     object F11: TMenuItem
  23.       Caption = 'F1 '
  24.     end
  25.     object File1: TMenuItem
  26.       Caption = 'File '
  27.       object TakeVirtualTour1: TMenuItem
  28.         Caption = 'Take Virtual Tour'
  29.         OnClick = TakeVirtualTour1Click
  30.       end
  31.       object RunFullConfiguration1: TMenuItem
  32.         Caption = 'Launch Control Center'
  33.         OnClick = RunFullConfiguration1Click
  34.       end
  35.       object SaveOptions1: TMenuItem
  36.         Caption = 'Save Options'
  37.         ShortCut = 113
  38.         OnClick = SaveOptions1Click
  39.       end
  40.       object N1: TMenuItem
  41.         Caption = '-'
  42.       end
  43.       object Exit1: TMenuItem
  44.         Caption = 'Exit'
  45.         ShortCut = 27
  46.         OnClick = Exit1Click
  47.       end
  48.     end
  49.     object Register1: TMenuItem
  50.       Caption = 'Order '
  51.       object ViewOrderInformation1: TMenuItem
  52.         Caption = 'Order Information'
  53.         OnClick = ViewOrderInformation1Click
  54.       end
  55.       object RegisterOnlineSecurely1: TMenuItem
  56.         Caption = 'Order Online (Secure)'
  57.         OnClick = RegisterOnlineSecurely1Click
  58.       end
  59.     end
  60.     object Tank1: TMenuItem
  61.       Caption = 'Tank '
  62.       object Small1: TMenuItem
  63.         Caption = 'Small'
  64.         GroupIndex = 1
  65.         RadioItem = True
  66.         ShortCut = 8241
  67.         OnClick = Small1Click
  68.       end
  69.       object Medium1: TMenuItem
  70.         Caption = 'Medium'
  71.         GroupIndex = 1
  72.         RadioItem = True
  73.         ShortCut = 8242
  74.         OnClick = Medium1Click
  75.       end
  76.       object Large1: TMenuItem
  77.         Caption = 'Large'
  78.         GroupIndex = 1
  79.         RadioItem = True
  80.         ShortCut = 8243
  81.         OnClick = Large1Click
  82.       end
  83.       object FullScreen1: TMenuItem
  84.         Caption = 'Full Screen'
  85.         GroupIndex = 1
  86.         RadioItem = True
  87.         ShortCut = 8244
  88.         OnClick = FullScreen1Click
  89.       end
  90.       object N2: TMenuItem
  91.         Caption = '-'
  92.         GroupIndex = 1
  93.       end
  94.       object Rectangular1: TMenuItem
  95.         Caption = 'Rectangular'
  96.         GroupIndex = 2
  97.         RadioItem = True
  98.         ShortCut = 116
  99.         OnClick = Rectangular1Click
  100.       end
  101.       object Circular2: TMenuItem
  102.         Caption = 'Circular'
  103.         GroupIndex = 2
  104.         RadioItem = True
  105.         ShortCut = 117
  106.         OnClick = Circular2Click
  107.       end
  108.     end
  109.     object WaterColor1: TMenuItem
  110.       Caption = 'Water '
  111.       object DarkBlue1: TMenuItem
  112.         Caption = 'Midnight Blue'
  113.         GroupIndex = 1
  114.         RadioItem = True
  115.         ShortCut = 8246
  116.         OnClick = DarkBlue1Click
  117.       end
  118.       object FullBlue1: TMenuItem
  119.         Caption = 'Full Blue'
  120.         GroupIndex = 1
  121.         RadioItem = True
  122.         ShortCut = 8247
  123.         OnClick = FullBlue1Click
  124.       end
  125.       object PondHaze1: TMenuItem
  126.         Caption = 'Pond Haze'
  127.         GroupIndex = 1
  128.         RadioItem = True
  129.         ShortCut = 8248
  130.         OnClick = PondHaze1Click
  131.       end
  132.       object SeaFoam1: TMenuItem
  133.         Caption = 'Sea Foam'
  134.         GroupIndex = 1
  135.         RadioItem = True
  136.         ShortCut = 8249
  137.         OnClick = SeaFoam1Click
  138.       end
  139.       object Toggleonoff1: TMenuItem
  140.         Caption = 'Black (none)'
  141.         GroupIndex = 1
  142.         RadioItem = True
  143.         ShortCut = 8240
  144.         OnClick = Toggleonoff1Click
  145.       end
  146.       object EnableWave1: TMenuItem
  147.         Caption = 'Wave Enabled'
  148.         GroupIndex = 1
  149.         ShortCut = 87
  150.         OnClick = EnableWave1Click
  151.       end
  152.     end
  153.     object Bubbles1: TMenuItem
  154.       Caption = 'Bubbles '
  155.       object Afew1: TMenuItem
  156.         Caption = 'A few'
  157.         GroupIndex = 1
  158.         RadioItem = True
  159.         OnClick = Afew1Click
  160.       end
  161.       object Anaverageamount1: TMenuItem
  162.         Caption = 'An average amount'
  163.         GroupIndex = 1
  164.         RadioItem = True
  165.         OnClick = Anaverageamount1Click
  166.       end
  167.       object Alot1: TMenuItem
  168.         Caption = 'A lot'
  169.         GroupIndex = 1
  170.         RadioItem = True
  171.         OnClick = Alot1Click
  172.       end
  173.       object Anabsurdamount1: TMenuItem
  174.         Caption = 'An absurd amount'
  175.         GroupIndex = 1
  176.         RadioItem = True
  177.         OnClick = Anabsurdamount1Click
  178.       end
  179.       object Cycletonextbubblelevel1: TMenuItem
  180.         Caption = 'Cycle to next bubble level'
  181.         GroupIndex = 1
  182.         ShortCut = 118
  183.         OnClick = Cycletonextbubblelevel1Click
  184.       end
  185.       object N3: TMenuItem
  186.         Caption = '-'
  187.         GroupIndex = 1
  188.       end
  189.       object ShowAirtubes1: TMenuItem
  190.         Caption = 'Airtubes Enabled'
  191.         GroupIndex = 1
  192.         ShortCut = 119
  193.         OnClick = ShowAirtubes1Click
  194.       end
  195.       object ShowTankBubbles1: TMenuItem
  196.         Caption = 'Tank Bubbles Enabled'
  197.         GroupIndex = 1
  198.         ShortCut = 120
  199.         OnClick = ShowTankBubbles1Click
  200.       end
  201.     end
  202.     object Gravel1: TMenuItem
  203.       Caption = 'Gravel '
  204.       object Green1: TMenuItem
  205.         Caption = 'Green'
  206.         GroupIndex = 1
  207.         RadioItem = True
  208.         ShortCut = 49
  209.         OnClick = Green1Click
  210.       end
  211.       object Red1: TMenuItem
  212.         Caption = 'Red'
  213.         GroupIndex = 1
  214.         RadioItem = True
  215.         ShortCut = 50
  216.         OnClick = Red1Click
  217.       end
  218.       object Beige1: TMenuItem
  219.         Caption = 'Beige'
  220.         GroupIndex = 1
  221.         RadioItem = True
  222.         ShortCut = 51
  223.         OnClick = Beige1Click
  224.       end
  225.       object Blue1: TMenuItem
  226.         Caption = 'Blue'
  227.         GroupIndex = 1
  228.         RadioItem = True
  229.         ShortCut = 52
  230.         OnClick = Blue1Click
  231.       end
  232.       object Purple1: TMenuItem
  233.         Caption = 'Purple'
  234.         GroupIndex = 1
  235.         RadioItem = True
  236.         ShortCut = 53
  237.         OnClick = Purple1Click
  238.       end
  239.       object RandomMulticolored1: TMenuItem
  240.         Caption = 'Random multi-colored'
  241.         GroupIndex = 1
  242.         RadioItem = True
  243.         ShortCut = 54
  244.         OnClick = RandomMulticolored1Click
  245.       end
  246.       object None1: TMenuItem
  247.         Caption = 'None'
  248.         GroupIndex = 1
  249.         RadioItem = True
  250.         ShortCut = 192
  251.         OnClick = None1Click
  252.       end
  253.     end
  254.     object Decor1: TMenuItem
  255.       Caption = 'Decor '
  256.       object Darkwood1: TMenuItem
  257.         Caption = 'Dark Wood'
  258.         GroupIndex = 1
  259.         RadioItem = True
  260.         OnClick = Darkwood1Click
  261.       end
  262.       object Lightwood1: TMenuItem
  263.         Caption = 'Maple'
  264.         GroupIndex = 1
  265.         RadioItem = True
  266.         OnClick = Lightwood1Click
  267.       end
  268.       object Oak1: TMenuItem
  269.         Caption = 'Oak'
  270.         GroupIndex = 1
  271.         RadioItem = True
  272.         OnClick = Oak1Click
  273.       end
  274.       object Marble2: TMenuItem
  275.         Caption = 'Marble'
  276.         GroupIndex = 1
  277.         RadioItem = True
  278.         OnClick = Marble2Click
  279.       end
  280.       object Marble21: TMenuItem
  281.         Caption = 'Smooth Marble'
  282.         GroupIndex = 1
  283.         RadioItem = True
  284.         OnClick = Marble21Click
  285.       end
  286.       object Granite1: TMenuItem
  287.         Caption = 'Granite'
  288.         GroupIndex = 1
  289.         RadioItem = True
  290.         OnClick = Granite1Click
  291.       end
  292.       object Fire1: TMenuItem
  293.         Caption = 'Fire'
  294.         GroupIndex = 1
  295.         RadioItem = True
  296.         OnClick = Fire1Click
  297.       end
  298.       object Electric1: TMenuItem
  299.         Caption = 'Electric'
  300.         GroupIndex = 1
  301.         RadioItem = True
  302.         OnClick = Electric1Click
  303.       end
  304.       object Globe1: TMenuItem
  305.         Caption = 'Globe'
  306.         GroupIndex = 1
  307.         RadioItem = True
  308.         OnClick = Globe1Click
  309.       end
  310.       object None2: TMenuItem
  311.         Caption = 'None'
  312.         GroupIndex = 1
  313.         RadioItem = True
  314.         ShortCut = 48
  315.         OnClick = None2Click
  316.       end
  317.       object CycletonextDecor1: TMenuItem
  318.         Caption = 'Cycle to next Decor'
  319.         GroupIndex = 1
  320.         ShortCut = 115
  321.         OnClick = CycletonextDecor1Click
  322.       end
  323.     end
  324.     object Plants1: