Fun CD 26/OTACD26.ISO/archive/game/lv200/lv200.lzh/LunarView.exe/0/RCDATA/TMAINFORM/TMAINFORM.txt

Text File | 1998-12-31 | 6KB | 307 lines

object MainForm: TMainForm
  Left = 221
  Top = 129
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'LunarView'
  ClientHeight = 507
  ClientWidth = 377
  Font.Charset = SHIFTJIS_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'ｿｽlｿｽr ｿｽoｿｽSｿｽVｿｽbｿｽN'
  Font.Style = []
  Menu = MainMenu1
  Position = poScreenCenter
  OnActivate = FormActivate
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Label4: TLabel
    Left = 184
    Top = 484
    Width = 33
    Height = 12
    Alignment = taRightJustify
    AutoSize = False
  end
  object Panel1: TPanel
    Left = 28
    Top = 12
    Width = 324
    Height = 451
    BevelOuter = bvLowered
    BevelWidth = 2
    TabOrder = 0
    object Image1: TImage
      Left = 2
      Top = 2
      Width = 320
      Height = 447
      Align = alClient
      Center = True
      OnDblClick = Image1DblClick
    end
    object Label1: TLabel
      Left = 29
      Top = 196
      Width = 266
      Height = 12
      Caption = 'Copyright 1998-1999 ｿｽﾇ搾ｿｽ([e-mail])'
      Visible = False
    end
    object Image2: TImage
      Left = 40
      Top = 124
      Width = 32
      Height = 32
    end
    object Label2: TLabel
      Left = 92
      Top = 128
      Width = 162
      Height = 29
      Caption = 'ｿｽkｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽuｿｽｿｽｿｽｿｽｿｽｿｽ'
      Font.Charset = SHIFTJIS_CHARSET
      Font.Color = clWindowText
      Font.Height = -29
      Font.Name = 'ｿｽlｿｽr ｿｽoｿｽｿｽｿｽｿｽ'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 131
      Top = 168
      Width = 63
      Height = 12
      Caption = 'Version 2.00'
    end
    object Button1: TButton
      Left = 124
      Top = 240
      Width = 75
      Height = 25
      Caption = 'OK'
      TabOrder = 0
      Visible = False
      OnClick = Button1Click
    end
  end
  object ComboBox1: TComboBox
    Left = 4
    Top = 120
    Width = 57
    Height = 20
    Style = csDropDownList
    ItemHeight = 12
    Items.Strings = (
      '41984000'
      '48779264'
      '47337472'
      '17659904'
      '28448768'
      '50212864'
      '49639424'
      '49352704'
      '49926144'
      '17373184'
      '28162048'
      '32563200'
      '32849920'
      '47624192'
      '42270720')
    TabOrder = 1
    Visible = False
    OnChange = ComboBox1Change
  end
  object Button2: TButton
    Left = 291
    Top = 476
    Width = 60
    Height = 25
    Caption = '>'
    Enabled = False
    TabOrder = 2
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 223
    Top = 476
    Width = 60
    Height = 25
    Caption = '<'
    Enabled = False
    TabOrder = 3
    OnClick = Button3Click
  end
  object DriveComboBox1: TDriveComboBox
    Left = 28
    Top = 480
    Width = 145
    Height = 18
    TabOrder = 4
    OnChange = DriveComboBox1Change
  end
  object ComboBox3: TComboBox
    Left = 4
    Top = 168
    Width = 57
    Height = 20
    ItemHeight = 12
    Items.Strings = (
      '51901436'
      '51925748'
      '51944372'
      '51963612'
      '52006404'
      '52031748'
      '52059852'
      '52085340'
      '52108252'
      '52128484'
      '52170076')
    TabOrder = 5
    Visible = False
  end
  object ComboBox2: TComboBox
    Left = 4
    Top = 144
    Width = 57
    Height = 20
    ItemHeight = 12
    Items.Strings = (
      '69640'
      '258056'
      '473096'
      '684040'
      '876552'
      '1056776'
      '1255432'
      '1619976'
      '1867784'
      '2134024'
      '2451464'
      '2656264'
      '2893832'
      '3125256'
      '3328008'
      '3624968'
      '3817480'
      '3989512'
      '4190216'
      '4386824'
      '4638728'
      '4880392'
      '5144584'
      '5384200'
      '5619720'
      '5871624'
      '6072328'
      '6330376'
      '6631432'
      '6803464'
      '6995976'
      '7247880'
      '7454728'
      '7837704'
      '8079368'
      '8302600'
      '8482824'
      '8787976'
      '9007112'
      '9211912'
      '9451528'
      '9775112'
      '10022920'
      '10278920'
      '10475528'
      '10745864'
      '10913800'
      '11081736'
      '11255816'
      '11409416'
      '11567112'
      '11761672'
      '11997192'
      '12130312'
      '12265480'
      '12431368'
      '12666888'
      '12871688'
      '12972040'
      '13084680'
      '13189128'
      '13365256'
      '13582344'
      '13828104'
      '13920264'
      '14014472'
      '14198792'
      '14417928'
      '14618632'
      '14866440'
      '14974984'
      '15116296'
      '15210504'
      '15329288'
      '15423496'
      '15517704'
      '15620104'
      '15722504'
      '15814664'
      '15917064'
      '16310280'
      '16410632'
      '16805896'
      '16898056'
      '17133576')
    TabOrder = 6
    Visible = False
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = 'bmp'
    Filter = 'ｿｽrｿｽbｿｽgｿｽ}ｿｽbｿｽv(*.bmp)|*.bmp'
    Top = 12
  end
  object MainMenu1: TMainMenu
    Top = 44
    object File1: TMenuItem
      Caption = 'ｿｽtｿｽ@ｿｽCｿｽｿｽ(&F)'
      object Exit1: TMenuItem
        Caption = 'ｿｽIｿｽｿｽ(&X)'
        OnClick = Exit1Click
      end
    end
    object G1: TMenuItem
      Caption = 'ｿｽWｿｽｿｽｿｽｿｽｿｽｿｽ(&G)'
      Enabled = False
      object N1: TMenuItem
        Caption = 'ｿｽuｿｽｿｽｿｽ}ｿｽCｿｽh(&B)'
        Checked = True
        GroupIndex = 1
        RadioItem = True
        OnClick = N1Click
      end
      object C1: TMenuItem
        Caption = 'ｿｽ崧ｬｿｽVｿｽ[ｿｽｿｽ(&S)'
        GroupIndex = 1
        RadioItem = True
        OnClick = C1Click
      end
      object C2: TMenuItem
        Caption = 'ｿｽLｿｽｿｽｿｽｿｽｿｽNｿｽ^(&C)'
        GroupIndex = 1
        RadioItem = True
        OnClick = C2Click
      end
    end
    object Help1: TMenuItem
      Caption = 'ｿｽwｿｽｿｽｿｽv(&H)'
      object About1: TMenuItem
        Caption = 'LunarViewｿｽﾉつゑｿｽｿｽｿｽ(&A)'
        OnClick = About1Click
      end
    end
  end
end