Chip 2000 February/Chip_2000-02_cd.bin/sharewar/mapbook/BMP_VIEW.EXE/0/RCDATA/TMAINFORM/TMAINFORM.txt

Text File | 1998-10-15 | 2KB | 103 lines

object MainForm: TMainForm
  Left = 236
  Top = 257
  Width = 620
  Height = 383
  Caption = 'Bitmap to PDB'
  Font.Charset = SHIFTJIS_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '�l�r �o�S�V�b�N'
  Font.Style = []
  Menu = MainMenu
  Position = poScreenCenter
  OnMouseDown = FormMouseDown
  OnMouseMove = FormMouseMove
  OnMouseUp = FormMouseUp
  PixelsPerInch = 96
  TextHeight = 12
  object HintStatus: TStatusBar
    Left = 0
    Top = 318
    Width = 612
    Height = 19
    Panels = <>
    SimplePanel = True
  end
  object ScrollBox1: TScrollBox
    Left = 0
    Top = 0
    Width = 612
    Height = 318
    Align = alClient
    TabOrder = 1
    object Image: TImage
      Left = 0
      Top = 0
      Width = 105
      Height = 105
      AutoSize = True
      OnMouseDown = FormMouseDown
      OnMouseMove = FormMouseMove
      OnMouseUp = FormMouseUp
    end
  end
  object MainMenu: TMainMenu
    Left = 220
    Top = 119
    object FileMenu: TMenuItem
      Caption = 'File(&F)'
      object FileOpenMenu: TMenuItem
        Caption = 'Open (&O)'
        OnClick = FileOpenMenuClick
      end
      object FileSaveMenu: TMenuItem
        Caption = 'Save(&S)'
        OnClick = FileSaveMenuClick
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object FileExitMenu: TMenuItem
        Caption = 'Exit (&X)'
        OnClick = FileExitMenuClick
      end
    end
    object EditMenu: TMenuItem
      Caption = 'Edit(&E)'
      object EditGridMenu: TMenuItem
        Caption = 'Grid'
        OnClick = EditGridMenuClick
      end
      object EditTitleMenu: TMenuItem
        Caption = 'Title Set'
        OnClick = EditTitleMenuClick
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object EditDitherMenu: TMenuItem
        Caption = 'Dither...'
        OnClick = EditDitherMenuClick
      end
    end
    object HelpMenu: TMenuItem
      Caption = 'Help(&H)'
      object HelpVersionMenu: TMenuItem
        Caption = 'Version (&A)'
        OnClick = HelpVersionMenuClick
      end
    end
  end
  object OpenDialog: TOpenDialog
    Filter = 'BMP files (*.BMP)|*.BMP|All files (*.*)|*.*'
    Left = 266
    Top = 119
  end
  object SaveDialog: TSaveDialog
    Filter = 'PDB file(*.PDB)|*.PDB|All files(*.*)|*.*'
    Left = 306
    Top = 119
  end
end