home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 250
- Top = 241
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsSingle
- Caption = 'Rejst��k - ro�n�k Chip CD (32bit)'
- ClientHeight = 499
- ClientWidth = 632
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clTeal
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- Scaled = False
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Image1: TImage
- Left = 0
- Top = 0
- Width = 632
- Height = 500
- AutoSize = True
- Picture.Data = {<image000.jpg>}
- end
- object Label4: TLabel
- Left = 296
- Top = 368
- Width = 90
- Height = 13
- Caption = 'po�et z�znam�:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -12
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label5: TLabel
- Left = 400
- Top = 368
- Width = 3
- Height = 13
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- Transparent = True
- end
- object Label8: TLabel
- Left = 296
- Top = 288
- Width = 33
- Height = 21
- AutoSize = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- Transparent = True
- OnDblClick = Label8DblClick
- end
- object Label10: TLabel
- Left = 24
- Top = 264
- Width = 43
- Height = 13
- Caption = 'rubriky:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label1: TLabel
- Left = 296
- Top = 304
- Width = 97
- Height = 13
- Caption = 'Adres�� na Chip CD:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object DBText1: TDBText
- Left = 400
- Top = 304
- Width = 50
- Height = 13
- AutoSize = True
- DataField = 'src'
- DataSource = DataSource1
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 296
- Top = 320
- Width = 76
- Height = 13
- Caption = 'Spustiteln� pod:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label3: TLabel
- Left = 400
- Top = 320
- Width = 18
- Height = 13
- Caption = 'OS'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label6: TLabel
- Left = 400
- Top = 288
- Width = 40
- Height = 13
- Caption = 'rubrika'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label7: TLabel
- Left = 24
- Top = 421
- Width = 32
- Height = 13
- Caption = 'najdi:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label11: TLabel
- Left = 296
- Top = 288
- Width = 40
- Height = 13
- Caption = 'Rubrika:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label12: TLabel
- Left = 296
- Top = 336
- Width = 21
- Height = 13
- Caption = 'Typ:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label13: TLabel
- Left = 400
- Top = 336
- Width = 18
- Height = 13
- Caption = 'typ'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label14: TLabel
- Left = 88
- Top = 264
- Width = 33
- Height = 13
- Cursor = crUpArrow
- Alignment = taCenter
- AutoSize = False
- Caption = 'v�e'
- Color = clNavy
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- OnClick = Label14Click
- end
- object Label15: TLabel
- Left = 144
- Top = 264
- Width = 33
- Height = 13
- Cursor = crUpArrow
- Alignment = taCenter
- AutoSize = False
- Caption = 'nic'
- Color = clNavy
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- OnClick = Label15Click
- end
- object Image4: TImage
- Left = 535
- Top = 344
- Width = 75
- Height = 42
- Cursor = crUpArrow
- Hint = 'Chip CD'
- AutoSize = True
- ParentShowHint = False
- Picture.Data = {<image001.bmp>}
- ShowHint = True
- OnClick = Image4Click
- end
- object Label9: TLabel
- Left = 296
- Top = 16
- Width = 45
- Height = 16
- Caption = 'Nazev'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- ShowAccelChar = False
- Transparent = True
- end
- object Label17: TLabel
- Left = 296
- Top = 264
- Width = 60
- Height = 13
- Caption = 'informace:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Image2: TImage
- Left = 576
- Top = 410
- Width = 32
- Height = 32
- Cursor = crUpArrow
- AutoSize = True
- Picture.Data = {<image002.ico>}
- OnClick = Image2Click
- end
- object Label18: TLabel
- Left = 24
- Top = 466
- Width = 83
- Height = 13
- Caption = 'Chip CD 2000:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label19: TLabel
- Left = 528
- Top = 466
- Width = 33
- Height = 13
- Cursor = crUpArrow
- Alignment = taCenter
- AutoSize = False
- Caption = 'v�e'
- Color = clNavy
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- OnClick = Label19Click
- end
- object Label20: TLabel
- Left = 568
- Top = 466
- Width = 33
- Height = 13
- Cursor = crUpArrow
- Alignment = taCenter
- AutoSize = False
- Caption = 'nic'
- Color = clNavy
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- OnClick = Label20Click
- end
- object Label16: TLabel
- Left = 512
- Top = 264
- Width = 42
- Height = 13
- Caption = 'Chip CD:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object DBText2: TDBText
- Left = 568
- Top = 264
- Width = 50
- Height = 13
- AutoSize = True
- DataField = 'p'
- DataSource = DataSource1
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object DBMemo1: TDBMemo
- Left = 296
- Top = 60
- Width = 313
- Height = 167
- TabStop = False
- BorderStyle = bsNone
- Color = clWhite
- Ctl3D = False
- DataField = 'popis'
- DataSource = DataSource1
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentCtl3D = False
- ParentFont = False
- ReadOnly = True
- TabOrder = 5
- end
- object Button1: TButton
- Left = 360
- Top = 419
- Width = 73
- Height = 17
- Cursor = crUpArrow
- Caption = 'naj�t'
- TabOrder = 4
- OnClick = Button1Click
- end
- object Edit1: TEdit
- Left = 64
- Top = 419
- Width = 145
- Height = 17
- AutoSize = False
- Color = clWhite
- Ctl3D = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 1
- OnKeyDown = Edit1KeyDown
- end
- object CheckBox1: TCheckBox
- Left = 224
- Top = 419
- Width = 65
- Height = 17
- Caption = 'v n�zvu'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 2
- end
- object CheckBox2: TCheckBox
- Left = 288
- Top = 419
- Width = 65
- Height = 17
- Caption = 'v popisu'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 3
- end
- object CheckBox3: TCheckBox
- Tag = 1
- Left = 24
- Top = 288
- Width = 105
- Height = 17
- Caption = 'T�ma m�s�ce'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 6
- OnClick = Rubriky
- end
- object CheckBox4: TCheckBox
- Tag = 2
- Left = 24
- Top = 304
- Width = 121
- Height = 17
- Caption = 'Zkuste si sami'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 7
- OnClick = Rubriky
- end
- object CheckBox5: TCheckBox
- Tag = 3
- Left = 24
- Top = 320
- Width = 113
- Height = 17
- Caption = 'Shareware'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 8
- OnClick = Rubriky
- end
- object CheckBox6: TCheckBox
- Tag = 4
- Left = 24
- Top = 336
- Width = 137
- Height = 17
- Caption = 'Od na�ich �ten���'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 9
- OnClick = Rubriky
- end
- object CheckBox7: TCheckBox
- Tag = 5
- Left = 24
- Top = 352
- Width = 105
- Height = 17
- Caption = 'Prezentace firem'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 10
- OnClick = Rubriky
- end
- object CheckBox8: TCheckBox
- Tag = 6
- Left = 24
- Top = 368
- Width = 105
- Height = 17
- Caption = 'Ze sv�ta internetu'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 11
- OnClick = Rubriky
- end
- object CheckBox9: TCheckBox
- Tag = 7
- Left = 144
- Top = 288
- Width = 97
- Height = 17
- Caption = 'Chip Plus'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 12
- OnClick = Rubriky
- end
- object CheckBox10: TCheckBox
- Tag = 8
- Left = 144
- Top = 304
- Width = 105
- Height = 17
- Caption = 'Servis'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 13
- OnClick = Rubriky
- end
- object CheckBox11: TCheckBox
- Tag = 9
- Left = 144
- Top = 320
- Width = 113
- Height = 17
- Caption = 'Pro chv�le oddechu'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 14
- OnClick = Rubriky
- end
- object DBGrid1: TDBGrid
- Left = 24
- Top = 24
- Width = 235
- Height = 201
- BorderStyle = bsNone
- Color = clWhite
- DataSource = DataSource1
- Options = [dgConfirmDelete, dgCancelOnExit]
- ReadOnly = True
- TabOrder = 0
- TitleFont.Charset = DEFAULT_CHARSET
- TitleFont.Color = clTeal
- TitleFont.Height = -11
- TitleFont.Name = 'MS Sans Serif'
- TitleFont.Style = []
- Columns = <
- item
- Expanded = False
- FieldName = 'name'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- Width = 215
- Visible = True
- end>
- end
- object CheckBox12: TCheckBox
- Tag = 10
- Left = 144
- Top = 336
- Width = 97
- Height = 17
- Caption = 'St��brn� disky'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 15
- OnClick = Rubriky
- end
- object CheckBox13: TCheckBox
- Tag = 11
- Left = 144
- Top = 352
- Width = 97
- Height = 17
- Caption = 'Z redakce'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 16
- OnClick = Rubriky
- end
- object CheckBox14: TCheckBox
- Tag = 12
- Left = 144
- Top = 368
- Width = 97
- Height = 17
- Caption = 'Obsahy'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 17
- OnClick = Rubriky
- end
- object Button2: TButton
- Left = 496
- Top = 419
- Width = 73
- Height = 17
- Cursor = crUpArrow
- Caption = 'zru�it hled�n�'
- TabOrder = 18
- OnClick = Button2Click
- end
- object CheckBox15: TCheckBox
- Tag = 1
- Left = 112
- Top = 464
- Width = 97
- Height = 17
- Hint = '1/00'
- Caption = '1'
- TabOrder = 19
- OnClick = Rubriky
- end
- object CheckBox16: TCheckBox
- Tag = 2
- Left = 144
- Top = 464
- Width = 97
- Height = 17
- Hint = '2/00'
- Caption = '2'
- TabOrder = 20
- OnClick = Rubriky
- end
- object CheckBox17: TCheckBox
- Tag = 3
- Left = 176
- Top = 464
- Width = 97
- Height = 17
- Hint = '3/00'
- Caption = '3'
- TabOrder = 21
- OnClick = Rubriky
- end
- object CheckBox18: TCheckBox
- Tag = 4
- Left = 208
- Top = 464
- Width = 97
- Height = 17
- Hint = '4/00'
- Caption = '4'
- TabOrder = 22
- OnClick = Rubriky
- end
- object CheckBox19: TCheckBox
- Tag = 5
- Left = 240
- Top = 464
- Width = 97
- Height = 17
- Hint = '5/00'
- Caption = '5'
- TabOrder = 23
- OnClick = Rubriky
- end
- object CheckBox20: TCheckBox
- Tag = 6
- Left = 272
- Top = 464
- Width = 97
- Height = 17
- Hint = '6/00'
- Caption = '6'
- TabOrder = 24
- OnClick = Rubriky
- end
- object CheckBox21: TCheckBox
- Tag = 7
- Left = 304
- Top = 464
- Width = 97
- Height = 17
- Hint = '7/00'
- Caption = '7'
- Enabled = False
- TabOrder = 25
- OnClick = Rubriky
- end
- object CheckBox22: TCheckBox
- Tag = 8
- Left = 336
- Top = 464
- Width = 97
- Height = 17
- Hint = '8/00'
- Caption = '8'
- Enabled = False
- TabOrder = 26
- OnClick = Rubriky
- end
- object CheckBox23: TCheckBox
- Tag = 9
- Left = 368
- Top = 464
- Width = 97
- Height = 17
- Hint = '9/00'
- Caption = '9'
- Enabled = False
- TabOrder = 27
- OnClick = Rubriky
- end
- object CheckBox24: TCheckBox
- Tag = 10
- Left = 400
- Top = 464
- Width = 97
- Height = 17
- Hint = '10/00'
- Caption = '10'
- Enabled = False
- TabOrder = 28
- OnClick = Rubriky
- end
- object CheckBox25: TCheckBox
- Tag = 11
- Left = 440
- Top = 464
- Width = 41
- Height = 17
- Hint = '11/00'
- Caption = '11'
- Enabled = False
- TabOrder = 29
- OnClick = Rubriky
- end
- object CheckBox26: TCheckBox
- Tag = 12
- Left = 480
- Top = 464
- Width = 33
- Height = 17
- Hint = '12/00'
- Caption = '12'
- Enabled = False
- TabOrder = 30
- OnClick = Rubriky
- end
- object Button3: TButton
- Left = 443
- Top = 419
- Width = 43
- Height = 17
- Cursor = crUpArrow
- Caption = 'typ'
- TabOrder = 31
- OnClick = Button3Click
- end
- object DataSource1: TDataSource
- DataSet = DBISAMQuery1
- OnDataChange = DataSource1DataChange
- Left = 592
- Top = 504
- end
- object DBISAMQuery1: TDBISAMQuery
- BeforeOpen = DBISAMQuery1BeforeOpen
- AfterOpen = DBISAMQuery1AfterOpen
- AfterScroll = DBISAMQuery1AfterScroll
- OnFilterRecord = DBISAMQuery1FilterRecord
- SessionName = 'DBCHIP'
- EngineVersion = '1.21'
- OnQueryProgress = DBISAMQuery1QueryProgress
- LockRetryCount = 15
- LockWaitTime = 100
- Left = 544
- Top = 504
- end
- object DBISAMSession1: TDBISAMSession
- EngineVersion = '1.21'
- Active = True
- KeepConnections = False
- PrivateDir = 'C:\'
- SessionName = 'DBCHIP'
- Left = 496
- Top = 504
- end
- end
-