home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2003 May
/
PCWorld_2003-05_cd.bin
/
Akce
/
autoskola.exe
/
AUTOSKOL.LZH
/
AUTOSKOL.EXE
/
0
/
RCDATA
/
TINFORMACEFORM
/
TINFORMACEFORM.txt
Wrap
Text File
|
2003-03-26
|
20KB
|
788 lines
object InformaceForm: TInformaceForm
Left = 237
Top = 125
Hint = 'SMS br�na do v�ech s�t� www.sms.smessage.cz'
BorderStyle = bsDialog
Caption = 'Auto�kola'
ClientHeight = 446
ClientWidth = 513
Color = clWhite
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'Times New Roman'
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 17
object Label1: TLabel
Left = 7
Top = 208
Width = 497
Height = 48
Alignment = taCenter
AutoSize = False
Caption =
'Cena druh� ��sti akt.kl��e k pln� verzi programu je v dob� vyd�n' +
'� tohoto dema 100 K�. Aktiva�n� kl�� obdr��te na z�klad� objedn�' +
'vky na dob�rku. '
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
WordWrap = True
end
object Label3: TLabel
Left = 7
Top = 3
Width = 497
Height = 46
Alignment = taCenter
AutoSize = False
Caption =
'Tato demonstra�n� verze programu umo��uje p��stup pouze k 70 tes' +
'tov�m ot�zk�m. P��stup ke v�em 757 ot�zk�m z�sk�te a� po vlo�en�' +
' druh� ��sti aktiva�n�ho kl��e. Sou�asn� z�sk�te p��stup i k dal' +
'��m 261 ot�zk�m, kter� v�bec v u�ebnic�ch nenajdete. '
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
WordWrap = True
end
object Label11: TLabel
Left = 138
Top = 323
Width = 93
Height = 17
Caption = 'Tom� Holubec'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 138
Top = 339
Width = 49
Height = 17
Caption = '�st� 116'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
object Label13: TLabel
Left = 138
Top = 355
Width = 38
Height = 17
Caption = 'Vset�n'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
object Label14: TLabel
Left = 90
Top = 355
Width = 39
Height = 17
Caption = '755 01'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
object Label15: TLabel
Left = 269
Top = 372
Width = 154
Height = 17
Caption = 'http://autoskola.holubec.cz'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clBlue
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
object Label17: TLabel
Left = 138
Top = 389
Width = 98
Height = 17
Caption = 'info@holubec.cz'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clBlue
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
Visible = False
end
object Label19: TLabel
Left = 102
Top = 373
Width = 29
Height = 17
Caption = 'I�O:'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
object Label20: TLabel
Left = 138
Top = 373
Width = 56
Height = 17
Caption = '68152833'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 104
Top = 80
Width = 4
Height = 17
end
object Label2: TLabel
Left = 192
Top = 142
Width = 5
Height = 17
Caption = '-'
end
object Label22: TLabel
Left = 20
Top = 161
Width = 244
Height = 19
Caption = 'Zde vlo�te druhou ��st aktiva�n�ho kl��e:'
Color = clWhite
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label6: TLabel
Left = 7
Top = 95
Width = 497
Height = 44
Alignment = taCenter
AutoSize = False
Caption =
'Pokud chcete na tomto po��ta�i pou��vat plnou verzi, zapi�te si ' +
'prvn� ��st kl��e. Budete ji pot�ebovat p�i objedn�vce. Pokud chc' +
'ete program pou��vat na jin�m po��ta�i, spus�te na n�m nejprve t' +
'oto demo a opi�te si z n�j prvn� ��st kl��e.'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
WordWrap = True
end
object Label10: TLabel
Left = 10
Top = 70
Width = 492
Height = 17
Alignment = taCenter
AutoSize = False
Caption = 'Label10'
Color = clWhite
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = 'Times New Roman CE'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Label21: TLabel
Left = 50
Top = 49
Width = 410
Height = 17
Alignment = taCenter
Caption =
'Prvn� ��st aktiva�n�ho kl��e k pou��v�n� programu na tomto po��t' +
'a�i je:'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
object Label24: TLabel
Left = 8
Top = 238
Width = 497
Height = 27
Alignment = taCenter
AutoSize = False
Caption =
'Druhou ��st aktiva�n�ho kl��e z�sk�te tak� v ka�d� dobr� auto�ko' +
'le. '
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
WordWrap = True
end
object Label23: TLabel
Left = 261
Top = 323
Width = 73
Height = 17
Caption = 'Objedn�vky:'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
object Label18: TLabel
Left = 269
Top = 339
Width = 118
Height = 17
Caption = 'obchod@holubec.cz'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clBlue
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
object Label25: TLabel
Left = 92
Top = 389
Width = 39
Height = 17
Caption = 'e-mail:'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
Visible = False
end
object Label28: TLabel
Left = 85
Top = 252
Width = 342
Height = 17
Caption = '!!! Sou��st� objedn�vky mus� b�t i prvn� ��st kl��e !!!'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = [fsBold]
ParentFont = False
end
object Label29: TLabel
Left = 261
Top = 355
Width = 133
Height = 17
Caption = 'Informace a e-obchod:'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
object Label30: TLabel
Left = 26
Top = 139
Width = 459
Height = 17
Caption =
'Aktiva�n� kl�� je toti� na ka�d�m po��ta�i a pro ka�d�ho u�ivate' +
'le jin� !'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Left = 78
Top = 183
Width = 5
Height = 17
Caption = '-'
end
object Label4: TLabel
Left = 145
Top = 183
Width = 5
Height = 17
Caption = '-'
end
object Label7: TLabel
Left = 194
Top = 183
Width = 5
Height = 17
Caption = '-'
end
object Label8: TLabel
Left = 259
Top = 183
Width = 5
Height = 17
Caption = '-'
end
object Label9: TLabel
Left = 316
Top = 183
Width = 5
Height = 17
Caption = '-'
end
object Label36: TLabel
Left = 269
Top = 388
Width = 132
Height = 17
Caption = 'http://www.holubec.cz'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clBlue
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
Visible = False
end
object Panel1: TPanel
Left = 8
Top = 273
Width = 497
Height = 136
BevelOuter = bvNone
Color = clWhite
TabOrder = 9
Visible = False
object Label26: TLabel
Left = 114
Top = 0
Width = 97
Height = 17
Alignment = taRightJustify
Caption = 'Autor programu:'
end
object Label27: TLabel
Left = 217
Top = 0
Width = 260
Height = 17
Caption = 'Tom� Holubec - http://autoskola.holubec.cz'
Color = clWhite
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clBlue
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label32: TLabel
Left = 14
Top = 30
Width = 470
Height = 17
Caption =
'Pro �ten��e PC WORLD po dobu jednoho m�s�ce zdarma aktiva�n� kl�' +
'�:'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = [fsBold]
ParentFont = False
end
object Label33: TLabel
Left = 168
Top = 52
Width = 205
Height = 17
Caption = 'http://autoskola.holubec.cz/pcworld'
Color = clWhite
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clBlue
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label34: TLabel
Left = 219
Top = 92
Width = 47
Height = 17
Caption = 'Label34'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clBlue
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
object Label35: TLabel
Left = 24
Top = 73
Width = 449
Height = 17
Caption =
'nebo s �asovou prodlevou SMS z mobiln�ho telefonu na 777 089 109' +
' ve zn�n�'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
object Label37: TLabel
Left = 155
Top = 92
Width = 57
Height = 17
Caption = 'T-Mobile:'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
object Label38: TLabel
Left = 124
Top = 111
Width = 88
Height = 17
Caption = 'Eurotel, Oskar:'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
object Label39: TLabel
Left = 219
Top = 111
Width = 47
Height = 17
Caption = 'Label39'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clBlue
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
object Label31: TLabel
Left = 123
Top = 52
Width = 39
Height = 17
Caption = 'on-line'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = 'Times New Roman CE'
Font.Style = []
ParentFont = False
end
end
object BitBtn1: TBitBtn
Left = 262
Top = 406
Width = 206
Height = 33
Caption = 'Chci si program vyzkou�et'
TabOrder = 0
Kind = bkOK
end
object Edit1: TEdit
Left = 19
Top = 180
Width = 57
Height = 25
CharCase = ecUpperCase
MaxLength = 6
TabOrder = 1
OnChange = Edit1Change
OnKeyPress = Edit1KeyPress
end
object Edit2: TEdit
Left = 84
Top = 180
Width = 59
Height = 25
CharCase = ecUpperCase
MaxLength = 5
TabOrder = 2
OnChange = Edit2Change
OnKeyPress = Edit1KeyPress
end
object Edit3: TEdit
Left = 151
Top = 180
Width = 41
Height = 25
CharCase = ecUpperCase
MaxLength = 4
TabOrder = 3
OnChange = Edit3Change
OnKeyPress = Edit1KeyPress
end
object Edit4: TEdit
Left = 200
Top = 180
Width = 57
Height = 25
CharCase = ecUpperCase
MaxLength = 6
TabOrder = 4
OnChange = Edit4Change
OnKeyPress = Edit1KeyPress
end
object Edit5: TEdit
Left = 265
Top = 180
Width = 49
Height = 25
CharCase = ecUpperCase
MaxLength = 5
TabOrder = 5
OnChange = Edit5Change
OnKeyPress = Edit1KeyPress
end
object Edit6: TEdit
Left = 322
Top = 180
Width = 73
Height = 25
CharCase = ecUpperCase
MaxLength = 8
TabOrder = 6
OnChange = Edit6Change
OnKeyPress = Edit1KeyPress
end
object BitBtn2: TBitBtn
Left = 403
Top = 179
Width = 88
Height = 25
Caption = 'Aktivovat'
TabOrder = 7
OnClick = BitBtn2Click
end
object Memo10: TMemo
Left = 168
Top = 67
Width = 177
Height = 23
Alignment = taCenter
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = 'Times New Roman CE'
Font.Style = [fsBold]
Lines.Strings = (
'Memo10')
ParentFont = False
ReadOnly = True
TabOrder = 8
end
object BitBtn3: TBitBtn
Left = 45
Top = 408
Width = 206
Height = 30
Caption = 'Ot�zky a odpov�di'
TabOrder = 10
OnClick = ZobrazFAQ
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333FF3FF3333333333CC30003333333333773777333333333C33
3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
33003377333337F33377333333333C333300333F333337F33377339333333C33
3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
330077F377F337F33377993399333C33330077FF773337F33377399993333C33
33333777733337F333FF333333333C33300033333333373FF7773333333333CC
3000333333333377377733333333333333333333333333333333}
NumGlyphs = 2
end
object Memo1: TMemo
Left = 4
Top = 98
Width = 505
Height = 25
Lines.Strings = (
'OT�ZKA: Co je prvn� a druh� ��st kl��e a k �emu to je? V�bec tom' +
'u '
'nerozum�m.'
''
'ODPOV��: Zdarma si m��ete program a jeho funkce vyzkou�et na 70 '
'ot�zk�ch. '
'V p��pad�, �e chcete m�t p��stup ke v�em 757 ot�zk�m, mus�te uhr' +
'adit registra�n� '
'poplatek 100K�. Za tento poplatek obdr��te ��seln� k�d, kter� V�' +
'm zp��stupn� '
'v�echny ot�zky. Aby pomoc� jednoho k�du ne�lo zp��stupnit v�echn' +
'y ot�zky na '
'v�ce po��ta��ch, mus� b�t ��seln� k�d pro ka�d� po��ta� jin�. Pr' +
'oto mus� '
'objedn�vka obsahovat i tzv. "prvn� ��st kl��e", kter� je pro ka�' +
'd� po��ta� n�hodn� '
'vygenerov�na. Ke ka�d� prvn� ��sti je definov�na jedna jedin� sp' +
'r�vn� "druh� '
'��st kl��e", kter� je, d�ky n�hodnosti prvn� ��sti, pro ka�d� po' +
'��ta� tak� jin�.'
''
''
'OT�ZKA: Jak lze aktualizovat program Auto�kola na po��ta��ch, kd' +
'e ji� byl '
'zad�n kl�� do star�� verze?'
''
'ODPOV��: P�i aktualizaci star�� verze programu, do kter� ji� byl' +
' zad�n kl��, '
'sta�� starou verzi smazat a nahradit nov�j��m demoprogramem. Po ' +
'spu�t�n� '
'tohoto '
'dema budete m�t ihned a bez op�tovn�ho zad�v�n� kl��e p��stup ke' +
' v�em '
'ot�zk�m. '
'Adres�� se starou verz� programu tak� m��ete, m�sto vymaz�n�, po' +
'uze '
'p�ejmenovat (nap�."AUTOSKOLA_OLD") a potom do po��ta�e "nat�hnou' +
't" '
'nov�j�� verzi.'
''
''
'OT�ZKA: Bude mi V� druh� kl�� k n��emu platn�, kdy� nap��klad z' +
'form�tuji '
'po��ta� nebo omylem vyma�u program Auto�kola?'
''
'ODPOV��: Pokud program Autoskola omylem vyma�ete, nic z�va�n�ho ' +
'se '
'ned�je. Norm�ln� program nainstalujte znovu. Nov� kl�� budete p' +
'ot�ebovat a� v '
'okam�iku zform�tov�n� cel�ho disku. V takov�m p��pad� m�te mo�no' +
'st od autora '
'programu z�skat nov� kl�� zdarma. Sou��st� ��dosti v�ak mus� b�t' +
' i star� kl��. '
'Autor si vyhrazuje pr�vo odm�tnout n�hradu kl��e, pokud dojde k ' +
'p�esv�d�en�, �e '
'd�vodem ��dosti je snaha poskytnout kl�� t�et� osob�.'
''
''
'OT�ZKA: Bude program fungovat i na po��ta�i, kter� nen� p�ipojen' +
' k internetu?'
''
'ODPOV��: Ano bude, proto�e nen� na internetu z�visl�. Program m�' +
'�ete '
'pomoc� diskety �i jin�ho datov�ho m�dia p�en�st na libovoln� po�' +
'�ta� a libovoln� '
'kop�rovat i sv�m p��tel�m a zn�m�m.'
''
''
'OT�ZKA: Jak pozn�m, co jsem v ot�zce ud�lal �patn�?'
''
'ODPOV��: Odpov�di, kter� jste ozna�ili, pozn�te podle �erven�ho ' +
'punt�ku '
'vedle '
'p�smena ozna�uj�c�ho odpov��. Lehce tak m��ete "sv�" odpov�di po' +
'rovnat se '
'spr�vn�mi.'
''
''
'OT�ZKA: Budu muset po zakoupen� druh� ��sti kl��e je�t� n�co sta' +
'hovat nebo '
'sh�n�t nejakou dal�� disketu?'
''
'ODPOV��: Nic dal��ho stahovat nemus�te. V�echny ot�zky jsou obsa' +
'�eny ji� '
'uvnit� demoverze. Bez vlo�en� aktiva�n�ho kl��e k nim pouze nem�' +
'te umo�n�n '
'p��stup, ale jinak tam opravdu jsou.')
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 11
Visible = False
WantReturns = False
end
end