{*
 * @(#) sdesignm.txt - System Designer program ('control' form description).
 * (c) 1997 Ivan Maidanski <ivmai@chat.ru> http://ivmai.chat.ru
 * Freeware program source. All rights reserved.
 **
 * Language: Delphi Form textual description
 * Tested with: Borland Delphi DeskTop 2.01 for Windows 95
 * Last modified: 1997-04-16 16:50:00 GMT+04:00
 *}

object DesignerForm: TDesignerForm
  Left = 0
  Top = 40
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'System Designer'
  ClientHeight = 24
  ClientWidth = 292
  Font.Color = clBlack
  Font.Height = -17
  Font.Name = 'System'
  Font.Style = [fsBold]
  Menu = DesignerMenu
  Visible = True
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 120
  TextHeight = 20
  object DesignerMenu: TMainMenu
    object FileMenu: TMenuItem
      Caption = '&File'
      ShortCut = 0
      object NewItem: TMenuItem
        Caption = '&New'
        ShortCut = 0
        OnClick = NewFileClick
      end
      object OpenItem: TMenuItem
        Caption = '&Open file...'
        ShortCut = 16463
        OnClick = OpenFileClick
      end
      object SaveItem: TMenuItem
        Caption = '&Save'
        Enabled = False
        ShortCut = 16467
        OnClick = SaveFileClick
      end
      object SaveAsItem: TMenuItem
        Caption = 'Save &As...'
        Enabled = False
        ShortCut = 0
        OnClick = SaveFileAsClick
      end
      object CloseItem: TMenuItem
        Caption = '&Close'
        Enabled = False
        ShortCut = 0
        OnClick = CloseFileClick
      end
      object FileItemSeparator: TMenuItem
        Caption = '-'
        Enabled = False
        ShortCut = 0
      end
      object ExitItem: TMenuItem
        Caption = 'E&xit'
        ShortCut = 0
        OnClick = ExitClick
      end
    end
    object EditMenu: TMenuItem
      Caption = '&Edit'
      GroupIndex = 1
      ShortCut = 0
      object UndoItem: TMenuItem
        Caption = '&Undo'
        Enabled = False
        ShortCut = 32776
      end
      object RedoItem: TMenuItem
        Caption = '&Redo'
        Enabled = False
        ShortCut = 49160
      end
      object EditItemSeparator: TMenuItem
        Caption = '-'
        Enabled = False
        ShortCut = 0
      end
      object CutItem: TMenuItem
        Caption = 'Cu&t'
        Enabled = False
        ShortCut = 16472
        OnClick = CutClick
      end
      object CopyItem: TMenuItem
        Caption = '&Copy'
        Enabled = False
        ShortCut = 16451
        OnClick = CopyClick
      end
      object PasteItem: TMenuItem
        Caption = '&Paste'
        Enabled = False
        ShortCut = 16470
        OnClick = PasteClick
      end
      object DeleteItem: TMenuItem
        Caption = '&Delete'
        Enabled = False
        ShortCut = 16430
        OnClick = DeleteClick
      end
      object SelectItemSeparator: TMenuItem
        Caption = '-'
        Enabled = False
        ShortCut = 0
      end
      object SelectItem: TMenuItem
        Caption = 'Select...'
        Enabled = False
        ShortCut = 16449
      end
    end
    object DataMenu: TMenuItem
      Caption = '&Data'
      GroupIndex = 2
      ShortCut = 0
      object InsertItem: TMenuItem
        Caption = '&Insert'
        Enabled = False
        ShortCut = 45
        OnClick = InsertClick
      end
      object DataItemSeparator: TMenuItem
        Caption = '-'
        Enabled = False
        ShortCut = 0
      end
      object ModifyItem: TMenuItem
        Caption = '&Modify'
        Enabled = False
        ShortCut = 16397
        OnClick = ModifyClick
      end
      object RenameItem: TMenuItem
        Caption = 'Re&name'
        Enabled = False
        ShortCut = 113
        OnClick = RenameClick
      end
      object SearchItemSeparator: TMenuItem
        Caption = '-'
        Enabled = False
        ShortCut = 0
      end
      object FindItem: TMenuItem
        Caption = '&Find...'
        Enabled = False
        ShortCut = 16454
        OnClick = FindClick
      end
      object ReplaceItem: TMenuItem
        Caption = '&Replace...'
        Enabled = False
        ShortCut = 16466
      end
      object SearchAgainItem: TMenuItem
        Caption = 'Search &Again'
        Enabled = False
        ShortCut = 114
      end
    end
    object HelpMenu: TMenuItem
      Caption = '&Help'
      GroupIndex = 5
      ShortCut = 0
      object ContentsItem: TMenuItem
        Caption = '&Contents'
        Enabled = False
        ShortCut = 112
      end
      object TopicSearchItem: TMenuItem
        Caption = '&Topic Search'
        Enabled = False
        ShortCut = 0
      end
      object HelpItemSeparator: TMenuItem
        Caption = '-'
        Enabled = False
        ShortCut = 0
      end
      object AboutItem: TMenuItem
        Caption = '&About...'
        ShortCut = 0
        OnClick = AboutClick
      end
    end
  end
  object OpenFileDlg: TOpenDialog
    DefaultExt = 'txt'
    FileEditStyle = fsEdit
    Filter = 'Text files (*.txt)|*.txt'
    Options = [ofShowHelp, ofPathMustExist]
    Left = 32
  end
end