object MainForm: TMainForm Left = 310 Top = 259 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = 'Sleeper' ClientHeight = 104 ClientWidth = 280 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poDefault OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 16 Top = 8 Width = 89 Height = 13 Caption = 'Rychlost po��ta�e:' end object SpeedLabel: TLabel Left = 240 Top = 32 Width = 26 Height = 13 Caption = '100%' end object HelpBtn: TSpeedButton Left = 8 Top = 72 Width = 25 Height = 25 Hint = 'Zapne/vypne bublinovou n�pov�du.' AllowAllUp = True GroupIndex = 1 Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000CE0E0000D80E00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD 0DDDDDDDDDDDDDD00DDDDDDD8888880B08DDDDD0000000FF008DDD0FFFBFBFBF FF08DD0FBFFF44FFBF08DD0FFFBFFFBFFF08DD0FBFFF48FFBF08DD0FFFBF847F FF08DD0FBFFFB848BF08DD0FFF48FF44FF08DD0FBF44B744BF08DD0FFF744447 FF08DD0FBFFFBFFFBF08DD0FFFBFFFBFFF0DDDD00000000000DD} OnClick = HelpBtnClick end object TrackBar: TTrackBar Left = 8 Top = 24 Width = 225 Height = 33 Hint = 'Uprav� rychlost po��ta�e.'#13#10'� 0% - po��ta� je prakticky ne�inn�'#13#10 + '� 100% - po��ta� je stejn� rychl�, jako bez pou��t� zpomalova�e' Max = 100 Orientation = trHorizontal PageSize = 10 Frequency = 5 Position = 100 SelEnd = 0 SelStart = 0 TabOrder = 0 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TrackBarChange end object InfoBtn: TButton Left = 200 Top = 72 Width = 73 Height = 25 Hint = 'Zobraz� informace o aplikaci.' Caption = 'Info...' TabOrder = 1 OnClick = Info end object CancelBtn: TButton Left = 120 Top = 72 Width = 75 Height = 25 Hint = 'Zav�e tento dialog bez ulo�en� zm�n.' Cancel = True Caption = 'Storno' ModalResult = 2 TabOrder = 2 OnClick = CancelBtnClick end object OkBtn: TButton Left = 40 Top = 72 Width = 75 Height = 25 Hint = 'Zav�e tento dialog a ulo�� zm�ny.' Caption = 'OK' Default = True ModalResult = 1 TabOrder = 3 end object Timer: TTimer Interval = 100 OnTimer = TimerTimer Left = 144 end object RxTrayIcon: TRxTrayIcon Hint = '50%' Icon.Data = {} PopupMenu = TrayMenu OnClick = RxTrayIconClick Left = 208 end object TrayMenu: TPopupMenu Left = 176 object EditSpeedItem: TMenuItem Caption = '&Upravit rychlost' Default = True OnClick = EditSpeed end object QuitItem: TMenuItem Caption = '&Konec' OnClick = Quit end end end