Intermedia 1998 January/inter1_98.iso/gry/minitris/setup.exe/0/RCDATA/TWELCOMEFORM/TWELCOMEFORM.txt

Text File | 1997-07-23 | 13KB | 456 lines

object WelcomeForm: TWelcomeForm
  Left = 254
  Top = 304
  BorderStyle = bsDialog
  Caption = 'UCI Installer'
  ClientHeight = 254
  ClientWidth = 415
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnActivate = FormActivate
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Image1: TImage
    Left = 8
    Top = 8
    Width = 57
    Height = 57
    Picture.Data = {<image000.bmp>}
  end
  object PageControl1: TPageControl
    Left = 96
    Top = 8
    Width = 313
    Height = 238
    ActivePage = License
    TabOrder = 0
    OnChange = PageControl1Change
    object Welcome: TTabSheet
      Caption = 'Welcome'
      object Label4: TLabel
        Left = 15
        Top = 147
        Width = 254
        Height = 29
        Caption =
          'WARNING: This program is protected by copyright law and internat' +
          'ional treaties.'
        WordWrap = True
      end
      object Label3: TLabel
        Left = 15
        Top = 84
        Width = 261
        Height = 57
        Caption =
          'It is strongly recommended that you exit all Windows programs be' +
          'fore running this Setup program. Click cancel to quit this Setup' +
          ' program, click Next to Continue with Setup.'
        WordWrap = True
      end
      object Label2: TLabel
        Left = 15
        Top = 48
        Width = 269
        Height = 26
        Caption =
          'Welcome to the Minitris Setup program. This program will install' +
          ' Minitris on your computer.'
        WordWrap = True
      end
      object Label1: TLabel
        Left = 15
        Top = 21
        Width = 157
        Height = 16
        Caption = 'Minitris Setup Program'
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Button1: TButton
        Left = 227
        Top = 183
        Width = 75
        Height = 25
        Caption = '>> Next >>'
        TabOrder = 0
        OnClick = Button1Click
      end
    end
    object License: TTabSheet
      Caption = 'License Agreement'
      object Label5: TLabel
        Left = 8
        Top = 6
        Width = 134
        Height = 16
        Caption = 'License Agreement'
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label6: TLabel
        Left = 8
        Top = 135
        Width = 271
        Height = 39
        Caption =
          'Do you accept all the terms of the preceeding License Agreement?' +
          ' If you choose No, Setup will close. To install Minitris, you mu' +
          'st accept this agreement.'
        WordWrap = True
      end
      object Button3: TButton
        Left = 227
        Top = 183
        Width = 75
        Height = 25
        Caption = 'Yes'
        TabOrder = 0
        OnClick = Button3Click
      end
      object Button7: TButton
        Left = 145
        Top = 183
        Width = 75
        Height = 25
        Caption = 'No'
        TabOrder = 1
        OnClick = Button7Click
      end
      object Memo1: TMemo
        Left = 8
        Top = 27
        Width = 287
        Height = 106
        Lines.Strings = (
          'Minitris 2.02'
          '� Copyright 1994, 1995, 1996, 1997 by Ursiny '
          'Communications, Inc.'
          'All Rights Reserved.'
          ''
          'License Agreement'
          'Please read the following terms and conditions carefully '
          'before using Minitris 2.02. By installing, copying, or '
          'otherwise using Minitris 2.02, you agree to be bound by '
          'the terms of this license agreement and warranty.'
          ''
          'Registration'
          'Minitris 2.02 is not free software.  You are hereby '
          'licensed '
          'to use this software for evaluation purposes without '
          'charge for a period of 45 games.  If you use this '
          'software after the 45 game evaluation period a '
          'registration fee of $12 is required.  Payments must be in '
          'US dollars drawn on a US bank.'
          ''
          'Unregistered use of Minitris 2.02 after the 45-game '
          'evaluation period is in violation of U.S. and international '
          'copyright laws. Minitris 2.02 is protected by copyright '
          'laws '
          'and international copyright treaties, as well as other '
          'intellectual property laws and treaties. Minitris 2.02 is '
          'licensed, not sold.'
          ''
          'Registered Version'
          'One registered copy of Minitris 2.02 may either be used '
          'by a single person on one or more computers, or '
          'installed on a single workstation used '
          'non-simultaneously by multiple people, but not both.'
          ''
          'DISCLAIMER OF WARRANTY'
          'UCI EXPRESSLY DISCLAIMS ANY WARRANTY FOR '
          'THE MINITRIS 2.02. THE MINITRIS 2.02 AND ANY '
          'RELATED DOCUMENTATION IS PROVIDED "AS IS" '
          'WITHOUT WARRANTY OF ANY KIND, EITHER '
          'EXPRESS OR IMPLIED, INCLUDING, WITHOUT '
          'LIMITATION, THE IMPLIED WARRANTIES OR '
          'MERCHANTABILITY, FITNESS FOR A PARTICULAR '
          'PURPOSE, OR NONINFRINGEMENT. THE ENTIRE '
          'RISK ARISING OUT OF USE OR PERFORMANCE OF '
          'THE MINITRIS 2.02 REMAINS WITH YOU.'
          ''
          'IN NO EVENT SHALL UCI OR ANYONE ELSE WHO '
          'HAS BEEN INVOLVED IN THE CREATION, '
          'PRODUCTION, OR DELIVERY OF THIS SOFTWARE '
          'BE LIABLE FOR ANY DAMAGES WHATSOEVER '
          '(INCLUDING, WITHOUT LIMITATION, DAMAGES '
          'FOR LOSS OF BUSINESS PROFITS, BUSINESS '
          'INTERRUPTION, OR LOSS OF BUSINESS '
          'INFORMATION) ARISING OUT OF THE USE OF OR '
          'INABILITY TO USE THIS UCI PRODUCT, EVEN IF '
          'UCI HAS BEEN ADVISED OF THE POSSIBILITY OF '
          'SUCH DAMAGES. BECAUSE SOME '
          'STATES/JURISDICTIONS DO NOT ALLOW THE '
          'EXCLUSION OR LIMITATION OF LIABILITY FOR '
          'CONSEQUENTIAL OR INCIDENTAL DAMAGES, THE '
          'ABOVE LIMITATION MAY NOT APPLY TO YOU.'
          ''
          'Distribution'
          'You may reproduce and distribute an unlimited number '
          'of copies of the original unregistered shareware version '
          'of Minitris 2.02 provided that each copy shall be a true '
          'and complete copy of the original (compressed) '
          'shareware version, including all copyright and trademark '
          'notices.'
          ''
          'Governing Law'
          'This license agreement is governed by the laws of the '
          'State of Vermont.'
          ''
          '')
        ReadOnly = True
        ScrollBars = ssVertical
        TabOrder = 2
      end
    end
    object Directory: TTabSheet
      Caption = 'Directory'
      object Label7: TLabel
        Left = 10
        Top = 11
        Width = 180
        Height = 16
        Caption = 'Minitris Directory Location'
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label8: TLabel
        Left = 10
        Top = 34
        Width = 228
        Height = 13
        Caption = 'Setup will install Minitris in the following directory.'
      end
      object Label9: TLabel
        Left = 10
        Top = 118
        Width = 248
        Height = 13
        Caption = 'To install to this directory (recommended), click Next.'
        WordWrap = True
      end
      object Label10: TLabel
        Left = 10
        Top = 134
        Width = 280
        Height = 30
        Caption =
          'To install to a different directory, click Browse and select ano' +
          'ther directory, or just type the path into the box above.'
        WordWrap = True
      end
      object Label11: TLabel
        Left = 10
        Top = 163
        Width = 194
        Height = 13
        Caption = 'To install to default directory, click Reset.'
        WordWrap = True
      end
      object Button4: TButton
        Left = 227
        Top = 183
        Width = 75
        Height = 25
        Caption = '>> Next >>'
        TabOrder = 0
        OnClick = Button4Click
      end
      object Button8: TButton
        Left = 145
        Top = 183
        Width = 75
        Height = 25
        Caption = '<< Back <<'
        TabOrder = 1
        OnClick = Button8Click
      end
      object Edit1: TEdit
        Left = 10
        Top = 57
        Width = 285
        Height = 21
        TabOrder = 2
        Text = 'C:\Program Files\Ursiny\Minitris 2.02'
      end
      object Button11: TButton
        Left = 220
        Top = 87
        Width = 75
        Height = 25
        Caption = 'Browse'
        TabOrder = 3
        OnClick = Button11Click
      end
      object Button12: TButton
        Left = 137
        Top = 87
        Width = 75
        Height = 25
        Caption = 'Reset'
        TabOrder = 4
        OnClick = Button12Click
      end
    end
    object Copying: TTabSheet
      Caption = 'Copying'
      object Label12: TLabel
        Left = 10
        Top = 11
        Width = 96
        Height = 16
        Caption = 'Copying Files'
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label13: TLabel
        Left = 10
        Top = 34
        Width = 169
        Height = 26
        Caption =
          'Setup will now install Minitris files. Click the button below to' +
          ' start.'
        WordWrap = True
      end
      object Label14: TLabel
        Left = 10
        Top = 141
        Width = 282
        Height = 36
        Caption = 'Copying...'
        Visible = False
        WordWrap = True
      end
      object Button9: TButton
        Left = 227
        Top = 183
        Width = 75
        Height = 25
        Caption = '<< Back <<'
        TabOrder = 0
        OnClick = Button9Click
      end
      object PBar: TProgressBar
        Left = 10
        Top = 119
        Width = 284
        Height = 16
        Min = 0
        Max = 100
        Step = 1
        TabOrder = 1
      end
      object Button5: TButton
        Left = 10
        Top = 83
        Width = 75
        Height = 25
        Caption = 'Start Copying'
        TabOrder = 2
        OnClick = Button5Click
      end
    end
    object Finish: TTabSheet
      Caption = 'Finish'
      object Label15: TLabel
        Left = 10
        Top = 11
        Width = 159
        Height = 16
        Caption = 'Installation Completed!'
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label16: TLabel
        Left = 10
        Top = 186
        Width = 150
        Height = 13
        Caption = 'Visit us on the web (click here) !'
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        OnClick = Label16Click
        OnMouseMove = Label16MouseMove
      end
      object Button6: TButton
        Left = 227
        Top = 183
        Width = 75
        Height = 25
        Caption = 'Close'
        TabOrder = 0
        OnClick = Button6Click
      end
      object Memo2: TMemo
        Left = 10
        Top = 35
        Width = 290
        Height = 127
        BorderStyle = bsNone
        Color = clBtnFace
        Ctl3D = False
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Lines.Strings = (
          'Minitris succesfully installed!'
          ''
          'Shortcut created in [START] menu...'
          '       ...click Start -> Programs -> Minitris'
          ''
          'Shortcut on your desktop created...'
          '       ...double-click on Minitris icon.'
          ''
          'Thank you for playing Minitris !')
        ParentCtl3D = False
        ParentFont = False
        ReadOnly = True
        TabOrder = 1
      end
    end
  end
  object Button2: TButton
    Left = 8
    Top = 221
    Width = 75
    Height = 25
    Caption = 'Cancel'
    TabOrder = 1
    OnClick = Button2Click
  end
  object ShellLink1: TShellLink
    HotKey = 0
    ShowCmd = 1
    IconNumber = 0
    Update = True
    Left = 11
    Top = 181
  end
end