main.~dfm

一个拼图游戏

object frmMain: TfrmMain
  Left = 269
  Top = 132
  Width = 448
  Height = 394
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #25340#22270
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  PixelsPerInch = 96
  TextHeight = 13
  object image: TImage
    Left = 0
    Top = 0
    Width = 440
    Height = 340
    Align = alClient
    OnClick = imageClick
  end
  object swfPlayer: TShockwaveFlash
    Left = 0
    Top = 0
    Width = 440
    Height = 340
    Align = alClient
    TabOrder = 0
    Visible = False
    ControlData = {
      67556655000300007A2D00002423000008000200000000000800020000000000
      080002000000000008000E000000570069006E0064006F00770000000B00FFFF
      0B00FFFF08000A0000004800690067006800000008000200000000000B00FFFF
      080002000000000008000E00000061006C007700610079007300000008001000
      0000530068006F00770041006C006C0000000B0000000B000000080002000000
      00000800020000000000}
  end
  object MainMenu: TMainMenu
    Left = 8
    Top = 8
    object G1: TMenuItem
      Caption = #28216#25103'(&G)'
      object start: TMenuItem
        Caption = #24320#22987
        ShortCut = 112
        OnClick = startClick
      end
      object loadpic: TMenuItem
        Caption = #36733#20837#22270#29255
        object N11: TMenuItem
          Caption = '1'
          Checked = True
          OnClick = N11Click
        end
        object N21: TMenuItem
          Caption = '2'
          OnClick = N21Click
        end
        object N31: TMenuItem
          Caption = '3'
          OnClick = N31Click
        end
        object N41: TMenuItem
          Caption = '4'
          OnClick = N41Click
        end
      end
      object js: TMenuItem
        Caption = #32467#26463
        ShortCut = 113
        OnClick = jsClick
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object ok: TMenuItem
        Caption = #36864#20986
        ShortCut = 16472
        OnClick = okClick
      end
    end
    object H1: TMenuItem
      Caption = #24110#21161'(&H)'
      object about: TMenuItem
        Caption = #20851#20110
        ShortCut = 16449
        OnClick = aboutClick
      end
    end
  end
end