Game Zone - 1,000+ Games/GAMEZONE.BIN/Programs/Win/Arghh!/_SETUP.1/Arrghh.exe/0/RCDATA/TARRGHH/TARRGHH.txt

Text File | 1997-05-27 | 6KB | 299 lines

object Arrghh: TArrghh
  Left = 0
  Top = 0
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
  BorderStyle = bsSingle
  Caption = 'Arrghh!'
  ClientHeight = 566
  ClientWidth = 804
  Color = clNone
  Font.Color = clSilver
  Font.Height = -17
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Menu = MainMenu1
  Scaled = False
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnDragOver = FormDragOver
  OnPaint = FormPaint
  OnShow = FormShow
  PixelsPerInch = 120
  TextHeight = 20
  object Image1: TImage
    Left = 19
    Top = 106
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image2: TImage
    Left = 181
    Top = 106
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image4: TImage
    Left = 19
    Top = 268
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image5: TImage
    Left = 181
    Top = 268
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image6: TImage
    Left = 343
    Top = 268
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image7: TImage
    Left = 19
    Top = 430
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image8: TImage
    Left = 181
    Top = 430
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image9: TImage
    Left = 343
    Top = 430
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image10: TImage
    Left = 523
    Top = 106
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image11: TImage
    Left = 685
    Top = 106
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image12: TImage
    Left = 847
    Top = 106
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image13: TImage
    Left = 523
    Top = 268
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image14: TImage
    Left = 685
    Top = 268
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image15: TImage
    Left = 847
    Top = 268
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image16: TImage
    Left = 523
    Top = 430
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image17: TImage
    Left = 685
    Top = 430
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image18: TImage
    Left = 847
    Top = 430
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Image3: TImage
    Left = 343
    Top = 106
    Width = 160
    Height = 160
    OnDragOver = DragOverImage
    OnEndDrag = DropImage
    OnMouseDown = ClickImage
    OnMouseUp = ImageMouseUp
  end
  object Button11: TButton
    Left = 365
    Top = 32
    Width = 297
    Height = 25
    Caption = 'Arrghh!'
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    OnClick = Button11Click
  end
  object MainMenu1: TMainMenu
    Left = 160
    Top = 24
    object NewGame1: TMenuItem
      Caption = '&File'
      ShortCut = 0
      object NewGame: TMenuItem
        Caption = '&New Game'
        ShortCut = 0
        OnClick = NewGameClick
      end
      object N1: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Exit2: TMenuItem
        Caption = 'E&xit'
        ShortCut = 0
        OnClick = Exit2Click
      end
    end
    object Options1: TMenuItem
      Caption = '&Options'
      ShortCut = 0
      object Tiles1: TMenuItem
        Caption = '&Tiles...'
        ShortCut = 0
        OnClick = Tiles1Click
      end
      object Sound11: TMenuItem
        Caption = 'S&ound'
        ShortCut = 0
        OnClick = Sound1Click
      end
      object N2: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object SaveOptions1: TMenuItem
        Caption = '&Save Options'
        ShortCut = 0
        OnClick = SaveOptions1Click
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      ShortCut = 0
      object HelpTopics1: TMenuItem
        Caption = '&Help Topics'
        ShortCut = 0
        OnClick = HelpTopics1Click
      end
      object About1: TMenuItem
        Caption = '&About...'
        ShortCut = 0
        OnClick = About1Click
      end
    end
  end
  object OpenDialog1: TOpenDialog
    DefaultExt = 'arg'
    FileEditStyle = fsEdit
    Filter = 'Arrghh Tile Files (*.arg)|*.arg|All Files (*.*)|*.*'
    Options = [ofReadOnly, ofHideReadOnly, ofPathMustExist, ofFileMustExist]
    Title = 'Open Arrghh Tile File'
    Left = 80
    Top = 40
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 420000
    OnTimer = Timer1Timer
    Left = 120
    Top = 24
  end
end