home *** CD-ROM | disk | FTP | other *** search
- object Help: THelp
- Left = 105
- Top = 14
- Width = 529
- Height = 469
- VertScrollBar.Range = 1650
- VertScrollBar.Position = 1208
- ActiveControl = GroupBox1
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsDialog
- Caption = 'N�pov�da programu ��astn�ch deset'
- Color = clBlack
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- Position = poScreenCenter
- OnResize = FormResize
- PixelsPerInch = 96
- TextHeight = 13
- object GroupBox1: TGroupBox
- Left = 0
- Top = -1208
- Width = 505
- Height = 545
- Caption = ' Popis z�kladn�ho okna programu '
- Color = 3199788
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- PopupMenu = PopupMenu1
- TabOrder = 0
- object Image1: TImage
- Left = 8
- Top = 200
- Width = 488
- Height = 345
- Picture.Data = {<image001.bmp>}
- PopupMenu = PopupMenu1
- end
- object Label1: TLabel
- Left = 8
- Top = 184
- Width = 63
- Height = 16
- Caption = 'Obr�zek:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Memo1: TMemo
- Left = 8
- Top = 40
- Width = 489
- Height = 137
- Cursor = crArrow
- DragCursor = crArrow
- DragMode = dmAutomatic
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Lines.Strings = (
-
- 'Ve vrchn� ��sti vid�me 10 pol��ek - v t�ch se po kliknut� na "St' +
- 'art" (Reset a Start) '
-
- 'budou zobrazovat n�hodn� ��sla, kter� se budou m�nit tak dlouho,' +
- ' dokud je '
-
- 'nezastav�me manu�ln� (ru�n�) nebo dokud se nezastav� automaticky' +
- '. To bude '
-
- 'z�le�et na na�� volb� v poli "Zastavit ��sla". Pokud jsme nasta' +
- 'vili manu�ln�, '
-
- 'zastav�me losov�n� kliknut�m na tla��tko "Stop". Pokud jsme nast' +
- 'avili automaticky, '
-
- 'mus�me po�kat, a� se indik�tor (pod pol��ky) zapln� barvami - pa' +
- 'k se ��sla zastav� '
-
- 'a se�ad� podle velikosti (pokud jsme si tuto volbu vybrali v men' +
- 'u '
- 'N�stroje\Mo�nosti). ')
- ParentFont = False
- PopupMenu = PopupMenu1
- ReadOnly = True
- TabOrder = 0
- end
- end
- object GroupBox6: TGroupBox
- Left = 0
- Top = -660
- Width = 505
- Height = 645
- Caption = ' Co je to S�zenka '
- Color = 3199788
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- PopupMenu = PopupMenu1
- TabOrder = 1
- object Image6: TImage
- Left = 88
- Top = 192
- Width = 329
- Height = 457
- Picture.Data = {<image002.bmp>}
- PopupMenu = PopupMenu1
- end
- object Label11: TLabel
- Left = 8
- Top = 184
- Width = 63
- Height = 16
- Caption = 'Obr�zek:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Memo7: TMemo
- Left = 8
- Top = 40
- Width = 489
- Height = 137
- Cursor = crArrow
- DragCursor = crArrow
- DragMode = dmAutomatic
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Lines.Strings = (
-
- 'S�zenka je �lut� karti�ka, do kter� se zapisuj� ��sla na kter� c' +
- 'hcete vsadit, v��e '
-
- 'vkladu, po�et losov�n� atd. Je podobn� obr�zku pod t�mto textem.' +
- ' S�zenka, kter� '
-
- 'je na tomto obr�zku se objev� tehdy, kdy� kliknete na tla��tko "' +
- 'S�zenka" ve '
-
- 'spodn� ��sti z�kladn�ho okna tohoto programu. Kdy� na S�zence kl' +
- 'iknete na '
-
- 'tla��tko "Vyplnit", tak se na ni za�krtnou ��sla, vylosovan� v p' +
- 'ol��c�ch (pokud '
- '��dn� nejsou, S�zenka se nevypln�) a tak� jejich po�et - v menu '
-
- 'N�stroje\Mo�nosti si m��ete nastavit, aby se vypl�ovala automati' +
- 'cky. V��e '
- 'vkladu na S�zence nem� ��dnou funkci.')
- ParentFont = False
- PopupMenu = PopupMenu1
- ReadOnly = True
- TabOrder = 0
- end
- end
- object GroupBox7: TGroupBox
- Left = 0
- Top = -4
- Width = 505
- Height = 445
- Caption = ' Co je to Tabulka '
- Color = 3199788
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- PopupMenu = PopupMenu1
- TabOrder = 2
- object Image7: TImage
- Left = 8
- Top = 168
- Width = 489
- Height = 273
- Picture.Data = {<image003.bmp>}
- PopupMenu = PopupMenu1
- end
- object Label12: TLabel
- Left = 8
- Top = 144
- Width = 63
- Height = 16
- Caption = 'Obr�zek:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label13: TLabel
- Left = 72
- Top = 145
- Width = 187
- Height = 13
- Caption = '(pro svou velikost nen� zobrazen �pln�)'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Memo8: TMemo
- Left = 8
- Top = 40
- Width = 489
- Height = 89
- Cursor = crArrow
- DragCursor = crArrow
- DragMode = dmAutomatic
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Lines.Strings = (
-
- 'Tabulku m��ete tak� naj�t na ka�d� S�zence (pap�rov�). D�ky n� s' +
- 'i m��eme sami '
-
- 'zjistit v��i na�� v�hry. Dosa�en� v�hra je n�sobkem vkladu a ��s' +
- 'la uveden�ho v '
-
- 'tabulce v z�vislosti na po�tu tipovan�ch ��sel a uhodnut�ch ��se' +
- 'l. P��klad: p�i '
-
- 'vkladu 20,- K�, po�tu deseti tipovan�ch ��sel a uhodnut�ch dev�t' +
- 'i ��sel z�sk�te '
- 'v�hru 10.000 x 20,- K�, to je 200.000,- K�.')
- ParentFont = False
- PopupMenu = PopupMenu1
- ReadOnly = True
- TabOrder = 0
- end
- end
- object PopupMenu1: TPopupMenu
- Left = 464
- Top = 220
- object Zavt1: TMenuItem
- Caption = 'Zav��t'
- OnClick = Zavt1Click
- end
- end
- end
-