object engine: Tengine Left = 239 Top = 194 BorderStyle = bsNone Caption = 'realtime - engine by Provaznik Petr' ClientHeight = 573 ClientWidth = 792 Color = clBlack Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnActivate = FormActivate OnClose = FormClose OnKeyDown = FormKeyDown PixelsPerInch = 96 TextHeight = 13 object DXDraw1: TDXDraw Left = -8 Top = -27 Width = 800 Height = 600 AutoInitialize = True AutoSize = False Color = clBtnFace Display.BitCount = 16 Display.FixedBitCount = True Display.FixedRatio = True Display.FixedSize = False Display.Height = 600 Display.Width = 800 Options = [doAllowReboot, doWaitVBlank, doCenter, doRetainedMode, doHardware, doSelectDriver] SurfaceHeight = 600 SurfaceWidth = 800 TabOrder = 3 end object obrazovky: TNotebook Left = 0 Top = 0 Width = 792 Height = 573 Align = alClient TabOrder = 0 object TPage Left = 0 Top = 0 Caption = 'start' object uvodImage: TImage Left = 0 Top = 0 Width = 792 Height = 573 Cursor = crHandPoint Align = alClient OnClick = uvodImageClick end object hudba_off: TButton Left = 360 Top = 120 Width = 75 Height = 25 Caption = 'hudba_off' TabOrder = 0 Visible = False OnClick = hudba_offClick end object hudba_on: TButton Left = 384 Top = 80 Width = 75 Height = 25 Caption = 'hudba on' TabOrder = 1 Visible = False OnClick = hudba_onClick end object nastaveni: TListBox Left = 120 Top = 328 Width = 121 Height = 97 ItemHeight = 13 TabOrder = 2 Visible = False end end object TPage Left = 0 Top = 0 Caption = 'cteni' object webbrowser1: TEmbeddedWB Left = 0 Top = 0 Width = 792 Height = 573 Align = alClient TabOrder = 0 OnStatusTextChange = webbrowser1StatusTextChange OnNavigateComplete2 = webbrowser1NavigateComplete2 DownloadOptions = [DLCTL_DLIMAGES, DLCTL_VIDEOS, DLCTL_BGSOUNDS] UserInterfaceOptions = [NO3DBORDER] OnShowContextMenu = webbrowser1ShowContextMenu PrintOptions.Margins.Left = 19.050000000000000000 PrintOptions.Margins.Right = 19.050000000000000000 PrintOptions.Margins.Top = 19.050000000000000000 PrintOptions.Margins.Bottom = 19.050000000000000000 PrintOptions.Header = '&w&bStr'#225'nka '#269'. &p z &P' PrintOptions.HTMLHeader.Strings = ( '') PrintOptions.Footer = '&u&b&d' PrintOptions.Orientation = poPortrait ReplaceCaption = False EnableDDE = False fpExceptions = True ControlData = { 4C000000DB510000393B00000000000000000000000000000000000000000000 000000004C000000000000000000000001000000E0D057007335CF11AE690800 2B2E126208000000000000004C0000000114020000000000C000000000000046 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000010000000000000000000000000000000000000068154900} end end end object Panel1: TPanel Left = 250 Top = 0 Width = 300 Height = 55 BevelOuter = bvNone BorderWidth = 1 Color = clBlack TabOrder = 1 Visible = False object Image1: TImage Left = 0 Top = 0 Width = 300 Height = 55 AutoSize = True Picture.Data = {} end object Label1: TLabel Left = 8 Top = 9 Width = 75 Height = 17 Cursor = crHandPoint Hint = 'Hudba - nastaven'#237', volby' AutoSize = False ParentShowHint = False ShowHint = True Transparent = True OnClick = Label1Click end object Label2: TLabel Left = 88 Top = 9 Width = 60 Height = 17 Cursor = crHandPoint Hint = 'Zp'#283't o jednu str'#225'nku' AutoSize = False ParentShowHint = False ShowHint = True Transparent = True OnClick = Label2Click end object Label3: TLabel Left = 154 Top = 9 Width = 68 Height = 17 Cursor = crHandPoint Hint = 'Skok do hlavn'#237'ho menu' AutoSize = False ParentShowHint = False ShowHint = True Transparent = True OnClick = Label3Click end object Label4: TLabel Left = 248 Top = 8 Width = 49 Height = 19 Cursor = crHandPoint Hint = 'Ukon'#269'en'#237' REALTIME' AutoSize = False ParentShowHint = False ShowHint = True Transparent = True OnClick = Label4Click end end object Panel2: TPanel Left = 250 Top = 56 Width = 300 Height = 200 BevelOuter = bvNone Color = clBlack Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 Visible = False object Image2: TImage Left = 0 Top = 0 Width = 300 Height = 200 AutoSize = True Picture.Data = {} end object Label5: TLabel Left = 267 Top = 8 Width = 25 Height = 17 Cursor = crHandPoint Hint = 'Zav'#345'i menu HUDBA' AutoSize = False ParentShowHint = False ShowHint = True Transparent = True OnClick = Label5Click end object Bevel1: TBevel Left = 8 Top = 40 Width = 281 Height = 129 Shape = bsFrame end object Label6: TLabel Left = 12 Top = 35 Width = 102 Height = 13 Caption = ' HRAJ SKLADBU ' Color = clGreen Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentColor = False ParentFont = False end object hu1: TLabel Left = 16 Top = 53 Width = 18 Height = 13 Cursor = crHandPoint Caption = 'hu1' Transparent = True OnClick = hu1Click end object hu2: TLabel Left = 16 Top = 69 Width = 18 Height = 13 Cursor = crHandPoint Caption = 'hu2' Transparent = True OnClick = hu2Click end object hu3: TLabel Left = 16 Top = 85 Width = 18 Height = 13 Cursor = crHandPoint Caption = 'hu3' Transparent = True OnClick = hu3Click end object hu4: TLabel Left = 16 Top = 101 Width = 18 Height = 13 Cursor = crHandPoint Caption = 'hu4' Transparent = True OnClick = hu4Click end object hu5: TLabel Left = 16 Top = 117 Width = 18 Height = 13 Cursor = crHandPoint Caption = 'hu5' Transparent = True OnClick = hu5Click end object hu6: TLabel Left = 16 Top = 133 Width = 18 Height = 13 Cursor = crHandPoint Caption = 'hu6' Transparent = True OnClick = hu6Click end object hu7: TLabel Left = 16 Top = 149 Width = 18 Height = 13 Cursor = crHandPoint Caption = 'hu7' Transparent = True OnClick = hu7Click end object Label7: TLabel Left = 24 Top = 178 Width = 58 Height = 13 Cursor = crHandPoint Caption = 'Hudba hraje' Transparent = True OnClick = Label7Click end object Label8: TLabel Left = 120 Top = 178 Width = 59 Height = 13 Cursor = crHandPoint Caption = 'M'#283'nit hudbu' Transparent = True OnClick = Label8Click end object Label9: TLabel Left = 216 Top = 178 Width = 70 Height = 13 Cursor = crHandPoint Caption = 'Hudba nehraje' Transparent = True OnClick = Label9Click end object hudbahraje1: TRadioButton Left = 8 Top = 178 Width = 14 Height = 14 Checked = True Color = clBlack Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False TabOrder = 0 TabStop = True OnClick = hudbahraje1Click end object hudbahraje2: TRadioButton Left = 201 Top = 178 Width = 13 Height = 13 TabOrder = 1 OnClick = hudbahraje2Click end object zmena: TCheckBox Left = 104 Top = 178 Width = 13 Height = 14 Checked = True State = cbChecked TabOrder = 2 end end object Timer1: TTimer Interval = 500 OnTimer = Timer1Timer Left = 672 Top = 64 end end