source: oup/releases/0.28a/Unit1_main.dfm@ 654

object Form1: TForm1
  Left = 0
  Top = 0
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  Caption = 'Form1'
  ClientHeight = 487
  ClientWidth = 692
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  FormStyle = fsMDIForm
  Menu = menu
  OldCreateOrder = False
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object statbar: TStatusBar
    Left = 0
    Top = 470
    Width = 692
    Height = 17
    BiDiMode = bdLeftToRight
    Panels = <
      item
        Text = 'Nothing loaded'
        Width = 500
      end
      item
        Text = 'Files: -'
        Width = 90
      end
      item
        Text = 'Extensions: -'
        Width = 100
      end>
    ParentBiDiMode = False
  end
  object tabs: TTabSet
    Left = 0
    Top = 450
    Width = 692
    Height = 20
    Align = alBottom
    DitherBackground = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    SoftTop = True
    Style = tsModernTabs
    OnChange = tabsChange
  end
  object opend: TOpenDialog
    Options = [ofPathMustExist, ofFileMustExist, ofEnableSizing]
    Left = 480
  end
  object menu: TMainMenu
    AutoHotkeys = maManual
    Left = 592
    object menu_main: TMenuItem
      Caption = '&Main'
      object menu_loaddat: TMenuItem
        Caption = '&Select .dat-file ...'
        ShortCut = 16463
        OnClick = menu_loaddatClick
      end
      object menu_lvldb: TMenuItem
        Caption = 'Open OUP-Level-&DB ...'
        ShortCut = 16452
        OnClick = menu_lvldbClick
      end
      object ClosefileDB1: TMenuItem
        Caption = '&Close file/DB'
        OnClick = ClosefileDB1Click
      end
      object menu_sep1: TMenuItem
        Caption = '-'
      end
      object menu_exit: TMenuItem
        Caption = '&Exit'
        OnClick = menu_exitClick
      end
    end
    object menu_convert: TMenuItem
      Caption = '&Convert'
      object menu_createdb: TMenuItem
        Caption = 'Create level-database ...'
        OnClick = menu_createdbClick
      end
      object menu_createlvl: TMenuItem
        Caption = 'Create level-files ...'
        OnClick = menu_createlvlClick
      end
    end
    object menu_tools: TMenuItem
      Caption = '&Tools'
      Enabled = False
      object menu_preview: TMenuItem
        Caption = '&Preview Window ...'
        ShortCut = 16464
        OnClick = menu_previewClick
      end
      object menu_binedit: TMenuItem
        Caption = '&Binary .dat editor ...'
        ShortCut = 16450
        OnClick = menu_bineditClick
      end
      object menu_rawedit: TMenuItem
        Caption = 'Binary .&raw editor ...'
        ShortCut = 16466
        OnClick = menu_raweditClick
      end
      object menu_txmpreplace: TMenuItem
        Caption = '&TXMP replacer ...'
        ShortCut = 16468
        OnClick = menu_txmpreplaceClick
      end
      object menu_extractor: TMenuItem
        Caption = 'File &extractor ...'
        ShortCut = 16453
        OnClick = menu_extractorClick
      end
      object menu_filecompare: TMenuItem
        Caption = '&File compare ...'
        Enabled = False
        ShortCut = 16454
        OnClick = menu_filecompareClick
      end
      object menu_levelstructedit: TMenuItem
        Caption = 'Levelfile structure editor ...'
        Enabled = False
        ShortCut = 16460
      end
    end
    object menu_windows: TMenuItem
      Caption = '&Windows'
      object menu_windows_cascade: TMenuItem
        Caption = 'Cascade'
        OnClick = menu_windows_cascadeClick
      end
      object menu_windows_tile: TMenuItem
        Caption = 'Tile'
        OnClick = menu_windows_tileClick
      end
      object menu_windows_closeall: TMenuItem
        Caption = '&Close all'
        OnClick = menu_windows_closeallClick
      end
      object menu_sep3: TMenuItem
        Caption = '-'
      end
      object menu_windows_next: TMenuItem
        Caption = 'Next window'
        ShortCut = 16417
        OnClick = menu_windows_nextClick
      end
      object menu_windows_previous: TMenuItem
        Caption = 'Previous window'
        ShortCut = 16418
        OnClick = menu_windows_previousClick
      end
      object menu_sep2: TMenuItem
        Caption = '-'
      end
    end
  end
  object saved: TSaveDialog
    Options = [ofOverwritePrompt, ofPathMustExist, ofEnableSizing]
    Left = 520
  end
end