Chip 1999 June/Chip_1999-06_cd.bin/tema/Diadema/Demo/setup.exe/Pantheon.csy/RCDATA/TSETUPMAINFORM/TSETUPMAINFORM.txt

Text File | 1999-04-22 | 17.6 KB | 562 lines

object SetupMainForm: TSetupMainForm
  Left = 220
  Top = 116
  BorderStyle = bsDialog
  Caption = 'Instalace programu Pantheon '#39'98'
  ClientHeight = 311
  ClientWidth = 491
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 14
    Top = 264
    Width = 459
    Height = 7
    Shape = bsTopLine
  end
  object ZpetBtn: TButton
    Left = 232
    Top = 275
    Width = 75
    Height = 25
    Caption = '< &Zp�t'
    TabOrder = 0
  end
  object DalsiBtn: TButton
    Left = 307
    Top = 275
    Width = 75
    Height = 25
    Caption = 'Dal�� >'
    Default = True
    TabOrder = 1
  end
  object StornoBtn: TButton
    Left = 400
    Top = 275
    Width = 75
    Height = 25
    Cancel = True
    Caption = 'Storno'
    TabOrder = 2
    OnClick = StornoBtnClick
  end
  object BigPanel: TPanel
    Left = 11
    Top = 16
    Width = 468
    Height = 233
    BevelOuter = bvNone
    Caption = 'BigPanel'
    TabOrder = 3
    object CenterPanel: TPanel
      Left = 0
      Top = 37
      Width = 468
      Height = 165
      Align = alClient
      BevelOuter = bvNone
      Caption = 'Panel1'
      TabOrder = 0
      object Notebook: TNotebook
        Left = 0
        Top = 0
        Width = 468
        Height = 165
        Align = alClient
        PageIndex = 3
        TabOrder = 0
        OnPageChanged = NotebookPageChanged
        object TPage
          Left = 0
          Top = 0
          Caption = 'prvni'
          object RecommendLabel: TLabel
            Left = 8
            Top = 63
            Width = 338
            Height = 52
            AutoSize = False
            Caption =
              'Pokud m�te spu�t�n� jin� aplikace, pros�m zav�ete je, aby se p�e' +
              'de�lo probl�m�m p�i instalaci.'
            WordWrap = True
          end
          object WelcomeLabel: TLabel
            Left = 8
            Top = 8
            Width = 338
            Height = 39
            AutoSize = False
            Caption =
              'V�tejte v instal�toru programu Pantheon '#39'98. Nyn� se nainstaluje' +
              ' aplikace Pantheon '#39'98 na V� po��ta�.'
            WordWrap = True
          end
          object Memo1: TMemo
            Left = 8
            Top = 126
            Width = 338
            Height = 92
            BorderStyle = bsNone
            Color = clBtnFace
            Lines.Strings = (
              'Varov�n�: Tento program je chr�n�n autorsk�m z�konem a '
              'mezin�rodn�mi �mluvami. Neautorizovan� reprodukce a distribuce '

                'tohoto programu nebo jak�koliv jeho ��sti m� za n�sledek ud�len�' +
                ' '
              'p��sn�ch trest� a bude soudn� st�h�na podle z�kona v maxim�ln�m '
              'mo�n�m rozsahu.')
            ReadOnly = True
            TabOrder = 0
          end
        end
        object TPage
          Left = 0
          Top = 0
          Caption = 'nulta'
          object LicenceMemo: TMemo
            Left = 0
            Top = 0
            Width = 468
            Height = 165
            Align = alClient
            Color = clBtnFace
            Lines.Strings = (
              'Pantheon '#39'98'
              '� 1998 Diadema Software'
              'V�echna pr�va vyhrazena'
              ''
              'LICEN�N�  UJEDN�N�'
              ''
              'V�eobecn� ustanoven�:'
              ''

                'I. P�edm�tem t�to smlouvy je poskytnut� pr�v k softwarov�mu prod' +
                'uktu v�etn� dokumentace '

                '(d�le jen SOFTWARE), a to nez�visle na typu distribu�n�ho m�dia.' +
                ' Podle t�to smlouvy '

                'z�sk�v�te pr�vo u��vat SOFTWARE po dobu platnosti t�to smlouvy p' +
                'odle d�le uveden�ch '

                'ustanoven�. POZOR! Po��ta�ov� programy, na n� se tato smlouva v' +
                'ztahuje, jsou autorsk�mi '
              'd�ly chr�n�n�mi ustanoven�mi autorsk�ho z�kona.'
              ''
              'II. Opr�vn�n�, kter� touto smlouvou z�sk�v�te:'

                'a) Provozovat SOFTWARE tak dlouho, dokud budete respektovat podm' +
                '�nky t�to smlouvy na '

                'jednom po��ta�i nebo pracovn� stanici, tj. s jedinou CPU pro jed' +
                'nu licenci SOFTWARE.'

                'b) Pr�vo na dod�vku nov� verze SOFTWARE (UPGRADE) za sn�en� cen' +
                'y, poradenskou '

                'slu�bu a p��padn� zas�l�n� informac� o dal��ch produktech v�robc' +
                'e. Tento n�rok vznik� pouze '
              'pro ��dn� registrovan� u�ivatele.'

                'c) Po��dit si rozmno�eniny SOFTWARE je dovoleno, pot�ebujete-li ' +
                'tyto rozmno�eniny pro '

                'vlastn� provoz programu na po��ta��ch podle bodu a) uveden�ho v�' +
                '�e za ��elem vykon�v�n� '

                'funkc� programu, a d�le pro archivn� ��ely, pop��pad� k nahrazen' +
                '� opr�vn�n� z�skan� '

                'rozmno�eniny, kter� byla ztracena nebo zni�ena nebo jinak znehod' +
                'nocena.'
              ''
              'III. Jedn�n�, kter� je zejm�na zak�z�no:'

                'a) instalovat SOFTWARE na v�ce po��ta�� sou�asn� ne� je dovoleno' +
                ' v t�to smlouv�,'

                'b) po�izovat rozmno�eniny SOFTWARE s v�jimkou p��pad� uveden�ch ' +
                'v t�to smlouv� a d�le '

                'je ���it. V p��pad�, �e si po��d�te jak�koliv dal�� rozmno�eniny' +
                '  SOFTWARE, vyjma p��pad� '

                'uveden�ch v t�to smlouv�, berete na v�dom�, �e poru�ujete autors' +
                'k� pr�va v�robce, pokud '

                'neprok�ete, �e takov�to dal�� rozmno�eniny pou��v�te v�hradn� p' +
                'ro ��ely v�slovn� '
              'povolen� v autorsk�m z�kon�.'

                'c) Jak�mkoliv zp�sobem SOFTWARE analyzovat, m�nit, p�ekl�dat jej' +
                ' do jin�ch '

                'programovac�ch �i n�rodn�ch jazyk� nebo do zdrojov�ho tvaru nebo' +
                ' do tvaru assembler, '

                'zahrnout jej do jin�ho software a ���it produkty takto vznikl�, ' +
                'odvozen� od p�vodn�ho '

                'SOFTWARE a jakkoliv jinak zasahovat do vnit�n� struktury SOFTWAR' +
                'E, s v�jimkou p��pad� '

                'uveden�ch v t�to smlouv� anebo v�slovn� povolen�ch autorsk�m z�k' +
                'onem.'

                'd) P�j�ovat, pronaj�mat, p�ev�d�t z�skan� opr�vn�n� �i jin�m nep' +
                'ovolen�m zp�sobem '
              'nakl�dat se  SOFTWARE.'
              ''
              'IV. Odpov�dnost v�robce'

                'V�robce poskytuje 6 m�s��n� z�ruku na provoz SOFTWARE v souladu ' +
                's u�ivatelskou '

                'dokumentac�. Odpov�dnosti za vady se v�robce m��e zbavit bezplat' +
                'n�m zasl�n�m opraven� '

                'verze u�ivateli. V�robce neru�� za �kody vznikl� nespr�vn�m prov' +
                'ozov�n�m SOFTWARE v '

                'rozporu s podm�nkami, uveden�mi v u�ivatelsk� dokumentaci. V p��' +
                'pad� jak�koliv �kody '

                'vznikl� u�ivateli nebo t�et� osob� p��mo nebo nep��mo na z�klad�' +
                ' pou��v�n� softwarov�ho '

                'produktu, je p��padn� odpov�dnost v�robce za tuto �kodu v�slovn�' +
                ' podm�n�n� jeho '

                'zavin�n�m, a p��padn� v��e n�hrady �kody v ��dn�m p��pad� nep�es' +
                '�hne smluvn� pokutu ve '
              'v��i ceny programov�ho produktu.'
              ''
              'V. Doba platnosti smlouvy'

                'Smlouva z�st�v� v platnosti, pokud neporu��te smluvn� podm�nky. ' +
                'Platnosti smlouva pozb�v� '

                'automaticky, ani� by v�robce musel smlouvu vypov�d�t, okam�ikem,' +
                ' kdy u�in�te cokoliv v '

                'rozporu s ustanoven�mi t�to smlouvy. Tato smlouva rovn� pozb�v�' +
                ' platnosti okam�ikem, kdy '

                'po dod�n� nov� verze SOFTWARE (UPGRADE) vstoup� v platnost licen' +
                '�n� ujedn�n� na tuto '

                'novou verzi SOFTWARE mezi V�mi a v�robcem. V okam�iku, kdy skon�' +
                '� platnost t�to '

                'smlouvy, jste povinen(a) p�estat SOFTWARE d�le jakkoliv pou��vat' +
                '.')
            ReadOnly = True
            ScrollBars = ssVertical
            TabOrder = 0
          end
        end
        object TPage
          Left = 0
          Top = 0
          Caption = 'druha'
          object Label2: TLabel
            Left = 8
            Top = 8
            Width = 338
            Height = 33
            AutoSize = False
            Caption =
              'Vyberte adres��, do kter�ho chcete nainstalovat program Pantheon' +
              ' '#39'98.'
            WordWrap = True
          end
          object PathEditLabel: TLabel
            Left = 8
            Top = 120
            Width = 109
            Height = 13
            Caption = '&Instalovat do adres��e:'
            FocusControl = DirectoryEdit
          end
          object Label1: TLabel
            Left = 8
            Top = 48
            Width = 338
            Height = 57
            AutoSize = False
            Caption =
              'Pokud chcete program instalovat do nab�dnut�ho adres��e stiskn�t' +
              'e tla��tko "Dal��". Pokud chcete instalovat do jin�ho adres��e s' +
              'tiskn�te tla��tko "Proch�zet".'
            WordWrap = True
          end
          object DirectoryEdit: TEdit
            Left = 8
            Top = 136
            Width = 338
            Height = 21
            TabOrder = 0
            Text = 'DirectoryEdit'
          end
          object BrowseBtn: TButton
            Left = 8
            Top = 168
            Width = 75
            Height = 25
            Caption = '&Proch�zet'
            TabOrder = 1
            OnClick = BrowseBtnClick
          end
        end
        object TPage
          Left = 0
          Top = 0
          Caption = 'treti'
          object UzivatelskeJmenoLbl: TLabel
            Left = 8
            Top = 104
            Width = 79
            Height = 13
            Caption = '&Jm�no u�ivatele:'
            FocusControl = UzivatelskeJmenoEdit
          end
          object SerioveCisloLabel: TLabel
            Left = 8
            Top = 136
            Width = 64
            Height = 13
            Caption = '&S�riov� ��slo:'
          end
          object Label3: TLabel
            Left = 8
            Top = 8
            Width = 338
            Height = 81
            AutoSize = False
            Caption = 'Pro registraci zadejte va�e jm�no a s�riov� ��slo programu.'
            WordWrap = True
          end
          object UzivatelskeJmenoEdit: TEdit
            Left = 104
            Top = 96
            Width = 233
            Height = 21
            TabOrder = 0
          end
          object SerioveCisloEdit: TMaskEdit
            Left = 104
            Top = 128
            Width = 233
            Height = 22
            EditMask = '000\-000\-0000;0;_'
            Font.Charset = EASTEUROPE_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Courier'
            Font.Style = []
            MaxLength = 12
            ParentFont = False
            TabOrder = 1
            OnEnter = SerioveCisloEditEnter
          end
        end
        object TPage
          Left = 0
          Top = 0
          Caption = 'sesta'
          object Label7: TLabel
            Left = 8
            Top = 8
            Width = 338
            Height = 41
            AutoSize = False
            Caption =
              'Vyberte typ instalace. Pln� instalace nainstaluje program i s da' +
              'ty. Instalace pracovn� stanice nainstaluje pouze program.'
            WordWrap = True
          end
          object ServerRBtn: TRadioButton
            Left = 32
            Top = 120
            Width = 257
            Height = 17
            Caption = 'Pln� instalace (program s datov�mi soubory)'
            Checked = True
            TabOrder = 0
            TabStop = True
            OnClick = ServerRBtnClick
          end
          object KlientRBtn: TRadioButton
            Left = 32
            Top = 144
            Width = 257
            Height = 17
            Caption = 'Pracovn� stanice / aktualizace (pouze program)'
            TabOrder = 1
            OnClick = KlientRBtnClick
          end
        end
        object TPage
          Left = 0
          Top = 0
          Caption = 'ctvrta'
          object Label4: TLabel
            Left = 8
            Top = 8
            Width = 338
            Height = 89
            AutoSize = False
            Caption =
              'Nyn� m� instal�tor dostatek informac� pro zah�jen� instalace. Po' +
              'kud si chcete zadan� nastaven� prohl�dnout nebo jej zm�nit, stis' +
              'kn�te tla��tko "Zp�t". Pokud V�m nastaven� vyhovuje, stiskn�te t' +
              'la��tko "Dokon�it" a instalace bude zah�jena.'
            WordWrap = True
          end
        end
        object TPage
          Left = 0
          Top = 0
          Caption = 'pata'
        end
      end
      object LeftPanel: TPanel
        Left = 0
        Top = 0
        Width = 0
        Height = 165
        Align = alLeft
        BevelOuter = bvNone
        BorderStyle = bsSingle
        Caption = 'Panel2'
        TabOrder = 1
        object Image1: TImage
          Left = 0
          Top = 0
          Width = 115
          Height = 229
          Align = alClient
          Picture.Data = {<image000.bmp>}
        end
      end
    end
    object BottomPanel: TPanel
      Left = 0
      Top = 202
      Width = 468
      Height = 31
      Align = alBottom
      BevelOuter = bvNone
      TabOrder = 1
      object Label5: TLabel
        Left = 0
        Top = 5
        Width = 468
        Height = 26
        Align = alBottom
        Caption =
          'Souhlas�te se v�emi po�adavky p�edchoz�ho licen�n�ho ujedn�n�? K' +
          'lepnete-li na Ne, instalace skon��. Chcete-li v instalaci pokra�' +
          'ovat, mus�te souhlasit.'
        WordWrap = True
      end
    end
    object TopPanel: TPanel
      Left = 0
      Top = 0
      Width = 468
      Height = 37
      Align = alTop
      BevelOuter = bvNone
      TabOrder = 2
      object Label6: TLabel
        Left = 48
        Top = 0
        Width = 420
        Height = 37
        Align = alRight
        AutoSize = False
        Caption =
          'P�e�t�te si, pros�m, n�sleduj�c� licen�n� ujedn�n�. Zbytek textu' +
          ' uvid�te po stisku kl�vesy PAGE DOWN.'
        WordWrap = True
      end
      object InstallIcon: TImage
        Left = 0
        Top = 0
        Width = 32
        Height = 32
        AutoSize = True
        Picture.Data = {<image001.ico>}
      end
    end
  end
  object PageManager: TPageManager
    PageOwner = Notebook
    NextBtn = DalsiBtn
    PriorBtn = ZpetBtn
    Left = 184
    Top = 272
    object PageProxy1: TPageProxy
      PageName = 'prvni'
      OnLeave = PageProxy1Leave
    end
    object PageProxy5: TPageProxy
      PageName = 'nulta'
    end
    object PageProxy2: TPageProxy
      PageName = 'druha'
      OnLeave = PageProxy2Leave
    end
    object PageProxy3: TPageProxy
      PageName = 'treti'
      OnLeave = PageProxy3Leave
      OnShow = PageProxy3Show
    end
    object PageProxy7: TPageProxy
      PageName = 'sesta'
    end
    object PageProxy4: TPageProxy
      PageName = 'ctvrta'
      OnLeave = PageProxy4Leave
    end
    object PageProxy6: TPageProxy
      PageName = 'pata'
    end
  end
  object CabinetReader: TCabinetReader
    CpuType = cptAuto
    FileSupport = False
    OnCopyFile = CabinetReaderCopyFile
    OnCloseCopiedFile = CabinetReaderCloseCopiedFile
    FileHandler = EXECabinetFileHandler
    Left = 32
    Top = 272
  end
  object EXECabinetFileHandler: TEXECabinetFileHandler
    OnChangeVolume = EXECabinetFileHandlerChangeVolume
    Left = 128
    Top = 272
  end
  object FileVersions: TStrHolder
    Left = 80
    Top = 272
    StrData = (
      ''
      'CABINET.DLL=1.00.601.0'
      'COMCTL32.DLL=4.72.2106.4'
      'MSVCRT.DLL=5.0.0.7128')
  end
end