home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 July & August / Pcwk78a98.iso / Sharewar / STELLA / _SETUP.1 / Stella.exe / 0 / RCDATA / TMAINFORM / TMAINFORM.txt
Text File  |  1998-01-06  |  24KB  |  906 lines

  1. object MainForm: TMainForm
  2.   Left = 0
  3.   Top = 117
  4.   Width = 264
  5.   Height = 119
  6.   Caption = 'Coeli - Stella 2000'
  7.   Color = 4194304
  8.   Font.Color = clWindowText
  9.   Font.Height = -14
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   Menu = MainMenu1
  13.   Scaled = False
  14.   OnActivate = FormActivate
  15.   OnClose = FormClose
  16.   OnCreate = FormCreate
  17.   OnDestroy = FormDestroy
  18.   OnShow = FormShow
  19.   PixelsPerInch = 125
  20.   TextHeight = 16
  21.   object JPEGImage1: TJPEGImage
  22.     Left = 0
  23.     Top = 0
  24.     Width = 256
  25.     Height = 40
  26.     Align = alClient
  27.     Stretch = True
  28.     NumOfColors = _256
  29.     DCTMethod = Integ
  30.     Dither = FS
  31.     FastProcessing = False
  32.     GrayScale = False
  33.     NoSmooth = False
  34.     OnePass = True
  35.     ProgressStep = 10
  36.   end
  37.   object MainMenu1: TMainMenu
  38.     Left = 8
  39.     Top = 4
  40.     object File1: TMenuItem
  41.       Caption = '&File'
  42.       ShortCut = 0
  43.       object N6: TMenuItem
  44.         Caption = '-'
  45.         ShortCut = 0
  46.       end
  47.       object ObservingLogs1: TMenuItem
  48.         Caption = '--- Observing Log ---'
  49.         ShortCut = 16463
  50.         OnClick = ObservingLogs1Click
  51.       end
  52.       object N5: TMenuItem
  53.         Caption = '-'
  54.         ShortCut = 0
  55.       end
  56.       object PrintSky1: TMenuItem
  57.         Caption = '&Print Sky'
  58.         ShortCut = 120
  59.         OnClick = PrintSky1Click
  60.       end
  61.       object PrinterSetup1: TMenuItem
  62.         Caption = 'Printer Setup'
  63.         ShortCut = 8312
  64.         OnClick = PrinterSetup1Click
  65.       end
  66.       object N3: TMenuItem
  67.         Caption = '-'
  68.         ShortCut = 0
  69.       end
  70.       object Preferences: TMenuItem
  71.         Caption = '&Preferences...'
  72.         ShortCut = 0
  73.         object PreferencesStore1: TMenuItem
  74.           Caption = '&Store'
  75.           ShortCut = 118
  76.           OnClick = PreferencesStore1Click
  77.         end
  78.         object PreferencesRestore1: TMenuItem
  79.           Caption = '&Restore'
  80.           ShortCut = 8310
  81.           OnClick = PreferencesRestore1Click
  82.         end
  83.       end
  84.       object N4: TMenuItem
  85.         Caption = '-'
  86.         ShortCut = 0
  87.       end
  88.       object Quit1: TMenuItem
  89.         Caption = '&Quit'
  90.         ShortCut = 0
  91.         OnClick = Quit1Click
  92.       end
  93.     end
  94.     object Set1: TMenuItem
  95.       Caption = '&View'
  96.       ShortCut = 0
  97.       object Sky1: TMenuItem
  98.         Caption = 'Sky'
  99.         ShortCut = 0
  100.         OnClick = Sky1Click
  101.       end
  102.       object FullScreen1: TMenuItem
  103.         Caption = 'Full Screen'
  104.         ShortCut = 16467
  105.         OnClick = FullScreen1Click
  106.       end
  107.       object N1: TMenuItem
  108.         Caption = '-'
  109.         ShortCut = 0
  110.       end
  111.       object LiveEphem1: TMenuItem
  112.         Caption = 'Live Ephem'
  113.         ShortCut = 16460
  114.         OnClick = LiveEphem1Click
  115.       end
  116.     end
  117.     object Options1: TMenuItem
  118.       Caption = '&Options'
  119.       ShortCut = 0
  120.       object PlotStars1: TMenuItem
  121.         Caption = 'Redraw &Sky'
  122.         ShortCut = 123
  123.         OnClick = PlotStars1Click
  124.       end
  125.       object RefreshStars1: TMenuItem
  126.         Caption = '&Refresh Sky'
  127.         ShortCut = 0
  128.         OnClick = RefreshStars1Click
  129.       end
  130.       object N7: TMenuItem
  131.         Caption = '-'
  132.         ShortCut = 0
  133.       end
  134.       object Field1: TMenuItem
  135.         Caption = 'Field'
  136.         ShortCut = 0
  137.         object Centre1: TMenuItem
  138.           Caption = '&Centre'
  139.           ShortCut = 0
  140.           OnClick = Centre1Click
  141.         end
  142.         object Zoom1: TMenuItem
  143.           Caption = '&Zoom'
  144.           ShortCut = 0
  145.           OnClick = Zoom1Click
  146.         end
  147.         object Unzoom1: TMenuItem
  148.           Caption = '&Unzoom'
  149.           ShortCut = 0
  150.           OnClick = Unzoom1Click
  151.         end
  152.         object Reset1: TMenuItem
  153.           Caption = '&Reset'
  154.           ShortCut = 0
  155.           OnClick = Reset1Click
  156.         end
  157.       end
  158.       object Viewpoint1: TMenuItem
  159.         Caption = 'Viewpoint'
  160.         ShortCut = 0
  161.         object Direction1: TMenuItem
  162.           Caption = '&Direction'
  163.           ShortCut = 0
  164.           object North1: TMenuItem
  165.             Caption = '&North'
  166.             ShortCut = 0
  167.             OnClick = North1Click
  168.           end
  169.           object South1: TMenuItem
  170.             Caption = '&South'
  171.             ShortCut = 0
  172.             OnClick = South1Click
  173.           end
  174.           object East1: TMenuItem
  175.             Caption = '&East'
  176.             ShortCut = 0
  177.             OnClick = East1Click
  178.           end
  179.           object West1: TMenuItem
  180.             Caption = '&West'
  181.             ShortCut = 0
  182.             OnClick = West1Click
  183.           end
  184.           object Set4: TMenuItem
  185.             Caption = 'Se&t'
  186.             ShortCut = 16452
  187.             OnClick = Set4Click
  188.           end
  189.         end
  190.         object Elevation1: TMenuItem
  191.           Caption = '&Elevation'
  192.           ShortCut = 0
  193.           object Horizon1: TMenuItem
  194.             Caption = '&Horizon'
  195.             ShortCut = 16456
  196.             OnClick = Horizon1Click
  197.           end
  198.           object Zenith1: TMenuItem
  199.             Caption = '&Zenith'
  200.             ShortCut = 16470
  201.             OnClick = Zenith1Click
  202.           end
  203.           object Intermediate1: TMenuItem
  204.             Caption = '&Intermediate'
  205.             ShortCut = 16457
  206.             OnClick = Intermediate1Click
  207.           end
  208.           object Set3: TMenuItem
  209.             Caption = '&Set'
  210.             ShortCut = 16453
  211.             OnClick = Set3Click
  212.           end
  213.         end
  214.         object Projection1: TMenuItem
  215.           Caption = '&Projection'
  216.           ShortCut = 0
  217.           object Equidistant1: TMenuItem
  218.             Caption = 'Equi&distant'
  219.             ShortCut = 113
  220.             OnClick = Equidistant1Click
  221.           end
  222.           object EqualArea1: TMenuItem
  223.             Caption = 'Equal &Area'
  224.             ShortCut = 114
  225.             OnClick = EqualArea1Click
  226.           end
  227.           object Stereographic1: TMenuItem
  228.             Caption = '&Stereographic'
  229.             ShortCut = 115
  230.             OnClick = Stereographic1Click
  231.           end
  232.           object Orthographic1: TMenuItem
  233.             Caption = '&Orthographic'
  234.             ShortCut = 116
  235.             OnClick = Orthographic1Click
  236.           end
  237.           object N8: TMenuItem
  238.             Caption = '-'
  239.             ShortCut = 0
  240.           end
  241.           object Centeronstar1: TMenuItem
  242.             Caption = '&Center on star'
  243.             ShortCut = 16451
  244.             OnClick = Centeronstar1Click
  245.           end
  246.           object Autocenter1: TMenuItem
  247.             Caption = '&Auto-center'
  248.             ShortCut = 16449
  249.             OnClick = Autocenter1Click
  250.           end
  251.         end
  252.         object Location1: TMenuItem
  253.           Caption = '&Location'
  254.           ShortCut = 0
  255.           object WorldMap1: TMenuItem
  256.             Caption = '&World Map'
  257.             ShortCut = 0
  258.             OnClick = WorldMap1Click
  259.           end
  260.           object Set2: TMenuItem
  261.             Caption = '&Set'
  262.             ShortCut = 0
  263.             OnClick = Set2Click
  264.           end
  265.           object Database1: TMenuItem
  266.             Caption = '&Database'
  267.             Enabled = False
  268.             ShortCut = 0
  269.           end
  270.         end
  271.       end
  272.       object Clock1: TMenuItem
  273.         Caption = 'Clock'
  274.         ShortCut = 0
  275.         object Running1: TMenuItem
  276.           Caption = '&Running'
  277.           ShortCut = 0
  278.           OnClick = Running1Click
  279.         end
  280.         object Stopped1: TMenuItem
  281.           Caption = '&Stopped'
  282.           ShortCut = 0
  283.           OnClick = Stopped1Click
  284.         end
  285.         object Bar1: TMenuItem
  286.           Caption = '&Bar'
  287.           ShortCut = 0
  288.           OnClick = Bar1Click
  289.         end
  290.         object N9: TMenuItem
  291.           Caption = '-'
  292.           ShortCut = 0
  293.         end
  294.         object Forward1: TMenuItem
  295.           Caption = '&Forward'
  296.           ShortCut = 0
  297.           object Minute2: TMenuItem
  298.             Caption = '&Minute'
  299.             ShortCut = 0
  300.             OnClick = Minute2Click
  301.           end
  302.           object Hour2: TMenuItem
  303.             Caption = '&Hour'
  304.             ShortCut = 0
  305.             OnClick = Hour2Click
  306.           end
  307.           object Day2: TMenuItem
  308.             Caption = '&Day'
  309.             ShortCut = 0
  310.             OnClick = Day2Click
  311.           end
  312.           object Month2: TMenuItem
  313.             Caption = 'Mo&nth'
  314.             ShortCut = 0
  315.             OnClick = Month2Click
  316.           end
  317.           object Year2: TMenuItem
  318.             Caption = '&Year'
  319.             ShortCut = 0
  320.             OnClick = Year2Click
  321.           end
  322.         end
  323.         object Back1: TMenuItem
  324.           Caption = '&Back'
  325.           ShortCut = 0
  326.           object Minute1: TMenuItem
  327.             Caption = '&Minute'
  328.             ShortCut = 0
  329.             OnClick = Minute1Click
  330.           end
  331.           object Hour1: TMenuItem
  332.             Caption = '&Hour'
  333.             ShortCut = 0
  334.           end
  335.           object Day1: TMenuItem
  336.             Caption = '&Day'
  337.             ShortCut = 0
  338.           end
  339.           object Month1: TMenuItem
  340.             Caption = 'Mo&nth'
  341.             ShortCut = 0
  342.           end
  343.           object Year1: TMenuItem
  344.             Caption = '&Year'
  345.             ShortCut = 0
  346.           end
  347.         end
  348.         object Reset2: TMenuItem
  349.           Caption = 'R&eset'
  350.           ShortCut = 0
  351.           OnClick = Reset2Click
  352.         end
  353.         object Set5: TMenuItem
  354.           Caption = 'Se&t'
  355.           ShortCut = 0
  356.           OnClick = Set5Click
  357.         end
  358.       end
  359.       object Find1: TMenuItem
  360.         Caption = 'Find'
  361.         ShortCut = 0
  362.         OnClick = Find1Click
  363.       end
  364.       object N10: TMenuItem
  365.         Caption = '-'
  366.         ShortCut = 0
  367.       end
  368.       object Data1: TMenuItem
  369.         Caption = '&Data'
  370.         ShortCut = 0
  371.         object Panel1: TMenuItem
  372.           Caption = '&Panel'
  373.           Enabled = False
  374.           ShortCut = 0
  375.         end
  376.         object Report1: TMenuItem
  377.           Caption = '&Report'
  378.           ShortCut = 0
  379.           OnClick = Report1Click
  380.         end
  381.         object Readout1: TMenuItem
  382.           Caption = 'Read&out'
  383.           Enabled = False
  384.           ShortCut = 0
  385.         end
  386.       end
  387.       object Lines1: TMenuItem
  388.         Caption = 'Lines'
  389.         ShortCut = 0
  390.         object Horizon2: TMenuItem
  391.           Caption = '&Horizon'
  392.           ShortCut = 0
  393.           object Setonoff5: TMenuItem
  394.             Caption = '&Set on/off'
  395.             ShortCut = 0
  396.             OnClick = Setonoff5Click
  397.           end
  398.           object Legend1: TMenuItem
  399.             Caption = '&Legend'
  400.             ShortCut = 0
  401.             OnClick = Legend1Click
  402.           end
  403.           object Colour5: TMenuItem
  404.             Caption = '&Colour'
  405.             ShortCut = 0
  406.             OnClick = Colour5Click
  407.           end
  408.         end
  409.         object Aequator1: TMenuItem
  410.           Caption = '&Aequator'
  411.           ShortCut = 0
  412.           object Setonoff4: TMenuItem
  413.             Caption = '&Set on/off'
  414.             ShortCut = 0
  415.             OnClick = Setonoff4Click
  416.           end
  417.           object Colour4: TMenuItem
  418.             Caption = '&Colour'
  419.             ShortCut = 0
  420.             OnClick = Colour4Click
  421.           end
  422.         end
  423.         object Ecliptic1: TMenuItem
  424.           Caption = '&Ecliptic'
  425.           ShortCut = 0
  426.           object Setonoff3: TMenuItem
  427.             Caption = '&Set on/off'
  428.             ShortCut = 0
  429.             OnClick = Setonoff3Click
  430.           end
  431.           object Colour3: TMenuItem
  432.             Caption = '&Colour'
  433.             ShortCut = 0
  434.             OnClick = Colour3Click
  435.           end
  436.         end
  437.         object Constel1: TMenuItem
  438.           Caption = '&Constel'
  439.           ShortCut = 0
  440.           object Setonoff2: TMenuItem
  441.             Caption = '&Set on/off'
  442.             ShortCut = 0
  443.             OnClick = Setonoff2Click
  444.           end
  445.           object Boundaries1: TMenuItem
  446.             Caption = '&Boundaries'
  447.             ShortCut = 0
  448.             object Setonoff1: TMenuItem
  449.               Caption = '&Set on/off'
  450.               ShortCut = 16450
  451.               OnClick = Setonoff1Click
  452.             end
  453.             object Colour2: TMenuItem
  454.               Caption = '&Colour'
  455.               ShortCut = 0
  456.               OnClick = Colour2Click
  457.             end
  458.           end
  459.           object Names1: TMenuItem
  460.             Caption = '&Names'
  461.             ShortCut = 0
  462.             OnClick = Names1Click
  463.           end
  464.           object Colour1: TMenuItem
  465.             Caption = '&Colour'
  466.             ShortCut = 0
  467.             OnClick = Colour1Click
  468.           end
  469.         end
  470.       end
  471.       object Grids1: TMenuItem
  472.         Caption = 'Grids'
  473.         ShortCut = 0
  474.         object EquatorialRADec1: TMenuItem
  475.           Caption = '&Equatorial  RA/Dec'
  476.           ShortCut = 0
  477.           object Setonoff8: TMenuItem
  478.             Caption = '&Set on/off'
  479.             ShortCut = 0
  480.             OnClick = Setonoff8Click
  481.           end
  482.           object Colour7: TMenuItem
  483.             Caption = '&Colour'
  484.             ShortCut = 0
  485.             OnClick = Colour7Click
  486.           end
  487.         end
  488.         object HorizonAltAz1: TMenuItem
  489.           Caption = '&Horizon  Alt/Az'
  490.           ShortCut = 0
  491.           object Setonoff7: TMenuItem
  492.             Caption = '&Set on/off'
  493.             ShortCut = 0
  494.             OnClick = Setonoff7Click
  495.           end
  496.           object Colour6: TMenuItem
  497.             Caption = '&Colour'
  498.             ShortCut = 0
  499.             OnClick = Colour6Click
  500.           end
  501.         end
  502.         object Eclipticlambdabeta1: TMenuItem
  503.           Caption = '&Ecliptic  lambda/beta'
  504.           Enabled = False
  505.           ShortCut = 0
  506.           object Draw1: TMenuItem
  507.             Caption = '&Draw'
  508.             ShortCut = 0
  509.           end
  510.           object Setonoff6: TMenuItem
  511.             Caption = '&Set on/off'
  512.             ShortCut = 0
  513.           end
  514.         end
  515.       end
  516.       object Objects1: TMenuItem
  517.         Caption = 'Objects'
  518.         ShortCut = 0
  519.         object Stars1: TMenuItem
  520.           Caption = '&Stars'
  521.           ShortCut = 0
  522.           object More1: TMenuItem
  523.             Caption = '&More'
  524.             Enabled = False
  525.             ShortCut = 0
  526.           end
  527.           object Fewer1: TMenuItem
  528.             Caption = '&Fewer'
  529.             Enabled = False
  530.             ShortCut = 0
  531.           end
  532.           object Autoresolve1: TMenuItem
  533.             Caption = '&Autoresolve'
  534.             ShortCut = 0
  535.             OnClick = Autoresolve1Click
  536.           end
  537.           object Names5: TMenuItem
  538.             Caption = '&Names'
  539.             ShortCut = 0
  540.             OnClick = Names5Click
  541.           end
  542.           object Designations1: TMenuItem
  543.             Caption = '&Designations'
  544.             ShortCut = 0
  545.             OnClick = Designations1Click
  546.           end
  547.           object N11: TMenuItem
  548.             Caption = '-'
  549.             ShortCut = 0
  550.           end
  551.           object Style2: TMenuItem
  552.             Caption = '&Style'
  553.             ShortCut = 0
  554.             object Realistic1: TMenuItem
  555.               Caption = '&Realistic'
  556.               GroupIndex = 2
  557.               ShortCut = 121
  558.               OnClick = Realistic1Click
  559.             end
  560.             object Photoplate1: TMenuItem
  561.               Caption = '&Photoplate'
  562.               GroupIndex = 2
  563.               ShortCut = 8313
  564.               OnClick = Photoplate1Click
  565.             end
  566.             object Adjust1: TMenuItem
  567.               Caption = '&Adjust'
  568.               GroupIndex = 2
  569.               ShortCut = 0
  570.               OnClick = Adjust1Click
  571.             end
  572.           end
  573.         end
  574.         object Planets1: TMenuItem
  575.           Caption = '&Planets'
  576.           ShortCut = 0
  577.           object Setonoff11: TMenuItem
  578.             Caption = '&Set on/off'
  579.             ShortCut = 0
  580.             OnClick = Setonoff11Click
  581.           end
  582.           object Names4: TMenuItem
  583.             Caption = '&Names'
  584.             ShortCut = 0
  585.             OnClick = Names4Click
  586.           end
  587.         end
  588.         object Messier1: TMenuItem
  589.           Caption = '&Messier'
  590.           ShortCut = 0
  591.           object Setonoff10: TMenuItem
  592.             Caption = '&Set on/off'
  593.             ShortCut = 16461
  594.             OnClick = Setonoff10Click
  595.           end
  596.           object Catalog2: TMenuItem
  597.             Caption = '&Catalog'
  598.             ShortCut = 0
  599.             OnClick = Catalog2Click
  600.           end
  601.           object Names3: TMenuItem
  602.             Caption = '&Names'
  603.             ShortCut = 0
  604.             OnClick = Names3Click
  605.           end
  606.           object Colour8: TMenuItem
  607.             Caption = '&Colour'
  608.             ShortCut = 0
  609.             OnClick = Colour8Click
  610.           end
  611.         end
  612.         object NGC1: TMenuItem
  613.           Caption = '&NGC'
  614.           ShortCut = 0
  615.           object Setonoff9: TMenuItem
  616.             Caption = '&Set on/off'
  617.             ShortCut = 16462
  618.             OnClick = Setonoff9Click
  619.           end
  620.           object Catalog1: TMenuItem
  621.             Caption = '&Catalog'
  622.             ShortCut = 0
  623.             OnClick = Catalog1Click
  624.           end
  625.           object Names2: TMenuItem
  626.             Caption = '&Names'
  627.             ShortCut = 0
  628.           end
  629.         end
  630.         object Comets1: TMenuItem
  631.           Caption = '&Comets'
  632.           Enabled = False
  633.           ShortCut = 0
  634.           OnClick = Comets1Click
  635.         end
  636.         object Asteroids1: TMenuItem
  637.           Caption = '&Asteroids'
  638.           Enabled = False
  639.           ShortCut = 0
  640.         end
  641.       end
  642.       object N12: TMenuItem
  643.         Caption = '-'
  644.         ShortCut = 0
  645.       end
  646.       object Settings1: TMenuItem
  647.         Caption = 'Settings'
  648.         ShortCut = 0
  649.         object Effects1: TMenuItem
  650.           Caption = '&Effects'
  651.           ShortCut = 0
  652.           object Atmospheric1: TMenuItem
  653.             Caption = 'Atmospheric'
  654.             ShortCut = 0
  655.             object Refraction1: TMenuItem
  656.               Caption = '&Refraction'
  657.               ShortCut = 0
  658.               OnClick = Refraction1Click
  659.             end
  660.             object Extinction1: TMenuItem
  661.               Caption = '&Extinction'
  662.               Enabled = False
  663.               ShortCut = 0
  664.             end
  665.             object Scintillation1: TMenuItem
  666.               Caption = '&Scintillation'
  667.               ShortCut = 0
  668.               OnClick = Scintillation1Click
  669.             end
  670.           end
  671.           object Gravitational1: TMenuItem
  672.             Caption = '&Gravitational'
  673.             ShortCut = 0
  674.             object Precession1: TMenuItem
  675.               Caption = '&Precession'
  676.               ShortCut = 16464
  677.               OnClick = Precession1Click
  678.             end
  679.             object Nutation1: TMenuItem
  680.               Caption = '&Nutation'
  681.               Enabled = False
  682.               ShortCut = 0
  683.             end
  684.           end
  685.           object N14: TMenuItem
  686.             Caption = '-'
  687.             ShortCut = 0
  688.           end
  689.           object Brightness1: TMenuItem
  690.             Caption = 'Brightness'
  691.             ShortCut = 0
  692.             object Increase1: TMenuItem
  693.               Caption = '&Increase'
  694.               ShortCut = 0
  695.             end
  696.             object Decrease1: TMenuItem
  697.               Caption = '&Decrease'
  698.               ShortCut = 0
  699.             end
  700.           end
  701.           object Tint1: TMenuItem
  702.             Caption = 'Tint'
  703.             ShortCut = 0
  704.             object Whiten1: TMenuItem
  705.               Caption = '&Whiten'
  706.               ShortCut = 0
  707.             end
  708.             object Darken1: TMenuItem
  709.               Caption = '&Darken'
  710.               ShortCut = 0
  711.             end
  712.             object Restore1: TMenuItem
  713.               Caption = '&Restore'
  714.               ShortCut = 0
  715.             end
  716.           end
  717.         end
  718.         object Cursor1: TMenuItem
  719.           Caption = '&Cursor'
  720.           ShortCut = 0
  721.           object Hide1: TMenuItem
  722.             Caption = '&Hide'
  723.             ShortCut = 0
  724.             OnClick = Hide1Click
  725.           end
  726.           object Show1: TMenuItem
  727.             Caption = '&Show'
  728.             ShortCut = 0
  729.             OnClick = Show1Click
  730.           end
  731.         end
  732.         object Panels1: TMenuItem
  733.           Caption = '&Panels'
  734.           ShortCut = 0
  735.           object Font1: TMenuItem
  736.             Caption = '&Font'
  737.             ShortCut = 0
  738.           end
  739.           object Border1: TMenuItem
  740.             Caption = '&Border'
  741.             ShortCut = 0
  742.           end
  743.         end
  744.         object Labels1: TMenuItem
  745.           Caption = '&Labels'
  746.           ShortCut = 0
  747.           object Bright1: TMenuItem
  748.             Caption = '&Bright'
  749.             ShortCut = 0
  750.             OnClick = Bright1Click
  751.           end
  752.           object Small1: TMenuItem
  753.             Caption = '&Small'
  754.             ShortCut = 0
  755.             OnClick = Small1Click
  756.           end
  757.           object Medium1: TMenuItem
  758.             Caption = '&Medium'
  759.             ShortCut = 0
  760.             OnClick = Medium1Click
  761.           end
  762.           object Large1: TMenuItem
  763.             Caption = '&Large'
  764.             ShortCut = 0
  765.             OnClick = Large1Click
  766.           end
  767.         end
  768.         object Window1: TMenuItem
  769.           Caption = '&Window'
  770.           ShortCut = 0
  771.           object FullScreen2: TMenuItem
  772.             Caption = '&Full Screen'
  773.             ShortCut = 16467
  774.             OnClick = FullScreen2Click
  775.           end
  776.           object PrintSky2: TMenuItem
  777.             Caption = '&Print Sky'
  778.             ShortCut = 120
  779.             OnClick = PrintSky2Click
  780.           end
  781.           object PrintMode1: TMenuItem
  782.             Caption = 'Print &Mode'
  783.             ShortCut = 0
  784.             object Mono1: TMenuItem
  785.               Caption = '&Mono'
  786.               GroupIndex = 1
  787.               ShortCut = 0
  788.               OnClick = Mono1Click
  789.             end
  790.             object Colour9: TMenuItem
  791.               Caption = '&Colour'
  792.               GroupIndex = 1
  793.               ShortCut = 0
  794.               OnClick = Colour9Click
  795.             end
  796.           end
  797.           object Showhints1: TMenuItem
  798.             Caption = 'Show &hints'
  799.             ShortCut = 0
  800.           end
  801.           object N13: TMenuItem
  802.             Caption = '-'
  803.             ShortCut = 0
  804.           end
  805.           object Guide2: TMenuItem
  806.             Caption = '&Guide'
  807.             ShortCut = 112
  808.             OnClick = Guide2Click
  809.           end
  810.           object LiveEphem2: TMenuItem
  811.             Caption = 'Live &Ephem'
  812.             ShortCut = 16460
  813.             OnClick = LiveEphem2Click
  814.           end
  815.           object Log1: TMenuItem
  816.             Caption = '&Log'
  817.             ShortCut = 16463
  818.             OnClick = Log1Click
  819.           end
  820.         end
  821.       end
  822.     end
  823.     object Search1: TMenuItem
  824.       Caption = '&Search'
  825.       ShortCut = 0
  826.       object FindbyName1: TMenuItem
  827.         Caption = '&Find by Name'
  828.         ShortCut = 0
  829.         OnClick = FindbyName1Click
  830.       end
  831.       object FindbyDesig1: TMenuItem
  832.         Caption = 'Find by &Designation'
  833.         Enabled = False
  834.         ShortCut = 0
  835.       end
  836.     end
  837.     object Help1: TMenuItem
  838.       Caption = '&Help'
  839.       ShortCut = 0
  840.       object AboutCoeli1: TMenuItem
  841.         Caption = '&About'
  842.         ShortCut = 0
  843.         OnClick = AboutCoeli1Click
  844.       end
  845.       object Products1: TMenuItem
  846.         Caption = '&Products'
  847.         ShortCut = 16466
  848.         OnClick = Products1Click
  849.       end
  850.       object Usage1: TMenuItem
  851.         Caption = '&Usage'
  852.         ShortCut = 16469
  853.         OnClick = Usage1Click
  854.       end
  855.       object N2: TMenuItem
  856.         Caption = '-'
  857.         ShortCut = 0
  858.       end
  859.       object Overview1: TMenuItem
  860.         Caption = '&Overview'
  861.         ShortCut = 0
  862.         OnClick = Overview1Click
  863.       end
  864.       object Guide1: TMenuItem
  865.         Caption = '&Guide'
  866.         ShortCut = 112
  867.         OnClick = Guide1Click
  868.       end
  869.       object Keys1: TMenuItem
  870.         Caption = '&Keys'
  871.         ShortCut = 8304
  872.         OnClick = Keys1Click
  873.       end
  874.       object N15: TMenuItem
  875.         Caption = '-'
  876.         ShortCut = 0
  877.       end
  878.       object License1: TMenuItem
  879.         Caption = '&License'
  880.         ShortCut = 0
  881.         OnClick = License1Click
  882.       end
  883.       object Registration1: TMenuItem
  884.         Caption = '&Registration'
  885.         ShortCut = 0
  886.         OnClick = Registration1Click
  887.       end
  888.       object Register1: TMenuItem
  889.         Caption = '&Register'
  890.         Default = True
  891.         ShortCut = 0
  892.         object ViaInternet1: TMenuItem
  893.           Caption = 'Via &Internet'
  894.           ShortCut = 0
  895.           OnClick = ViaInternet1Click
  896.         end
  897.         object Fillform1: TMenuItem
  898.           Caption = '&Fill form'
  899.           ShortCut = 0
  900.           OnClick = Fillform1Click
  901.         end
  902.       end
  903.     end
  904.   end
  905. end
  906.