home *** CD-ROM | disk | FTP | other *** search
/ Freesoft 1997 June / Freesoft_1997-06_cd.bin / nerecenz / programmers / SSW / SSW.EXE / 0 / RCDATA / TMENUFORM / TMENUFORM.txt
Text File  |  1997-05-06  |  10KB  |  390 lines

  1. object MenuForm: TMenuForm
  2.   Left = 310
  3.   Top = 384
  4.   Width = 520
  5.   Height = 199
  6.   Caption = 'Menus'
  7.   Font.Color = clWindowText
  8.   Font.Height = -11
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   PixelsPerInch = 96
  12.   TextHeight = 13
  13.   object ObjectsPopup: TPopupMenu
  14.     OnPopup = ObjectsPopupPopup
  15.     Left = 96
  16.     Top = 24
  17.     object SystemTablesMI: TMenuItem
  18.       Caption = 'System Tables'
  19.       ShortCut = 0
  20.       OnClick = SystemTablesMIClick
  21.     end
  22.     object ObjectCommasMI: TMenuItem
  23.       Caption = 'Commas'
  24.       ShortCut = 0
  25.       OnClick = ObjectCommasMIClick
  26.     end
  27.   end
  28.   object FieldListPopup: TPopupMenu
  29.     OnPopup = FieldListPopupPopup
  30.     Left = 168
  31.     Top = 24
  32.     object FieldmenuCommasMI: TMenuItem
  33.       Caption = '&Commas'
  34.       ShortCut = 0
  35.       OnClick = FieldmenuCommasMIClick
  36.     end
  37.     object FieldDetailsMI: TMenuItem
  38.       Caption = 'Field &Details'
  39.       ShortCut = 0
  40.       OnClick = FieldDetailsMIClick
  41.     end
  42.     object DetailsSortedMI: TMenuItem
  43.       Caption = 'Sor&ted'
  44.       ShortCut = 0
  45.       OnClick = DetailsSortedMIClick
  46.     end
  47.     object FullQualMI: TMenuItem
  48.       Caption = 'Fully &Qualified'
  49.       ShortCut = 0
  50.       OnClick = FullQualMIClick
  51.     end
  52.   end
  53.   object EditPopup: TPopupMenu
  54.     Left = 224
  55.     Top = 24
  56.     object SavEditMI: TMenuItem
  57.       Caption = 'Save'
  58.       ShortCut = 0
  59.       OnClick = SavEditMIClick
  60.     end
  61.     object EditSaveAsMI: TMenuItem
  62.       Caption = 'Save As...'
  63.       ShortCut = 0
  64.       OnClick = EditSaveAsMIClick
  65.     end
  66.     object CloseEditMI: TMenuItem
  67.       Caption = 'Close'
  68.       ShortCut = 0
  69.       OnClick = CloseEditMIClick
  70.     end
  71.   end
  72.   object MainMenu: TMainMenu
  73.     Left = 24
  74.     Top = 24
  75.     object File1: TMenuItem
  76.       Caption = '&File'
  77.       ShortCut = 0
  78.       OnClick = MenuDropDown
  79.       object NewMI: TMenuItem
  80.         Caption = '&New...'
  81.         ShortCut = 0
  82.         OnClick = NewEditTabMOClick
  83.       end
  84.       object OpenMI: TMenuItem
  85.         Caption = '&Open...'
  86.         ShortCut = 0
  87.         OnClick = OpenFileMIClick
  88.       end
  89.       object ReopenMenu: TMenuItem
  90.         Caption = '&Reopen'
  91.         ShortCut = 0
  92.       end
  93.       object SaveFileMI: TMenuItem
  94.         Caption = '&Save...'
  95.         ShortCut = 16467
  96.         OnClick = SaveFileMIClick
  97.       end
  98.       object SaveAsMI: TMenuItem
  99.         Caption = 'Save &As...'
  100.         ShortCut = 0
  101.         OnClick = SaveAsMIClick
  102.       end
  103.       object SaveAllMI: TMenuItem
  104.         Caption = 'Sa&ve All'
  105.         ShortCut = 0
  106.         OnClick = SaveAllMIClick
  107.       end
  108.       object CloseMI: TMenuItem
  109.         Caption = '&Close'
  110.         ShortCut = 0
  111.         OnClick = CloseMIClick
  112.       end
  113.       object CloseAllMI: TMenuItem
  114.         Caption = 'C&lose All'
  115.         ShortCut = 0
  116.         OnClick = CloseAllMIClick
  117.       end
  118.       object N5: TMenuItem
  119.         Caption = '-'
  120.         ShortCut = 0
  121.       end
  122.       object PrintMI: TMenuItem
  123.         Caption = '&Print...'
  124.         ShortCut = 0
  125.         OnClick = PrintMIClick
  126.       end
  127.       object PrinterSetupMI: TMenuItem
  128.         Caption = 'Printer S&etup...'
  129.         ShortCut = 0
  130.         OnClick = PrinterSetupMIClick
  131.       end
  132.       object N1: TMenuItem
  133.         Caption = '-'
  134.         ShortCut = 0
  135.       end
  136.       object ExitMI: TMenuItem
  137.         Caption = 'E&xit'
  138.         ShortCut = 0
  139.         OnClick = ExitMIClick
  140.       end
  141.     end
  142.     object Edit1: TMenuItem
  143.       Caption = '&Edit'
  144.       ShortCut = 0
  145.       OnClick = MenuDropDown
  146.       object UndoMI: TMenuItem
  147.         Caption = '&Undo'
  148.         ShortCut = 16474
  149.         OnClick = UndoMIClick
  150.       end
  151.       object N2: TMenuItem
  152.         Caption = '-'
  153.         ShortCut = 0
  154.       end
  155.       object CutMI: TMenuItem
  156.         Caption = 'Cu&t'
  157.         ShortCut = 16472
  158.         OnClick = CutMIClick
  159.       end
  160.       object CopyMI: TMenuItem
  161.         Caption = '&Copy'
  162.         ShortCut = 16451
  163.         OnClick = CopyMIClick
  164.       end
  165.       object PasteMI: TMenuItem
  166.         Caption = '&Paste'
  167.         ShortCut = 16470
  168.         OnClick = PasteMIClick
  169.       end
  170.       object SelectAllMI: TMenuItem
  171.         Caption = '&Select All'
  172.         ShortCut = 0
  173.         OnClick = SelectAllMIClick
  174.       end
  175.       object N3: TMenuItem
  176.         Caption = '-'
  177.         ShortCut = 0
  178.       end
  179.       object CommentOutMI: TMenuItem
  180.         Caption = 'Comment &Out'
  181.         ShortCut = 16455
  182.         OnClick = CommentOutMIClick
  183.       end
  184.       object ParenthesiseMI: TMenuItem
  185.         Caption = 'Pa&renthesise'
  186.         ShortCut = 16450
  187.         OnClick = ParenthesiseMIClick
  188.       end
  189.     end
  190.     object Find1: TMenuItem
  191.       Caption = '&Search'
  192.       ShortCut = 0
  193.       OnClick = MenuDropDown
  194.       object SearchMI: TMenuItem
  195.         Caption = '&Find...'
  196.         ShortCut = 16454
  197.         OnClick = SearchMIClick
  198.       end
  199.       object ReplaceMI: TMenuItem
  200.         Caption = '&Replace...'
  201.         ShortCut = 16466
  202.         OnClick = ReplaceMIClick
  203.       end
  204.     end
  205.     object View1: TMenuItem
  206.       Caption = '&View'
  207.       ShortCut = 0
  208.       OnClick = MenuDropDown
  209.       object DataViewMI: TMenuItem
  210.         Caption = '&Data'
  211.         ShortCut = 0
  212.         OnClick = DataViewMIClick
  213.       end
  214.       object HistoryMI: TMenuItem
  215.         Caption = '&History'
  216.         ShortCut = 0
  217.         OnClick = HistoryMIClick
  218.       end
  219.       object KeywordViewMI: TMenuItem
  220.         Caption = '&Keyword'
  221.         ShortCut = 0
  222.         OnClick = KeywordViewMIClick
  223.       end
  224.       object MemoViewMI: TMenuItem
  225.         Caption = '&Memo'
  226.         ShortCut = 0
  227.         OnClick = MemoViewMIClick
  228.       end
  229.     end
  230.     object Macros1: TMenuItem
  231.       Caption = '&Macros'
  232.       ShortCut = 0
  233.       OnClick = MenuDropDown
  234.       object NewMacroMI: TMenuItem
  235.         Caption = '&New...'
  236.         ShortCut = 0
  237.         OnClick = NewMacroMIClick
  238.       end
  239.       object EditMacroMI: TMenuItem
  240.         Caption = '&Edit...'
  241.         ShortCut = 0
  242.         OnClick = EditMacroMIClick
  243.       end
  244.       object RenamemacroMI: TMenuItem
  245.         Caption = '&Rename...'
  246.         ShortCut = 0
  247.         OnClick = RenamemacroMIClick
  248.       end
  249.       object DeleteMacroMI: TMenuItem
  250.         Caption = '&Delete'
  251.         ShortCut = 0
  252.         OnClick = DeleteMacroMIClick
  253.       end
  254.     end
  255.     object SQL1: TMenuItem
  256.       Caption = '&Database'
  257.       ShortCut = 0
  258.       OnClick = MenuDropDown
  259.       object Execute1: TMenuItem
  260.         Caption = '&Execute'
  261.         ShortCut = 0
  262.         object ExecTextMI: TMenuItem
  263.           Caption = '&Text'
  264.           ShortCut = 16453
  265.           OnClick = ExecTextMIClick
  266.         end
  267.         object ExecScriptMI: TMenuItem
  268.           Caption = '&Script'
  269.           ShortCut = 0
  270.           OnClick = ExecScriptClick
  271.         end
  272.       end
  273.       object RefreshMI: TMenuItem
  274.         Caption = '&Refresh'
  275.         ShortCut = 0
  276.         OnClick = RefreshMIClick
  277.       end
  278.       object DisconnectMI: TMenuItem
  279.         Caption = '&Disconnect'
  280.         ShortCut = 0
  281.         OnClick = DisconnectMIClick
  282.       end
  283.     end
  284.     object Options1: TMenuItem
  285.       Caption = '&Options'
  286.       ShortCut = 0
  287.       OnClick = MenuDropDown
  288.       object ConfirmationsMI: TMenuItem
  289.         Caption = '&Confirmations'
  290.         Checked = True
  291.         ShortCut = 0
  292.         OnClick = Confirmations1Click
  293.       end
  294.       object BeepOnErrorMI: TMenuItem
  295.         Caption = '&Beep On Error'
  296.         ShortCut = 0
  297.         OnClick = BeepOnErrorMIClick
  298.       end
  299.       object EditorSettingsMI: TMenuItem
  300.         Caption = '&Editor Settings...'
  301.         ShortCut = 0
  302.         OnClick = EditorSettingsMIClick
  303.       end
  304.       object SQLTextMI: TMenuItem
  305.         Caption = '&SQL Text...'
  306.         ShortCut = 0
  307.         OnClick = SQLTextMIClick
  308.       end
  309.       object MaxErrors1: TMenuItem
  310.         Caption = '&Max Errors...'
  311.         ShortCut = 0
  312.         OnClick = MaxErrors1Click
  313.       end
  314.     end
  315.     object Help1: TMenuItem
  316.       Caption = '&Help'
  317.       ShortCut = 0
  318.       OnClick = MenuDropDown
  319.       object HelpContentsMI: TMenuItem
  320.         Caption = '&Contents'
  321.         ShortCut = 0
  322.         OnClick = HelpContentsMIClick
  323.       end
  324.       object SQL2: TMenuItem
  325.         Caption = '&SQL'
  326.         ShortCut = 0
  327.         OnClick = SQL2Click
  328.       end
  329.       object N8: TMenuItem
  330.         Caption = '-'
  331.         ShortCut = 0
  332.       end
  333.       object RegisterSWMI: TMenuItem
  334.         Caption = '&Register...'
  335.         ShortCut = 0
  336.         OnClick = RegisterSWMIClick
  337.       end
  338.       object N7: TMenuItem
  339.         Caption = '-'
  340.         ShortCut = 0
  341.       end
  342.       object AboutMI: TMenuItem
  343.         Caption = '&About...'
  344.         ShortCut = 0
  345.         OnClick = AboutMIClick
  346.       end
  347.     end
  348.     object HotKeys1: TMenuItem
  349.       Caption = 'HotKeys'
  350.       ShortCut = 0
  351.       Visible = False
  352.       object ObjectsHK: TMenuItem
  353.         Caption = 'Objects'
  354.         ShortCut = 16463
  355.         OnClick = ObjectsHKClick
  356.       end
  357.       object DetailHK: TMenuItem
  358.         Caption = 'Details'
  359.         ShortCut = 16452
  360.         OnClick = DetalHKClick
  361.       end
  362.       object Completion1: TMenuItem
  363.         Caption = 'Completion'
  364.         ShortCut = 16465
  365.         OnClick = Completion1Click
  366.       end
  367.       object CompletionToggleMI: TMenuItem
  368.         Caption = 'CompletionToggle'
  369.         ShortCut = 16449
  370.         OnClick = CompletionToggleMIClick
  371.       end
  372.       object DeleteWordHK: TMenuItem
  373.         Caption = 'Delete Word'
  374.         ShortCut = 16468
  375.         OnClick = DeleteWordHKClick
  376.       end
  377.       object DeleteLineHK: TMenuItem
  378.         Caption = 'Delete Line'
  379.         ShortCut = 16473
  380.         OnClick = DeleteLineHKClick
  381.       end
  382.       object RunSQLHK: TMenuItem
  383.         Caption = 'RunSQL'
  384.         ShortCut = 16459
  385.         OnClick = RunSQLHKClick
  386.       end
  387.     end
  388.   end
  389. end
  390.